VBA Suchfunktion
09.03.2020 18:19:49
Peter
Hallo zusammen,
ich tüftle schon seit über einem Tag an meiner Suchformel.
Egal was ich mache, es kommt immer wieder einen anderer Fehler.
Ich möchte einen dynamischen Wert aus einer fest definierten Zelle (G15) nehmen, um diesen in 4 verschiedenen Tabellen zu suchen.
Dim bereich as Range
Set bereich = Worksheets("Tabelle3").Range("G15").Value
If Sheets("Tabelle1").Range("C:C").Find(bereich, , xlValues) Then
Sheets("Tabelle3").Range("E15").Value = Sheets("Tabelle 1").Range("C12").Value
End If
If Nothing Is Sheets("Tabelle1").Range("C:C").Find(bereich, , xlValues) Then
Sheets("Tabelle3").Range("E15").Value = ""
End If
In diesem Beispiel wird nur in einer Tabelle gesucht.
Könnt Ihr mir sagen wo mein/e Hänger ist/sind?
Danke schon mal im Voraus.