Google Groups no longer supports new Usenet posts or subscriptions. Historical content remains viewable.
Dismiss

Entfernen von Leerzeichen

4 views
Skip to first unread message

Markus Hofer

unread,
Sep 5, 2003, 5:48:46 AM9/5/03
to
Hallo NG!

Ich möchte Daten aus dem Web importieren (Datums- und Zahlenformat).
Die importierten Daten haben in der Zelle dann jeweils ein Leerzeichen
am Anfang und am Ende (Format "_xxx,xx_" oder "_xx.xx.xxxx_"), weswegen
ich dann nicht damit rechnen kann.
Wie kann ich diese Leerzeichen entfernen? (Die GLÄTTEN-Funktion geht
leider nicht, die findet nur Leerzeichen IM String)

Lg, Markus


Susanne Gann

unread,
Sep 5, 2003, 6:03:11 AM9/5/03
to
Hallo Markus,

> Die importierten Daten haben in der Zelle dann jeweils ein Leerzeichen
> am Anfang und am Ende (Format "_xxx,xx_" oder "_xx.xx.xxxx_"), weswegen
> ich dann nicht damit rechnen kann.

ich habe dafür mal ein Add-In gemacht (siehe Extrem-Trim)

http://0711office.de/excel/xla/default.htm

Grüße aus Stuttgart

Susanne Gann

http://0711office.de
Seminare und Erweiterungen für Microsoft Office


Alexander Wolff

unread,
Sep 5, 2003, 6:20:29 AM9/5/03
to
=WERT(WECHSELN(DeineZelleMitLeerzeichen;" ";""))

Gruß Alexander


Markus Hofer <mac*nospam*@hoefi.com> schrieb in im Newsbeitrag:
3f585c06$0$16030$3b21...@aconews.univie.ac.at...

Tim Brandt

unread,
Sep 5, 2003, 6:21:15 AM9/5/03
to
Moin Markus,

probiere mal folgendes: kopiere eine leere Zelle, markiere den Bereich mit
den betreffenden Zellen und wähle unter 'Inhalte einfügen' - 'addieren' aus.

--
Gruß aus dem Land Brandenburg

Tim Brandt
_________________________________
Excel 2000 SR-1 / OfficeProf. 2000 SP-2


Markus Hofer

unread,
Sep 5, 2003, 6:38:49 AM9/5/03
to

"Alexander Wolff" <cfa...@gmx.de> schrieb im Newsbeitrag
news:bj9o1i$gu2n5$1...@ID-89721.news.uni-berlin.de...

> =WERT(WECHSELN(DeineZelleMitLeerzeichen;" ";""))

Habe ich mir auch schon gedacht, funktioniert aber komischerweise nicht,
trotzdem danke.

Lg, Markus

Markus Hofer

unread,
Sep 5, 2003, 6:37:29 AM9/5/03
to
"Tim Brandt" <tim.b...@imail.de> schrieb im Newsbeitrag
news:ew9HNe5c...@tk2msftngp13.phx.gbl...
Hallo Tim!

> probiere mal folgendes: kopiere eine leere Zelle, markiere den
> Bereich mit den betreffenden Zellen und wähle unter 'Inhalte
> einfügen' - 'addieren' aus.

Ging leider nicht, da er mit den Zahlen nicht rechnen kann.

> Gruß aus dem Land Brandenburg

Gruß aus Vorarlberg,
Markus

Markus Hofer

unread,
Sep 5, 2003, 6:40:26 AM9/5/03
to

"Susanne Gann" <ga...@0711office.de> schrieb im Newsbeitrag
news:eQ1vNY5...@TK2MSFTNGP11.phx.gbl...

> ich habe dafür mal ein Add-In gemacht (siehe Extrem-Trim)
>
> http://0711office.de/excel/xla/default.htm

Eigentlich wollte ich das ohne Add-In oder Makro lösen, scheint aber
nicht zu gehen...
Vielen Dank für die Hilfe,

Markus

Alexander Wolff

unread,
Sep 5, 2003, 6:59:09 AM9/5/03
to
Dann nimm Deinen String auseinander:

Kopiere von B13:B40 unter Deine Zelle B12 folgende Formel runter:
=CODE(TEIL($B$12;ZEILE()-ZEILE($B$12);1))

