VBA раскрывающийся список Формула IFS - PullRequest
0 голосов
/ 19 февраля 2020

Этот код не работает для меня. Кто-то может увидеть ошибку. Отображается ошибка времени выполнения «1004». Это ошибка в формуле 1, и это не полный код, а ошибка здесь.

Dim JT As String
    JT = Columns("E:E").Select
    With Selection.Validation
        .Delete
        .Add Type:=xlValidateList, AlertStyle:=xlValidAlertStop, Operator:= _
        xlBetween, Formula1:="=IFS(L2=$M$2,B,L2=$N$2,Co,L2=$O$2,E,L2=$P$2,En,L2=$Q$2,I_T,L2=$R$2,O,L2=$S$2,P_B,L2=$T$2,Sp,L2=$U$2,SII)"
        .IgnoreBlank = True
        .InCellDropdown = True
        .InputTitle = ""
        .ErrorTitle = ""
        .InputMessage = ""
        .ErrorMessage = ""
        .ShowInput = True
        .ShowError = True
    End With
Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...