Excel Удалить строку, если в именованном диапазоне

Question

У меня есть лист с защищенными ячейками.Там есть кнопка «Добавить строку», и мне нужна кнопка «Удалить строку».ОДНАКО, я хочу, чтобы пользователь мог удалить строку только в пределах именованного диапазона.

ActiveSheet.Unprotect Password: = "password"

Если« выбранная строка » в пределах диапазона («ProjectList»), затем

     Row.EntireRow.Delete Shift:=xlUp

End If
ActiveSheet.Protect Password: = «пароль»

Answer 1

Вы можете использовать Intersect, чтобы проверить это:

If Not Application.Intersect(Selection.EntireRow, Range("ProjectList")) Is Nothing Then
   Selection.EntireRow.Delete Shift:=xlUp
End If