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
1992to1996
1992to1996
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Leerzeichen im Zelleninhalt löschen

Forumthread: VBA Leerzeichen im Zelleninhalt löschen

VBA Leerzeichen im Zelleninhalt löschen
01.10.2024 13:07:15
kackei
Moin,

ich habe einen Zelleninhalt, der wie folgt ausschaut.
"
Text

Text, Text

Text
"

Über Columns("BY:BY") = Application.Substitute(Columns("BY:BY"), Chr(10), "") steht in der Zelle folgendes:
"
Text
Text, Text
Text
"

Mein Problem, wenn ich mir in den Zellinhalt im Bearbeitungsbereich anschaue, dann stehe dort:
"
Text

Text, Text

Text
"

Wenn ich nun mit der Maus den Bearbeitungsbereich anklicke, sieht man als angezeigten Text den Inhalt in der ursprünglichen Version (siehe oben). Lasse ich den Code noch einmal drüberlaufen, dann ist der Inhalt auch im Bearbeitungsbereich wie folgt. Ich muss aber jede Zelle einmal im Bearbeitungsbereich angeklickt haben, damit ich den eigentlich gewünschte Inhalt erhalte.
"
Text
Text, Text
Text
"

Kann sein, dass ich die Substitute-Funktion nicht ganz richtig verstanden habe, aber eigentlich müssten doch Value und Text geändert und die Leerzeichen entfernt werden, oder? Habt ihr eine Alternatividee?

Grüße und Dank aus Ostfalen.
Anzeige

7
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Leerzeichen im Zelleninhalt löschen
01.10.2024 13:36:30
Yal
Hallo Kai,

ungetestet: 
Sub Split()

Dim Arr

Dim i

    Arr = Columns("BY:BY").Values

    For i = LBound(Arr, 1) To UBound(Arr, 1)

        Arr(i, 1) = WorksheetFunction.Trim(WorksheetFunction.Substitute(Arr(i), Chr(10), ""))

    Next

    Columns("BY:BY").ClearContents

    Columns("BY:BY").Value = Arr

End Sub


VG
Yal
Anzeige
AW: VBA Leerzeichen im Zelleninhalt löschen
02.10.2024 00:06:10
Kuwer
Hallo kackei,

vielleicht so: 
Sub aaa()

  With Range("BY:BY")

    .Replace Chr(10), ""

    .Copy

    .PasteSpecial xlPasteValues

  End With

End Sub

Gruß, Uwe
AW: VBA Leerzeichen im Zelleninhalt löschen
02.10.2024 06:54:18
kackei
Moin Uwe,

dein Code funktioniert grundsätzlich auch. Danek für die Idee. Ich muss aber tatsächlich Chr(13) nehmen, damit er in deiner Idee auch bei mir funktioniert. Ich habe mich letztlich aber für die kurze Variante entschieden ;)

Grüße.
Anzeige
AW: VBA Leerzeichen im Zelleninhalt löschen
01.10.2024 15:30:24
kackei
Hallo Val,

gute Idee, aber ich fürchte Excel/ VBA erkennt das Leerzeichen / den Zeilenumbruch nicht. Ich habe bei einer entsprechenden Zelle mal ausgelesen, was das erste Zeichen ist und mir wurde

wert = "

angezeigt. Die Msgbox zeigt Leere, da lässt sich aber natürlich nicht sagen, ob nicht ein Leerzeichen anzeigt wird. Lese ich den Inhalt der Zelle aus, bleibt es dabei:

"
oder ggf. auch ein
oder ggf. auch ein
Text
oder ggf. auch ein
"

Mir scheint, dass das vielleicht gar nichts mit VBA zu tun hat? Ansonsten funktioniert das mit Trim. Mich wundert, dass die Leerzeichen / der Zeilenumbruch lediglich in der Bearbeitungszeile, nicht aber in der Zelle selbst angezeigt wird, von VBA aber tatsächlich erkannt wird.

