Ошибка VBA 13 при удалении нескольких ячеек на странице «Настройка» многостраничной книги - PullRequest
0 голосов
/ 06 апреля 2019

Многостраничная рабочая книга со скрытыми листами, отображаемыми, когда на листе «Настройка» есть значение, помещенное в ячейку (диапазон: F4: F23). Проблема заключается в том, что при удалении содержимого нескольких ячеек в этом диапазоне страницы не скрываются, и появляется сообщение «Ошибка времени выполнения 13»: несоответствие типов

Target Target.Range Пробовал если не

        Private Sub Worksheet_Change(ByVal Target As Range)

  If Target.Column = F And Len(Target.Value) > 0 Then

        If Evaluate("Countif(F:F," & Target.Address & ")") > 1 Then
            MsgBox Target.Value & " is a duplicate entry.", vbExclamation, "Duplicate Entry"
            Range(Target.Address).ClearContents

        End If

         End If

Затем выполняется код для отображения или скрытия и присваивается имя рабочему листу на основе введенного значения. (Который отлично работает)

Выбор и удаление содержимого 1 ячейки за раз скрывает рабочий лист и не возвращает ошибку, удаление содержимого нескольких ячеек возвращает ошибку и не скрывает дополнительные рабочие листы и удаляет имя. У меня уже есть макрос, созданный для очистки установочного листа, но я не могу его использовать! Мне нужно иметь возможность очищать содержимое нескольких ячеек одновременно.

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...