(xlCellTypeVisible) .EntireRow.Delete переходит в частную саб

Question

У меня есть код, который фильтрует таблицу по "# N / D!" критерии, а затем удалить видимые строки. Все это работало хорошо после того, как я добавил на другой лист Private Sub Worksheet_SelectionChange (ByVal target As Range). Теперь мой макрос, когда он достигает кода ниже, он переходит в этот частный саб, и я не знаю, почему? Кто-нибудь может это объяснить?

ws.Range("$A$2:$AD$" & LastRow).SpecialCells _
(xlCellTypeVisible).EntireRow.Delete

Answer 1

Попробуйте это:

Application.EnableEvents = False

ws.Range("$A$2:$AD$" & LastRow).SpecialCells(xlCellTypeVisible).EntireRow.Delete

Application.EnableEvents = True