Grüße
Anzeige
AW: VBA Leerzeichen im Zelleninhalt löschen
01.10.2024 16:12:51
Yal
Neben chr(10) könnte auch chr(13) relevant sein.

VG
Yal
AW: VBA Leerzeichen im Zelleninhalt löschen
02.10.2024 06:52:25
kackei
Moin Val,

Chr(13) ist tatsächlich die Lösung gewesen. Musste auch erst einmal nachschauen, wofür das Zeichen steht. Bin aber nicht wirklich schlauer geworden ... Hat mir aber geholfen, vielen Dank dafür.

Grüße.
AW: VBA Leerzeichen im Zelleninhalt löschen
02.10.2024 12:22:01
daniel
Hi
die Steuerzeichen kommen aus der alten Fernschreiberzeit, als man eine mechanische Schreibmaschine als Ausgabemedium verwendet hat.

dabei gab es zwei Befehle: den LineFeed (Zeichen 10 / Zeilenvorschub) welches das Papier weiter gedreht wurde, so dass das nächste Zeichen in eine neue Zeile geschrieben wurde und den CarrigdeReturn (Zeichen 13 / Wagenrücklauf), welches die Eingabe des nächsten Zeichens wieder an den linken Rand gebracht hätte.
für eine echte neue Zeile benötigte man damals beides, ein LineFeed allein hätte einen Treppenartigen Text zur Folge gehabt, ein CarridgeReturn alleine hätte zur Folge gehabt, dass dieselbe Zeile immer wieder überschrieben wird.
daher ist in den meisten importierten Texten die Kombination aus Zeichen 13 und Zeichen 10 zu finden (in VBA gibt es dafür auch eine Konstante vlCrLf)
innerhalb der Excelzelle jedoch reicht das Zeichen 10.

Gruß Daniel
Anzeige
;

Forumthreads zu verwandten Themen

Leerzeichen links aus TextBox entfernen
Lenni

Moin Excellianer!
Wie kann man in einer TextBox (in einem UserForm) Leerzeichen links des ersten Wortes so rausfiltern, dass der TB-Eintrag wirklich mit einem Zeichen beginnt? ...und keinem Leerzeichen.
Vielen Dank für Eure Hilfe!
Viele Grüße aus dem hohen Norden!
Lenni
19.02.2009 21:58:00
Thread-ID: 1052293
5 Beiträge
gewisse sonderzeichen aus zelle entfernen
Tobias

