Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.09.2025 10:29:46
Wert aus einer Zelle bei jeder Eingabe in neue Zelle
26.09.2025 08:51:00
Teilinhalt einer Zelle vergleichen
25.09.2025 23:04:12
Einen von drei möglichen Einträgen in einer Zeile suchen
25.09.2025 19:59:48
Lebenserleichternde Datei, im Bezug auf die Essensauswahl
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
516to520
516to520
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

String in Substrings teilen

Forumthread: String in Substrings teilen

String in Substrings teilen
19.11.2004 08:39:34
Vitali
Guten Morgen !
Ich habe folgendes Problem. Ich habe in einer Zelle einen Langen Text stehen. Sieht so aus: z.B Einsatztemperatur=50;Nennstrom=15;Pd=1 usw. Ich möchte aus diesem String Variablen Name und deren Wert extrahieren. Ich meine den String so lange durchsuchen bis er leer ist, und dabei prüffen:
wenn ";" mache substring dann suche in substring: wenn "=" dann links von "=" Variablenname, rechts von "=" Variablen Wert, suche weiter
P.S Ich bin noch nicht so gut in VBA, ich habe mehr Java zu tun!
Danke im voraus.
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: String in Substrings teilen
Harald
Hallo Vitali,
ein Ansatz zum Verfeinern:

Sub test()
Const Text = "Einsatztemperatur=50;Nennstrom=15;Pd=1"
Const Zuordnung = "="
Const Trenner = ";"
Const MaxVar = 10
Dim Varlist(MaxVar) As String
Dim Vallist(MaxVar) As String
Dim Varzahl As Integer
Dim x As String
Dim i As Integer
x = Text
Varzahl = 0
Do While Len(x) <> 0
Varlist(Varzahl) = Left(x, InStr(x, Zuordnung) - 1)
x = Right(x, Len(x) - InStr(x, Zuordnung))
If InStr(x, Trenner) <> 0 Then
Vallist(Varzahl) = Left(x, InStr(x, Trenner) - 1)
x = Right(x, Len(x) - InStr(x, Trenner))
Else
Vallist(Varzahl) = x
x = ""
End If
Varzahl = Varzahl + 1
Loop
For i = 0 To Varzahl
Debug.Print Varlist(i) & " = " & Vallist(i)
Next
Debug.Print "Anzahl Variablen: " & Varzahl
End Sub

Gruß Harald
Anzeige
AW: String in Substrings teilen
Worti
Hallo Vitali,
ab Excel 2000 gibt es die Funktion Split, die hier wohl nutzbringend angewendet werden kann. Da ich in der Firma nur Excel97 habe, hab ich den Teil Split des Codes allerdings nicht getestet:


Sub Splitten()
    
    Dim strText As String
    Dim Teilstrings As Variant
    Dim I As Long
    'Wenn dein Text zB in A1 steht
    strText = [A1]
    'hier gegebenenfalls die Hilfe zu Split bemühen 
    Teilstrings = Split(strText, ";")
    For I = 1 To UBound(Teilstrings)
        Cells(I, 2).Value = Mid(Teilstrings(I), 1, InStr(1, Teilstrings(I), "=") - 1)
        Cells(I, 3).Value = Mid(Teilstrings(I), InStr(1, Teilstrings(I), "=") + 1)
    Next I
    
End Sub


Worti
Anzeige
AW: String in Substrings teilen
Vitali
Danke Jungs!
Es funktioniert.
;

Forumthreads zu verwandten Themen

Teile eines Strings auslesen
Joachim

Hi,
wie kann ich denn einen Teil eines Strings auf dem Sheet "data" in der Zelle B10 auslesen. und zwar folgender massen:
Die Einträge könnten so aussehen:
GBm123456
ATU12478
GM123587
Dabei interessieren mich aber nur die Buchstaben, ABER der wahrscheinlich Hauptproblem:...
05.12.2008 09:10:18
Thread-ID: 1030353
6 Beiträge
VBA: String+TAB an inaktives Windowsfenster senden
Melanie

Hallo allerseits,
ich moechte aus Excel heraus mit VBA code einen String (z.b "Hallo") + TAB (oder ENTER) an ein 'fremdes' WindowsapplicationFenster schicken (keine Officeanwendung), wobei das Fensterhandle (oder auch das entsprechende TextFeldHandle bekannt sind).
Allerdings soll die...
09.12.2008 08:37:52
Thread-ID: 1031241
9 Beiträge
Text aus Text extrahieren
Eddie

