ich möchte per VBA die Zeilennummer der selektierten Zelle in einer intelligenten Tabelle auslesen.
Wie muss ich das machen?
Vielen Dank...
Public Sub Test()
MsgBox ActiveCell.Row - Tabelle1.ListObjects("Tabelle1").DataBodyRange.Row + 1
End Sub
Gruß
Sub M_snb()
MsgBox ActiveCell.ListObject.Range.Row
End Sub
Sub M_snb()
MsgBox Range(ActiveCell, ActiveCell.ListObject.ListRows(1).Range).Rows.Count
MsgBox Range(ActiveCell, ActiveCell.ListObject.DataBodyRange.Rows(1)).Rows.Count
MsgBox Range(ActiveCell, ActiveCell.ListObject.HeaderRowRange).Rows.Count - 1
End Sub