Excel VBA - Suchbegriff aus Zelle in Tabellenblatt suchen

[!NeXT]

Hallo CB Forum,
kleine Frage zu später Stunde:

Ich habe 2 Tabellen: Tabelle 1 und Tabelle 2, nun will ich den Suchbegriff aus Tabelle 1 (Range H9) in der 2. Tabelle suchen und selektieren.

Leider bekomm ich es einfach nicht hin und weiß nicht warum.
Könntet ihr mir weiterhelfen?

 

[MickH74]

Leider schreibst Du nicht, wie Du es probierst und was genau nicht funktioniert. Ich würde es über eine Suche mit Range.Find machen. Also ungefähr so:

Dim rngZiel as Range

rngZiel = Sheets("Tabelle 2").UsedRange.Find(what:=sheets("Tabelle 1").Range("H9")).address

Ist jetzt schnell aus dem Kopf getippt. Habs also nicht getestet.

Gruß,
Mick

 

[!NeXT]

Ich hab mich nochmal durch mehrere Forenseiten durchgelesen.
Nun hab ich endlich das was ich brauche. Vielen Dank an @MickH74 du hast mir trotzdem schon weitergeholfen.

Mein Code sieht nun so hier aus:

Sub CommandButton()
Dim zelle As Range

For Each zelle In Sheets("Tabelle1").Range("A1:A1000").Cells
      If zelle.Text = Sheets("Tabelle2").Range("H9") Then
    Sheets("Tabelle1").Activate
    zelle.Activate
    Exit For
  End If
Next
End Sub

 

[MickH74]

Gerne