Hallo @ all,
Ich habe ein Telefonverzeichnis erstellt,
und eine Suchfunktion als Makro hinzugefügt.
Das sieht bis jetzt so aus:
Sub Suche()
Dim Suchbegriff As String
Suchbegriff = InputBox("Name des Kontaktes eingeben.", "Suchen nach:")
Cells.Find(What:=Suchbegriff).Activate
End Sub
Mit dem Makro wird nun das gesammte TB durchsucht.
Ich mochte aber nur Spalte "A" als Suchkriterium haben (mit Range hab ich es leider nicht hinbekommen) und zudem auch nur alle Enträge die in meinem TB "rot" Text sind.
Ist das möglich, dies in das bestehende Makro zu integrieren?
Oder muss man was neues bauen?
danke für eure Hilfe
Gruß Benjamin