Excel VBA - Springe zu Zelle mit Inhalt Befehl?
Hallo,
ich schaffe es leider nicht einen VBA Code zusammenzubauen, welcher folgendes kann:
Klickt man auf Tabelle 1 eine Zelle mit Inhalt an, dann soll Tabelle 2 geöffnet werden und es soll in der Spalte A die erste Zelle angewählt werden die exakt den gleichen Namen hat wie die angeklickte Zelle bei Tabelle 1.
Beispiel: Man klickt auf Tabelle 1 die Zelle an mit dem Inhalt "Lagerhalle". Dann springt Excel in Tabelle 2 und wählt die erste Zelle aus, worin der Inhalt "Lagerhalle" ist.
Danke im Voraus
1 Antwort
![](https://images.gutefrage.net/media/user/Suboptimierer/1443606504450_nmmslarge__0_0_160_160_7f828fad18ee7edb96b8daceedaeeadb.png?v=1443606506000)
Ich habe keine Möglichkeit, es hier zu testen, aber ein Ansatz könnte so aussehen:
Sub Worksheet1_SelectionChange(Target as Range)
If Not IsEmpty(Target) Then
If WorksheetFunction.CountIf(Tabelle2.Range("A:A"), Target.Value) > 0 Then
Tabelle2.Range("A"&WorksheetFunction."Vergleich"(...)).Select
End If
End If
End Sub
Bei den WorksheetFunctions musst du noch nach dem Pendant zur Excelfunktion VERGLEICH suchen.
![](https://images.gutefrage.net/media/user/geri3d/1445246679564_nmmslarge__92_208_1652_1652_70c8a924950b847ddd012ca7a0648a93.jpg?v=1445246680000)