Herbers Excel-Forum - das Archiv

Zeichenfolge aus Textfeld auslesen

Informationen und Beispiele zu den hier genannten Dialog-Elementen:
TextBox
Bild

Betrifft: Zeichenfolge aus Textfeld auslesen
von: Robert

Geschrieben am: 18.02.2008 11:54:06

Hallo zusammen,
ich möchte aus einer Textbox "Optionen" die Anzahl der vorkommenden Zeichenfolge "+D15" auslesen.
In der Textbox steht zB so etwas: "+D15 +D15 +D15 +B00 +E86 +E87 +G63 "
Mit diesem Programm kann ich auslesen lassen ob "+D15" darin vorkommt. Das Ergebnis ist 1, klar.

Private Sub Belegen_Click()
Dim D15, Such, Erg
D15 = "+D15"
Such = Tabelle18.Optionen.Value
Erg = InStr(1, Such, D15)
Range("M4") = Erg
End Sub


Wie kann ich mir jedoch anzeigen lassen wie oft "+D15" darin vorkommt??
Danke schon mal..

Bild

Betrifft: AW: Zeichenfolge aus Textfeld auslesen
von: Renee
Geschrieben am: 18.02.2008 12:05:14
Hi Robert,
So:

Erg = (Len(Such) - Len(Replace(Such, D15, ""))) / Len(D15)


GreetZ Renée

 Bild
Excel-Beispiele zum Thema "Zeichenfolge aus Textfeld auslesen"
Summe bilden, wenn Kriterium Zeichenfolge Zeichenfolge aufteilen
Filtern einer Zahl aus einer Zeichenfolge Zeichenfolgen in Zahlen nach Textimport
Zeichenfolge korrigieren Zeichenfolge umkehren
Zeichenfolge in Wert wandeln Zeichenfolgen zusammenfassen
Zeichenfolge AAAA bis DDDD listen Freiraum am linken Rand von MS-FORMS-Textfeldern löschen