Hallo allerseits,
Ich würde gerne ein gewisses sonderzeichen aus einer zelle entfernen
nämlich dieses: •
If ((cells(i,2) = ?) then ' wenn die zelle dieses zeichen enthält
cells(i,2) = ? ' entfernen
End if
Was muss ich in diesen code einb...
28.02.2009 15:56:56
Thread-ID: 1055091
8 Beiträge
Zugriff auf auf Teilinhalte einer Zelle
Der

Hallo da Draußen!
Habe mal wieder ein Problem mit meiner VBA Programmierung. Ich möchte innerhalb einer Exceltabelle auf einzelne Zellen zugreifen, die ein bestimmtes Merkmal haben. Der Inhalt der Zelle beginnt mit einer Zahl (in diesem fall mit einer Postleitzahl). Ich möchte also meine Ab...
20.03.2009 14:52:09
Thread-ID: 1062230
5 Beiträge
Teil einer Formel in Zelle einlesen
Bernd

Hallo Freaks,
ich bastle nun schon geraume Zeit an einem Code, der mir in eine Zelle den Teil einer Formel (Kostenstellennamen) aus einer anderen Zelle schreibt.
Der nachstehene Code (von einem ausgeschiedenen Kollegen) ersetzt einen KST-Namen in einem Link mit einem neuen KST-Namen aus...
13.04.2009 12:55:24
Thread-ID: 1068432
6 Beiträge
Formel zum entfernen von Leerzeichen
Leerzeichen

Hallo zusammen,
ich habe folgendes Problem und es wäre toll wenn mir jemand helfen könnte:
Ich habe in Spalte C2 mehrere Werte (z.B. 3; 4; 5) die durch ";" getrennt sind. Zwischen dem ";" und den Werten ist jeweils ein Leerzeichen.
Nun hätte ich gerne in C3 die selben Werte, ebenfa...
16.04.2009 09:58:49
Thread-ID: 1068995
5 Beiträge
Die ersten 2 Zeichen entfernen
MikeM

Hallo,
ich suche nach einer Möglichkeit per FORMEL die ersten 2 Zeichen eines Textes zu löschen.
Z.B.:
ABCDE soll werden: CDE
ABCD soll werden: CD
Text in Spalten ist klar, will das aber per Formel machen.
Und um das ganze noch einfacher zu machen: Die ersten beiden Z...
20.04.2009 08:53:00
Thread-ID: 1069716
7 Beiträge
Anzeige
Ein Teil einer Formel in andere Zelle ausgelagern
Hans

Ein Teil der Formel – der immer gleich ist - soll in eine andere Zelle ausgelagert werden. Ist die möglich, gibt es hierfür eine spezielle Funktion?
=WENN(E25=5;SVERWEIS(Rechn.!C25;'C:\Ornder\[dateiname.xls]tabelle'!$A$2:$B$17128;2;FALSCH);"")
=WENN(E25=5;SVERWEIS(Rechn.!C25; Verweis au...
14.06.2009 21:29:10
Thread-ID: 1081465
2 Beiträge
summewenn + Bedingg. "die ersten 5 linken Zeichen"
Matthias

Hallo zusammen,
ich möchte die ersten 5 linken Zeichen (Text) einer Zelle auswerten. Wenn ein Kriterium erfüllt ist, soll summiert werden.
Das Kriterium besteht aus Text. Die Länge kann variieren.
Für Anregungen für eine korrekte Formel bin ich dankbar :-).
TIA und Grüße
Mat...
01.07.2009 12:35:51
Thread-ID: 1085662
3 Beiträge
Anzeige
Teilbereich aus einer Zelle
MikeM

Hallo zusammen,
eigentlich trivial aber ich bekomme es nicht hin.
In Zelle A1 steht: Datum: 01.01.2009
In A2 möchte ich stehen haben: 01.01.2009
Allerdings kann in A1 auch: 1.1.09 stehen
Die Formel: rechts(A1;10) würde funktionieren, wenn das Datum nicht auch im Format 1.1....
21.07.2009 08:16:34
Thread-ID: 1090112
4 Beiträge
Verteilung des Inhalts einer Zelle auf zwei Zellen
Jeanette

Hallo, gegeben eine Tabelle mit einer Spalte, die Informationen in folgender Form enthält:
1. Ein Wort oder mehrere Wörter, die durch Blank getrennt sind.
2. Unmittelbar auf das letzte dieser Wörter folgt ein Komma, gefolgt von einem Blank.
3. Danach öffnet sich eine Klammer „(„.
20.08.2009 16:33:59
Thread-ID: 1097466
5 Beiträge
Zellinhalte ab erstem Leerzeichen löschen
Kai

Hi,
wie kann ich den per Makro eine Spalte H bearbeiten und dort alle Inhalte , die in einer Zelle ab dem ersten Leerzeichen kommen, löschen, Wenn der inhalt mit "A" beginnt
Beispiel:
aus "A blablabla" soll "A" werden
aus "Antwort 5" soll "Antwort" werden
Aber wie ges...
11.09.2009 13:03:11
Thread-ID: 1101999
10 Beiträge
Zelle auslesen und aufteilen
Georg

Hallo Zusammen,
ich lese bereits Dateinamen in jeweils einzelne Zellen ein. In diesen steht dann folgendes Format, welches ich zerlegen möchte.
es sollte jeweils beim "_" geteilt werden und in eine eigene Zelle geschrieben werden.
Es gibt zwar sehr viele Beiträge zu diesem Thema, ab...
10.10.2009 11:04:07
Thread-ID: 1108706
8 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