Live-Forum - Die aktuellen Beiträge
Datum
Titel
25.04.2024 23:47:55
Datum ausweisen, wenn definierte Summe erreicht ist
25.04.2024 21:40:53
Excel Datenquelle aus dem Web mit Anmeldung?
25.04.2024 21:21:16
Zellkommentar in UserForm anzeigen und bearbeiten
25.04.2024 21:13:13
Kalenderwochen addieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
396to400
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
396to400
396to400
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

stringmuster finden

stringmuster finden
15.03.2004 11:00:09
PeterP
hallo!
ich suche nach einer möglichkeit, verschiedene stringmuster (im derzeitigen fall ##-###-##) innerhalb eines strings zu suchen. dabei sollte man den suchstring am besten per variable festlegen können.
ideal wäre natürlich, wenn das ganze im sinne von regular-expressions gehen würde. aber für den anfang reicht mir die unterscheidung direkter match/numerisch/alphanumerisch.
gruß
peter

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: stringmuster finden
15.03.2004 19:35:56
Hans W. Herber
Hallo Peter,
VBA kennt keine ReExpr, anders ist das bei VBScript, das in Excel eingebunden werden kann. Dieses Thema wird bei mir im Excel-Tutorial behandelt und würde hier zu weit führen.
Nachfolgend eine benutzerdefinierte Funktion, die für Deine Zwecke ausreichen sollte:

Sub GetAnswer()
Dim sString As String, sPattern As String
sString = "Heute ist der 23.12.2004 oder sowas ähnliches"
sPattern = "##.##.####"
MsgBox FindPattern(sString, sPattern)
End Sub



Function FindPattern(sString As String, sPattern As String) As Boolean
Dim iChar As Integer
For iChar = 1 To Len(sString)
If Mid(sString, iChar, Len(sPattern)) Like sPattern Then
FindPattern = True
Exit Function
End If
Next iChar
FindPattern = False
End Function

Gruss hans
Anzeige
AW: stringmuster finden
15.03.2004 22:12:28
PeterP
hallo hans!
danke für deine hilfe!
leider habe ich mich meine frage nicht ganz richtig/vollständig formuliert.
ich möchte das pattern nicht nur finden, sondern natürlich auch zurückgeben.
gruß
peter
AW: stringmuster finden
15.03.2004 22:16:35
PeterP
ok - ich bin so blind :) ... erledigt - danke!
(FindPattern = Mid(sString, iChar, Len(sPattern)))
gruß
peter

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige