Я пытаюсь добавить проверку данных в один из столбцов.Я использовал тот же код ранее, и он работает нормально.Но я не уверен, почему это не работает.
Ниже приведен мой код:
Sheets("Input").Range("N:N").Select
'Columns("N:N").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
xlBetween, Formula1:= _
"=INDIRECT(SUBSTITUTE((SUBSTITUTE((SUBSTITUTE((SUBSTITUTE((SUBSTITUTE((SUBSTITUTE(Y1, ""/"", """")), ""&"", """")), "" "", """")), ""("", """")), "")"", """")), "","", """"))"
//This where my code gives me an error stating Run-time error 1004
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Range("N1").Select
With Selection.Validation
.Delete
.Add Type:=xlValidateInputOnly, AlertStyle:=xlValidAlertStop, Operator _
:=xlBetween
.IgnoreBlank = True
.InCellDropdown = True
.InputTitle = ""
.ErrorTitle = ""
.InputMessage = ""
.ErrorMessage = ""
.ShowInput = True
.ShowError = True
End With
Ячейка Y1 в моем листе Excel снова является формулой.Может ли это быть проблемой?
Значения выборки ячеек Y1: «Одежда для взрослых и упаковка обуви / Маркировка», «Ювелирные изделия, часы, сумкиСоветный запрос / регулирующий визит»