Guten morgen an ALLE :-)
Ich will gerne aus folgenden Text einen bestimmten text extrahieren und Ihn dann in einer anderen Zelle anders zusammenbauen
In A1 steht: DasIstEin01Test12345Name
In B1 soll stehen Huhu01Test123 Start
Der Text ändert sich immer, aber der Anfang DasIst...
07.01.2009 08:42:07
Thread-ID: 1037441
3 Beiträge
VBA-Code in einem String erzeugen und dann ausführ
Dirk

Hallo!
Gibt es eine Möglichkeit, VBA-Code auszuführen, der in einer String-Variablen vorliegt, die zuvor dynamisch erzeugt wurde? Sprich: Ich möchte VBA-Code dynamisch erzeugen und anschließend ausführen. Geht das irgendwie?
Ich hoffe, das ist so verständlich.
Vielen Dank,
Dirk<...
20.01.2009 20:08:36
Thread-ID: 1041981
4 Beiträge
Formel Textteilstring dynamisch extrahieren
Horst_H

Hallo,
seit Stunden probiere ich bislang leider ergebnislos eine Formel zu erstellen:
Quelle:
"S2001W.rar;http://www.netload.in/dateigTTIDfQowZ/S2001W.rar.htm;93.32
MB;0;12.02.2009"
Ergebnis soll sein der string zwischen dem 1. und dem 2. Semikolon, weil die Testlänge unters...
19.02.2009 13:50:00
Thread-ID: 1052127
6 Beiträge
Userform soll Teil eines Strings in Spalte suchen
Jaffi

Hallo liebe Mitstreiter,
nun habe ich mal wieder ein Problem welches ich nicht alleine lösen kann :(
Ich möchte mithilfe einer UserFom und einer For-Schleife 3 Buchstaben bzw, Zahlen oder beides in einer Spalte suchen. Ich gebe also 3 Zeichen in die Textbox ein und die Prozedur soll nun...
11.11.2009 08:39:13
Thread-ID: 1116052
14 Beiträge
Anzeige
Teilstücke aus TextString extrahieren
chn01

Ich will in einer UserForm TextBox eine Text String einfügen, aus dem Textestücke extrahiert werden und die Teilstücke einzelnen Variablen zu zuwiesen.
TextString Beispiel mit Trennzeichen Tab:
Profil Text 174700041 2010 0,10% 5,16 5,12 0,00100
Das Ergebnis sollte dann so aussehen:...
04.11.2010 14:25:56
Thread-ID: 1185187
4 Beiträge
Anzeige
VBA: Verkettete Strings in neues Excel File
Balu

Hallo Forum,
Für jeden der a bisserl VBA kann ist das wohl ne einfache Sache aber ich bin einfach zu blöd für.
Folgendes.
In Spalte A stehen Strings die ich mit einem , verkette
In Spalte B stehen Strings die ich mit einem ; verkette
In Spalte B stehen Strings die ich mit ei...
05.11.2010 07:19:18
Thread-ID: 1185207
3 Beiträge
Länge eines gesuchten Teil eines Strings bestimmen
Holger,

Hallo liebes Forum,
langer Titel für mein Problem.
In meinem string SOMMER;HERBST;WINTER kann es auch ein Others geben
z.B SOMMER;HERBST;;WINTER oder SOMMER;HERBST;Others,WINTER.
Others kann s also in verschiedenen Schreibweisen geben (aber es kommt nur einmal vor), daher habe i...
14.02.2011 15:39:42
Thread-ID: 1200725
6 Beiträge
Mit regexp text aus Html extrahieren.
Reinhard

Hallo Wissende,
im Inernet wimmelt es von Pattern. Aber ich bin bislang unfähig die auf meinen Wunsch umzuschreiben :-(
Es liegt Htlm vor mit vielen Einträgen dieser Art:
<a href="/app/article/show/6360846"<[Team] Kommentierfunktion Facebook
</a<<span class="grey"...
14.03.2011 17:53:29
Thread-ID: 1205635
9 Beiträge
Anzeige
Per VBA , in . ändern in ersten 7-String-Zeichen
TommiH

Moin,
gibt es eine einfache Möglichkeit (einfacher als per left/mid/instr. oder split) um in den ersten 7 Zeichen einer Zelle die Kommas in Punkte zu ändern? Und das per VBA-Code?
Tommi
04.07.2011 15:34:05
Thread-ID: 1220870
3 Beiträge
Text aus Daten extrahieren
Wolfango

Hallo zusammen,
in einer einzigen Spalte stehen Einträge in der folgenden Struktur:
Bsp:
ABB, QU132M4AT,1430UPM, 7,5KW,B51
SAEW, RF63DT80N4TF, 1380/21UPM, 0,75KW,V111
ELECTRODRIVES, D132SD, 2870UPM, 5,5KW,V1234
Also immer jeweils 5 Begriffe, jeweils durch ein Komma getr...
12.03.2012 11:12:16
Thread-ID: 1254634
4 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
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