Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
444to448
444to448
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

suchfunktion in if-anweisung

Forumthread: suchfunktion in if-anweisung

suchfunktion in if-anweisung
29.06.2004 11:58:44
Hans
moin, moin,
wer kann mir bei meinem problem helfen?
ich möchte über ein comandbutton eine zeihenfolge suchen. sollte diese nicht gefunden werden, soll dies eine messagebox anzeigen und die restlichen befehle ausgeführt werden.
grüße hans
Anzeige

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: suchfunktion in if-anweisung
Marcel
' In Spalte A suchen
such = "Deine Zahlen"
Columns("A:A").Select
Selection.Find(What:=such, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
On Error Go To err
exit err:
MsxBox("Fehler...")
' weitere Befehle
End Sub
' im gesamten Blatt suchen:
such = "Deine Zahlen"
Cells.Select
Selection.Find(What:=such, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
On Error Go To err
exit err:
MsxBox("Fehler...")
' weitere Befehle
End Sub
' sollen auch weitere Befehle sein, wenn was gefunden wird, dann
If such = "" Then ' wenn nichts gefunden wird, dann
' weitere Befehle
else ' sonst, wenn was gefunden wird
' weitere Befehle
End Sub
Gruß
Marcel
Anzeige
AW: suchfunktion in if-anweisung
Hans
hab dank, marcel
hans
AW: suchfunktion in if-anweisung FEHLER
Marcel
darf nicht lauiten
exit err:
sondern
Exit Sub
err:
AW: suchfunktion in if-anweisung FEHLER
Marcel
darf nicht lauiten
exit err:
sondern
Exit Sub
err:
Anzeige
AW: suchfunktion in if-anweisung FEHLER
Hans
oki, doki
thanks hans
;

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige