Office: Strukturbaum in Tabellenform darstellen (suche nach Zelle mit Inhalt)

Hallo,

ich arbeite gerade in Excel an einer Tabelle mit einer Übersicht von Kostenstellen, welche verschiedenen Kostenstellengruppen zugeordnet sind. In einem anderen Tabellenblatt ist ein Strukturbaum nach folgendem Schema aufgebaut



Kann ich jetzt irgendwie nach der Kostenstelle (Kst.xxx) suchen lassen und dann sagen: „Geh eine Zelle nach links und dann nach oben bis eine Zelle mit Inhalt kommt“?

mfg calm

 

Hi,

ja, das kann man - nach diesem Prinzip:

Code:

Sub Suchen()
    Dim rngZelle As Range
    Set rngZelle = Columns(3).Find("Kst.120", lookat:=xlWhole)
    If Not rngZelle Is Nothing Then
        MsgBox rngZelle.Offset(0, -1).End(xlUp).Address
    Else
        MsgBox "Nicht gefunden"
    End If
    Set rngZelle = Nothing
End Sub

Bis später,
Karin