HERBERS Excel-Forum - die Beispiele

Thema: Zeichenfolge in Ziffern und Buchstaben aufteilen

Home

Gruppe

UDF

Problem

Wie kann ich eine Zeichenfolge wie "12AB3C45D" in die Zahl 12345 und die Zeichenfolge "ABCD" aufteilen?

Lösung
Geben Sie die nachfolgende benutzerdefinierte Funktion in ein Standardmodul ein.
StandardModule: basMain

Function TrennenA(sTxt As String)
   Dim iCounter As Integer
   Dim sDbl As String
   For iCounter = 1 To Len(sTxt)
      If IsNumeric(Mid(sTxt, iCounter, 1)) Then
         sDbl = sDbl & Mid(sTxt, iCounter, 1)
      End If
   Next iCounter
   TrennenA = CDbl(sDbl)
End Function

Function TrennenB(sTxt As String)
   Dim iCounter As Integer
   Dim sTmp As String
   For iCounter = 1 To Len(sTxt)
      If Not IsNumeric(Mid(sTxt, iCounter, 1)) Then
         sTmp = sTmp & Mid(sTxt, iCounter, 1)
      End If
   Next iCounter
   TrennenB = sTmp
End Function

Beiträge aus dem Excel-Forum zu den Themen UDF und Zeichenfolge

bestimmte Zeichenfolgen in Zellen löschen Formatgleichheit von Zeichenfolgen für SVERWEIS
Lohnsteuerberechnung (UDF, XLM-Datei, Webabfrage) Ergebnis UDF ändert, wenn Tabelle deaktiviert wird
UDF soll nicht auf Daten anderer Dateien zugreifen vor Ausführung einer UDF Zwischenspeicher "retten&
UDF - Argument ohne " " übergeben möglic Werte suchen mit Ausschluß von Zeichenfolgen
Zeichenfolge aus Textfeld auslesen UDF- Beschreibung
Zeichenfolge Finden und Ausgeben Argumente zählen mit gleicher Zeichenfolge
Berechnungsdauer einer UDF messen Hintergrudfarbe ändern??? Finde keine Lösung :-(
Probleme mit IsNumeric, Code per UDF Zeichenfolge bis /
UDF mittels Ereignis aktualisieren? Kodieren innerhalb einer Zeichenfolge
UDF, Minuszeichen vor Zahl auswerten Zeichenfolge splitten
nach Worksheet_Change werden UDF nicht ausgewertet Excel anhalten bei UDF
UDF ZÄHLENWENN mit exakter Zeichenfolge
UDF, Rückgabewert Text anstelle Zahl Aufruf einer UDF, Fehler Objekt erforderlich
Zeichenfolge in Zelle identifizieren & kopieren SQL in UDF
Anzahl einer Zeichenfolge in Zelle finden nach exakter Zeichenfolge suchen
Zeichenfolge per Makro ändern eine Zusammenhängende Zeichenfolge in Zelle finden
Hochstellung von Zeichenfolgen Werte einer UDF werden nicht aktualisiert
Suchen von Zeichenfolgen Suchen von Zeichenfolgen
Zeichenfolge suchen und benachbarte Inhalt löschen Zeichenfolge in InputBox verschlüsselt darstellen
zeichenfolgen von zelle a12 mitzaehlen Auslesen einer bestimmten Zeichenfolge a.einer Zel
Zeichenfolge in Zelle finden und Aktion ausführen Aufruf von UDF mit Array
Zeichenfolge in Zellbereich finden und zählen Zeichenfolgen in Datei suchen
UDF: Semikolon vs Komma suchen und ersetzen von bestimmten Zeichenfolgen
Zeichenfolge vergleichen und Unstimmigkeiten marki chr(0) aus Zeichenfolge entfernen
Filtern nach Zeichenfolgen, die einen * enthalten Zeichenfolge als Variable ohne ""