Kommt eine andere Zahl als 32 für ein Leerzeichen dabei raus, liegt
es wohl daran. Wenn es nur eine ist:

=WERT(WECHSELN(B12;ZEICHEN(<AndereZahlAls32>);""))

<...> mußt Du selbst ersetzen!

Sind es viele mögliche andere Zeichen, solltest Du eine VBA-Routine
bemühen.

Gruß Alexander

Markus Hofer <mac*nospam*@hoefi.com> schrieb in im Newsbeitrag:

3f586822$0$18038$3b21...@aconews.univie.ac.at...

Marco Maetzler

unread,
Sep 5, 2003, 7:00:50 AM9/5/03
to
Hallo Markus,

Du könntest dir ein Makro schreiben, welches dann alle Leerzeichen mittels
Trim() löscht.
Allerdings muss du dann jedes mal das Makro starten.

Gruss,
Marco


Alexander Wolff

unread,
Sep 5, 2003, 7:10:23 AM9/5/03
to
http://excelformeln.de/formeln.html?welcher=103

gibt dazu folgende Formel heraus:

{=SUMME((TEIL(0&A1;KGRÖSSTE(WENN(ISTZAHL(TEIL(0&A1;ZEILE(1:256);1)*1
);ZEILE(1:256);1);ZEILE(1:256));1)*1)*10^(ZEILE(1:256)-1))}

Bei fester Dezimalstelle 2 wäre die entstehende Zahl noch durch 100
zu teilen.

Die Formel selbst ist ohne {} mit Strg-Umschalt-ENTER abzuschließen
(Array- bzw. Matrixformel)

Gruß Alexander

Alexander Wolff <cfa...@gmx.de> schrieb in im Newsbeitrag:
bj9qa6$gudf6$1...@ID-89721.news.uni-berlin.de...

Thomas Ramel

unread,
Sep 5, 2003, 8:09:36 AM9/5/03
to
Grüezi Markus

Markus Hofer schrieb:

Hmmm; vielleicht so?

Zelle/Spalte markeiren --> Menü Bearbeiten --> Ersetzen --> Ersetzen von:
(leerzeichen eingeben) --> Durch: 'Nichts' --> [Alle ersetzen]

--
Mit freundlichen Grüssen

Thomas Ramel
- MVP für Microsoft-Excel -

[Win 2000Pro SP-4 / xl2000 SP-3]

Markus Hofer

unread,
Sep 5, 2003, 10:17:51 AM9/5/03
to

"Thomas Ramel" <t.r...@mvps.org> schrieb im Newsbeitrag
news:3F587D00...@mvps.org...
Hallo Thomas!

> Hmmm; vielleicht so?
>
> Zelle/Spalte markeiren --> Menü Bearbeiten --> Ersetzen --> Ersetzen
von:
> (leerzeichen eingeben) --> Durch: 'Nichts' --> [Alle ersetzen]

Ging auch nicht, ebensowenig die Trim-Funktion...
Wenn ich aber den Wert der Zelle mit einem Makro einlese, dort mit 1
multipliziere und dann zurückschreibe, funktioniert es (zumindest die
Zahlenwerte). Werde ich es halt so machen.

Danke für die Hilfe,
Markus

Eberhard Funke

unread,
Sep 5, 2003, 10:57:55 AM9/5/03
to
"Markus Hofer" <mac*nospam*@hoefi.com> schrieb:

Hallo Markus,

das geht mit Bearbeiten --> Ersetzen.
Gib bei "Suchen nach" ein Leerzeichen ein und klicke auf "alle
erstetzen".
--
Als XL-Lehrling grüsst
Eberhard mit XL 2000

Thomas Sohst

unread,
Sep 8, 2003, 6:17:45 AM9/8/03
to
Moin,
hatte mal ein ähnliches Problem, finde nur die Lösung jetzt nicht so
schnell.
Das Leerzeichen sah nur wie ein Leerzeichen aus, tatsächlich handelte es
sich um das ASC-Zeichen 160 - danach suchen und ersetzen.
Gruß
Thomas

"Markus Hofer" <mac*nospam*@hoefi.com> schrieb im Newsbeitrag
news:3f585c06$0$16030$3b21...@aconews.univie.ac.at...

0 new messages