Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.10.2025 21:57:06
Diagrammpunkte in unterschiedlichen Farben je nach Wert
19.10.2025 18:21:56
Prüfen, ob Bild geladen wurde
19.10.2025 15:24:14
VBA -Drucken nur, wenn ich mit bestimmtem WLAN verbunden bin
19.10.2025 10:48:58
Zufällige Uhrzeit
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
776to780
776to780
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Leerzeichen

Forumthread: Leerzeichen

Leerzeichen
26.06.2006 09:01:12
Heiko
Hallo,
ich habe eine Liste mit Telefonnummern und möchte aus der Liste alle Schrägstriche entfernen ohne das die führende Null verloren geht. Mit "Ersetzen" geht der Schrägstrich weg aber auch die führende Null.
Danke
Heiko
Anzeige

4
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Leerzeichen
26.06.2006 09:34:09
Werner
Hallo Heiko
Du kannst nicht den Schrägstrich durch nichts ersetzen.
Bei Ersetzen durch: musst du schon ein LEERSCHLAG eingeben.
Gruss Werner
AW: Leerzeichen
26.06.2006 09:37:15
Harald
Hallo Heiko,
nach dem Löschen der Schrägstriche erkennt Excel die Zelle als Zahl un unterdrückt daher führende Nullen. Man muss also Excel erst beibringen, die Zelle als TExt zu behandeln (Zahlenformat "Text" genügt leider nicht).
Folgendes Makro tut's:
---------------------------

Sub test()
Dim zelle As Range
For Each zelle In Selection
zelle = "'" & zelle.Text
zelle.Replace What:="/", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next
End Sub

---------------------------
Alle Zellen im selektierten Bereich werden entsprechend umgewandlet, also erst selektieren, dann Makro aufrufen.
Gruß Harald
Anzeige
@ Harald Kapp
26.06.2006 09:48:34
Heiko
Hallo Harald,
bei mir tuts auch nur das formatieren als Text, (XP und EXCEL 2002)

Sub Testen1()
Dim zelle As Range
For Each zelle In Selection
zelle.NumberFormat = "@"
zelle = Replace(zelle, "/", "")
Next
End Sub

Gruß Heiko (Nicht der Frager !!!)
Anzeige
AW: Leerzeichen
26.06.2006 09:49:35
Heiko
Hallo Harald,
vielen Dank für die Antwort, hat geklappt!
Gruß
Heiko Ewen
;

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