Live-Forum - Die aktuellen Beiträge
Datum
Titel
29.03.2024 13:14:12
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
552to556
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
552to556
552to556
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Fehler Suchfunktion unterdrücken

Fehler Suchfunktion unterdrücken
25.01.2005 11:18:33
Daniel
Hallo,
ich möchte über einen Button einen Text aus einem Textfeld suchen. Wenn der Text nicht vorhanden ist, soll eine Fehlermeldung kommen und es kann der Text verbessert werden...
Meine Code bis jetzt:
Cells.Find(What:=TextBox1, After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=True, SearchFormat:=False).Activate
Danke schon einmal...
Daniel

1
Beitrag zum Forumthread
Beitrag zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Fehler Suchfunktion unterdrücken
bst
Hallo Daniel,
nimm sowas:
Dim found As Range
Set found = Cells.Find( ... ) ' OHNE den .Activate am Ende
If found Is Nothing Then
MsgBox "Nicht gefunden"
Else
MsgBox found.Address
End If
HTH, Bernd
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige