VBA Suche in "Sverweis-Spalte"
06.09.2016 15:24:48
Alex
nach langer Suche und etlichen Versuchen, wende ich mich nun an euch.
Hier mein Code:
Sub Search()
Dim rng As Range
Set rng = ActiveSheet.Range("D:D").Find("einenText")
If rng Is Nothing Then
MsgBox "Nichts gefunden"
Exit Sub
End If
MsgBox "Gefunden"
Tabelle3.CheckBox13.Value = True
End Sub
Sinn ist es in einer Spalte einen bestimmten Text zu finden.
Allerdings ist der Text jeder Zelle mit Sverweis "enstanden" und ich habe die Befürchtung, dass es deswegen nicht funktioniert.
Hat jemand eine Idee?
Ich Danke euch vielmals im Voraus und freue mich auf eure Antworten.
Gruß, Alex
Anzeige