Динамический диапазон для столбца таблицы

Question

У меня есть таблица, которая содержит 3 столбца. В столбце thirs, когда я нажимаю на него, я хочу, чтобы календарь выскочил и выбрал дату. Это работает отлично, но я должен вручную установить свой диапазон в коде ниже. Мне бы хотелось, чтобы 3-й столбец ("C") имел динамический диапазон при каждом добавлении строки в таблицу данных. (Имя таблицы = "Таблица1")

Заранее спасибо,

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Not Intersect(Target, Range("C1:C10")) Is Nothing Then UserForm1.Show

End Sub

Answer 1

Чтобы активировать пользовательскую форму1 при выборе ячейки, которая включает в себя третий столбец данных в вашей таблице (не включая заголовок таблицы), попробуйте:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    If Not Intersect(Target, listobjects("table1").DataBodyRange.Columns(3)) Is Nothing Then UserForm1.Show

End Sub

Если вы хотите, чтобы триггер выбора ячейки включал заголовок, просто измените DataBodyRange на Range.