mit Cells.Finde (what...) kann man ja nach etwas in ener Tabelle suchen.
Ist es nich tauch möglich nach etwas zu Suchen und ein ergebnis zu bekommen, ob etwas gefunden wurde oder nicht. "Wenn nichts gefunden wurde, dann mach das..."
Sub machs()
Dim C As Range
Set C = Cells.Find("xyz")
If C Is Nothing Then
MsgBox "Nix gefunden..." , , "Hinweis"
Else
MsgBox "Gefunden in " & C.Address(0, 0) , , "Treffer"
End If
End Sub
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen