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

Suche

Forumthread: Suche

Suche
17.08.2006 15:49:04
Christian
Hi,
brauche mal wieder eure Hilfe!!!!
Habe Textfelder von B1 bis B100 in denen nach der der Zeichenkette abc gesucht werden soll. Wenn diese gefunden ist soll der Rest der Zeichenkette in eine variabel gesetzt werden. Diese wird dann weiterverarbeitet.
Danke schon einmal
Christian
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Suche
17.08.2006 15:52:02
Matthias
Hallo Christian,
muss "abc" am Anfang stehen?
Gruß Matthias
AW: Suche
17.08.2006 15:53:16
Christian
nein
AW: Suche
17.08.2006 15:56:06
Matthias
Hallo Christian,
dann so:

Sub test()
Dim s As Range, tmp As String, t0 As Integer
Dim such As String
such = "abc"
Set s = Sheets("Tabelle1").Range("B1:B100").Find(what:=such, LookAt:=xlPart)
If s Is Nothing Then
MsgBox "nicht gefunden"
Else
t0 = InStr(s.Value, "abc")
tmp = Mid(s.Value, t0 + Len(such))
MsgBox tmp
End If
End Sub

Gruß Matthias
Anzeige
AW: Suche
17.08.2006 16:00:20
Christian
danke dir
;

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