Live-Forum - Die aktuellen Beiträge
Datum
Titel
20.04.2024 00:49:19
Excel Sheet in einen Excel Kalender einfügen
20.04.2024 00:08:11
In Ordner nur das Speichern von Dateien erlauben
19.04.2024 21:26:15
mehrfache Texte finden
19.04.2024 19:41:34
Bei VBA Ausführung Anzeige einfrieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1700to1704
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1700to1704
1700to1704
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Text zwischen zwei bestimmten Zeichen entfernen

Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 08:23:43
Tim
Hallo zusammen,
ich bin (mal wieder) auf Eure Hilfe angewiesen. Generell versuche ich mir erst einmal selber ein Makro zusammen zu stricken, in dem Fall komme ich leider nicht weiter.
Worum es geht: Ich habe einen Text, welcher wie folgt strukturiert ist ...
AA BBBBBBBBBBBBBBBBB CC
Dabei können A, B und C aus beliebig vielen Zeichen bestehen. Wichtig sind hier die Leerzeichen. Nun möchte ich, bzw. soll das Makro den Text zwischen den Leerzeichen(B) entfernen, so dass lediglich noch A und C stehen bleiben. Idealerweise mit nur noch einem Leerzeichen dazwischen, also
AA CC
Vermutlich ist es für den Profi kein großer Aufwand, aber hier komme ich leider wirklich nicht weiter.
Für jeden Tipp, Link oder sogar ein Makro bin ich Euch dankbar!
Danke vorab und viele Grüße!

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

Betreff
Datum
Anwender
Anzeige
AW: Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 08:35:00
Nepumuk
Hallo Tim,
würde ich so machen:
Public Sub Beispiel()
    Dim strText As String
    strText = "AA BBBBBBBBBBBBBBBBB CC"
    strText = Left$(strText, InStr(1, strText, " ")) & Mid$(strText, InStrRev(strText, " ") + 1)
    Debug.Print strText
End Sub

Gruß
Nepumuk
Anzeige
AW: Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 08:51:28
UweD
Hallo

Sub sdsd()
Dim TextAlt As String, TextNeu As String, Arr
TextAlt = "AA BBBBBBBBBBBBBBBBB CC"
Arr = Split(TextAlt, " ")
TextNeu = Arr(0) & " " & Arr(2)
MsgBox TextNeu
End Sub

LG UweD
AW: Text zwischen zwei bestimmten Zeichen entfernen
05.07.2019 09:08:53
Tim
Vielen vielen Dank an Euch! Es funktioniert einwandfrei! Nochmals Danke für die schnelle Hilfe! :)

327 Forumthreads zu ähnlichen Themen

Teile von Zahlen auslesen und einfügen
Zahlen

Hallo Leute,
ich habe ein Problem mit Zahlenformaten.
In meiner Tabelle steht der Text '4917234598' (natürlich viele solcher Zahlen untereinander.
Jetzt möchte ich, daß diese Zahl (später eine ganze Spalte) über Makro so aufbereitet wird, daß aus '4917234598' 017234598 wird.
08.08.2008 22:57:00
Thread-ID: 1000426
21 Beiträge
Anzeige
Formel, rechts #### bis leer Zeichen
mehmet

Hallo Forum,
in Zelle B2 habe ich z.B. "ABC 314 " stehen.
Nun möchte ich in Zelle D2 folgende String darstellen:
zähle von links vier Strings nach rechts "ABC "
mache aus "314 " nun eine vierstellige Zahl "0314 "
entferne die zwei Leerzeichen nach der Zahl "0314 ", so da...
16.09.2008 10:46:00
Thread-ID: 1009991
8 Beiträge
Alle Leerzeichen bis rechts von Ziffer löschen
Ziffer

Hallo Freaks,
ich habe in der Spalte B 1700 Zeilen, die mit Artikelbezeichnungen folgenden Musters befüllt sind:

Mein Ziel ist es, alle Leerzeichen bis auf zwei nach der letzten Ziffer und dem ersten Buchstaben zu löschen. Also ab der 11 Stelle bis zur 16 Stelle alle Leerzeichen bi...
13.12.2008 21:41:36
Thread-ID: 1032708
3 Beiträge
Anzeige
Zelle auslesen aber Blattname unbekannt !
Mandy

Hallole,
in meinem Sheet kopiere ich Tabellenblätter aus anderen Dateien. Nun will ich aus diesen Tabellenblätter eine Zelle (J5) kopieren und in mein Sheet "Page" H21 eintragen.
Das Problem: ich weiss nicht, in welchem der kopierten Tabellenblätter die Information steht und wie das Ta...
10.02.2009 09:14:14
Thread-ID: 1048897
4 Beiträge
zellenwerte auslesen und Tabellarisieren
Marko

Hallo,
ich bräuchte ein Makro das nach dem Starten den Wert der in Tabelle 1 A1 steht in Tabelle 2 schreibt.
Das soll er dann alle 5 Sekunden wiederholen.
So das ich in Tabelle 2 eine Liste erhalte mit den werten aus Tabelle 1 A1
Kann mir jemand dabei helfen?
Gruß
Marko<...
25.02.2009 15:39:44
Thread-ID: 1054007
4 Beiträge
Leerzeichen löschen in allen Tabellen und Zellen?
dieter(drummer)

Excel gut ist übertrieben!
Hi VBA Profis,
ich suche eine VBA Lösung, die in allen Zellen, in allen Tabellen der aktiven Arbeitsmappe, die NUR EIN LEERZEICHEN drin haben, das LEERZEICHEN löscht. Dann soll die Zelle leer sein.
Zellen, die einen anderen Inhalt haben, z. B. Text und Za...
13.03.2009 09:32:28
Thread-ID: 1059743
11 Beiträge
Minimum suchen, Wert von Spalte rechts wiedergeben
Spalte

Hallo miteinander
Ich hätte folgendes Problem...
Ich das Minimum der Spalte A suchen und dann den Wert von Spalte B widergeben, der in der gleichen Zeile wie das gefundene Minimum steht. Wie mach ich das am Besten?
Vielen Dank für eure Hilfe und einen schönen Tag!
Gruss Jan
02.06.2009 10:06:24
Thread-ID: 1078554
4 Beiträge
Macro gesucht Text teilen ab Zeichen "-"
Tom

Liebes Forum,
ich suche ein Macro welches mir alle Zeichen links vom "-" (Minus) in eine neue Spalte B und alle Zeichen rechts vom Minus in die neue Spalte C kopiert. Das "-" (Minus) kann ggf. öfter vor kommen, ich möchte es nur auf das erste von links beziehen.
Konkret
Textxyz 79.x...
06.07.2009 12:18:48
Thread-ID: 1086596
2 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
20
2
7
2
4
3
3
10
3
1
8
3
3
1
1
4
2
3
2
2
2
5
8
2
9