Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Mehrere Suchkriterien für Maktostart

Forumthread: Mehrere Suchkriterien für Maktostart

Mehrere Suchkriterien für Maktostart
04.08.2006 13:15:36
marcl
Hallo Forumsgemeinde. Ich habe ein "kleines" Problem.
Ich lasse in meinem Makro Begriffe suchen, von wo aus die Zellen abwärts berabeitet werden sollen. Allerdings habe ich mehrere Begriffe zur Auswahl.
...
such = "alles"
Selection.Find(What:=such, After:=ActiveCell, LookIn:= _
xlFormulas, LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:= _
xlNext, MatchCase:=False, SearchFormat:=False).Activate
...
nun kann such aber mehrere Begriffe haben. Wie schaffe ich es, dass wenn "alles" nicht gefunden wird, das Makro von vorne läuft und den nächsten Begriff verwendet. "neues"z.B.
Ich hoffe, ich habe mich verständlich ausgedrückt.
Vielen Dank für Eure Hilfe
marcl
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Mehrere Suchkriterien für Maktostart
04.08.2006 13:40:18
Andi
Hi,
zB so:

Sub t()
Dim my_array
Dim a As Integer
my_array = Array("hallo", "servus", "moin", "tach", "ciao")
For a = 0 To 4
If Not Selection.Find(my_array(a)) Is Nothing Then
Selection.Find(my_array(a)).Activate
Exit Sub
End If
Next a
End Sub

Schönen Gruß,
Andi
Anzeige
danke o.t.
07.08.2006 09:20:53
marcl
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige