Live-Forum - Die aktuellen Beiträge
Datum
Titel
17.10.2025 17:57:35
Zellen-Name aus A1 nach H1 übertragen mit Prä- + Suffix
17.10.2025 11:36:58
verschachteltes Dropdown-Menü
17.10.2025 10:28:49
Call Anweisung
16.10.2025 18:38:17
Zusammenfassung nach Personalnummer
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
1980to1984
1980to1984
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

String ab bestimmten Wort kürzen

Forumthread: String ab bestimmten Wort kürzen

String ab bestimmten Wort kürzen
05.06.2024 08:14:15
Urmila
Hallo liebe Community,

ich hoffe ihr könnt mir weiterhelfen.

Ich lese den Zellinhalt in einem String ein, dieser ist unterschiedlich lang. Dabei will ich den String ab einem bestimmten Wort gekürzt haben, z.B.

"...Montag x-beliebiger Text gebucht am: 05.06.2024 um 08:10 Uhr ..."

Ab (und inklusive) dem Wort "gebucht am" soll alles gelöscht werden.

Habe es wie folgt aufgebaut, komme aber (wie ihr sieht) nicht weiter: 

Dim strText as String

strText = ActiveSheet.Range("B14").Value

MsgBox Split(strText, "gebucht am")


LG
Urmila
Anzeige

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: String ab bestimmten Wort kürzen
05.06.2024 08:19:55
Oberschlumpf
Hi,

anstelle von... 
MsgBox Split(strText, "gebucht am")

...versuch es mit... 
MsgBox Split(strText, "gebucht am")(0)

...so zumindest wird erst mal nur in der MsgBox dein Wunschtext angezeigt, aber in Zelle B14 steht natürlich weiterhin der ganze Text.
Kommst du nun weiter?

Ciao
Thorsten
Anzeige
AW: String ab bestimmten Wort kürzen
05.06.2024 08:29:52
Urmila
Hallo Thorsten,

unglaublich, eine kleine Ergänzung und schon klappts :D

Nur eine Sache: ich habe festgestellt, dass es möglich ist, dass zwischen "gebucht" und "am" keine Leerstelle gibt.
Ist emöglich, dass man alles ab "gebucht" löscht

Das * funktioniert leider nicht: 

Dim strText As String

strText = "Montag x-beliebiger Text gebucht am: 05.06.2024 um 08:10 Uhr"

MsgBox Split(strText, "gebucht*")(0)


LG
Urmila
Anzeige
AW: String ab bestimmten Wort kürzen
05.06.2024 08:37:45
Oppawinni
Wenn in deinem "x-beliebigen Text" nicht nochmal "gebucht" vorkommt, dann sollte es genügen, wenn du
den Split über "gebucht" machst
MsgBox Split(strText, "gebucht")(0)
AW: String ab bestimmten Wort kürzen
05.06.2024 08:50:57
daniel
Hi
"gebucht am" ist ja hier das Trennzeichen.
du kannst hier auch genauso nur "gebucht" als Trennzeichen verwenden.
Gruß Daniel
Anzeige
AW: String ab bestimmten Wort kürzen
05.06.2024 08:28:47
daniel
Hi
alternativ zu Split auch:

=Left(strText, Instr(strText, "gebucht am") - 1)

das erzeugt allerdings einen Fehler, wenn "gebucht am" nicht im Text vorkommt
mit der split-Lösung bekommst du dann den ganzen Text

Gruß Daniel
AW: Danke an Allen, funktioniert jetzt einwandfrei
05.06.2024 08:40:27
Urmila
LG
Urmila
;

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