Получить номер столбца таблицы после изменения листа

Question

Я пытаюсь получить номер столбца таблицы, в которой я работаю, но когда я набираю Target.column, он считает столбцы из столбца A, а не начало таблицы.

Private Sub Worksheet_Change(ByVal Target As Range)

Dim i As Integer
Dim Table5 As ListObject

Set Table5 = Range("Table5").ListObject

Debug.Print "Something changed in cell " & Target.Column
t = Target.Column


For i = 1 To Table5.ListRows.Count

Next i

End Sub

Есть ли способ сделать это без использования offset, если это возможно?

Answer 1

Я использую это, чтобы получить столбец ячейки относительно таблицы (ListObject)

Public Function GetCellColumn(ByVal myTable As ListObject, ByVal cell As Range) As Long
    GetCellColumn = cell.column - myTable.HeaderRowRange.column + 1
End Function

Дайте мне знать, что это то, что вы ищете.