Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
1508to1512
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
Inhaltsverzeichnis

Wort aus String herausschneiden

Wort aus String herausschneiden
05.08.2016 20:06:12
Matthias
Hallo zusammen,
ich hätte da eine kleine Frage, da ich zu blöd bin mit VBA umzugehen:
Wie schaffe ich aus einem String der so aussieht:
Text (Name - Ort)
nur den Namen und Ort in jeweils eine Variable zu schreiben?
Hier soll bspw. in einer Variable später nur "Müller" stehen:
Aufgabe 1 erledigt (Müller - Berlin)
Text, Name und Stadt kann immer unterschiedlich lang sein, daher kann man sich nur an den Zeichen orientieren.
Mit Left und Right komme ich ganz gut klar aber mittendrin ein Wort herausschneiden und sich dabei an den Zeichen links und rechts vom Wort zu orientieren überfordert mich.
Bitte helft mir! Danke!

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Wort aus String herausschneiden
05.08.2016 20:21:18
Daniel
Hi
da gibst verschiedene Methoden.
die klassische wäre, die Position von "(" und "-") zu ermitteln und dann mit der MID-Funktion den Teiltext auschneiden:
Text = "Aufgabe 1 erledigt (Müller - Berlin)"
Pos1 = Instr(Text, "(") + 1
Pos2 = Instr(Text, "-")
Name = Trim (Mid(Text, Pos1, Pos2 - Pos1))
eine andere Möglichkeit wäre, die Trennzeichen (, - und ) zu vereinheitlichen, damit du den Text in ein Array zerlegen kannst. Im array kannst du dann die Teiltexte über die Indexnummer auswählen:
Text = "Aufgabe 1 erledigt (Müller - Berlin)"
Text = Replace(Text, "(", "-")
Text = Replace(Text, ")", "-")
TeilTexte = Split(Text, "-")
Name = TeilTexte(1)
Ort = TeilTexte(2)
Gruß Daniel
Anzeige
AW: Wort aus String herausschneiden
05.08.2016 21:00:15
Matthias
Daniel! Der Wahnsinn!! Vielen Dank für deine Mühe!
Danke Danke Danke!

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige