Wie überprüft man, ob die aktuelle Zelle in der ersten Tabellenzeile steht?

Question

Ich muss überprüfen, ob die aktuelle Zelle in der Tabelle in der ersten Zeile ist. Es muss innerhalb der eigenen Tabelle, nicht nur das Blatt überprüfen. Ich konnte dazu keine Informationen finden. Ist dies mit einer Formel möglich? Ich möchte eine spezielle Operation durchführen, wenn dies der Fall ist.

Answer 1

nativen Tabellenfunktionen Mit Hilfe einer einfachen Formel zu konstruieren, können Sie die relative Zeilenposition innerhalb der Listobject (aka strukturierte) Tabelle, indem der Kopfzeile abzurufen.

=ROW()-ROW(Table1[#Headers]) 

Das Ergebnis könnte zu vergleichen Bestimmung eines boolean Ergebnis zurückzugeben, wenn Sie in der ersten Zeile der Tabelle sind.

Answer 2

Bedenken Sie:

Sub WhereIsTheActiveCell() 
    Dim EquivRange As Range, r As Range 
    Dim lo As ListObject 
    Dim nFirstRow As Long, nLastRow As Long 

    Set lo = ActiveSheet.ListObjects(1) 

    With lo 
     Set EquivRange = .DataBodyRange 
     nFirstRow = EquivRange.Row 
     nLastRow = EquivRange.Rows.Count + EquivRange.Row - 1 
     If ActiveCell.Row = nFirstRow Then 
      MsgBox "activecell is in the first data row of the table" 
     ElseIf ActiveCell.Row = nFirstRow - 1 Then 
      MsgBox "activecell is the the header row of the table" 
     End If 
    End With 
End Sub