Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
184to188
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
184to188
184to188
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Suche erfolgreich?

Suche erfolgreich?
02.12.2002 15:08:36
Sparc
Hi,
wie kann ich abfragen, ob eine Suche erfolgreich war?
Im Makro verwende ich folgenden Befehl:

Cells.Find(What:=a, After:=ActiveCell, LookIn:= _
xlValues, LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:= _
xlNext, MatchCase:=False).Activate

Das Ganze soll etwa so aussehen:
if Suche(siehe oben)
wenn gefunden -> blah, blah
wenn nicht gefunden -> blah blah

Danke schonmal für die Hilfe!!!

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Suche erfolgreich?
02.12.2002 15:25:57
Monika Weber
Hi Sparc

Nun, wenn er nichts findet, dann startet der Debugger. Du könntest bsp.-weise eine Fehlerabfrage einbauen:

Sub test3()
Dim a
a = "Hallo"
On Error GoTo Error
Cells.Find(What:=a, After:=ActiveCell, LookIn:= _
xlValues, LookAt:=xlPart, SearchOrder:=xlByColumns, SearchDirection:= _
xlNext, MatchCase:=False).Activate
MsgBox "Hab was gefunden"
Exit Sub
Error: MsgBox "Hab nix gefunden"
End Sub

Es liebs Grüessli
Monika
Jumper.ch

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige