"Ersetze durch" ändert Formate

Bild

Betrifft: "Ersetze durch" ändert Formate
von: Manfred
Geschrieben am: 29.10.2015 14:23:05

Hallo Excelfreunde,
wie kann ich verhindern, das beim Ersetzen die Formate geändert werden?
Ich möchte folgendes erreichen:
In Spalte A stehen Telefonnummern in folgendem Format
+49 xxx xxxxxxx
Jetzt möchte ich die Leerzeichen entfernen, aber das Pluszeichen soll erhalten bleiben.
Das ist mein VBA das ich verwende:
Columns("A:A").Select
Selection.Replace What:=" ", Replacement:="", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Application.CutCopyMode = False
Nur wird mir hier das Pluszeichen entfernt.
Kann mir bitte jemand helfen, wie ich das verhindern, bzw richtig machen kann.
Gruß Manfred

Bild

Betrifft: AW: "Ersetze durch" ändert Formate
von: Rudi Maintaire
Geschrieben am: 29.10.2015 15:02:50
Hallo,
vorher die Spalte als Text formatieren.
columns("A:A").numberformat="@"
Gruß
Rudi

Bild

Betrifft: AW: "Ersetze durch" ändert Formate
von: Manfred
Geschrieben am: 29.10.2015 15:28:25
Hallo Rudi,
macht Excel nicht. es steht dann überall 4,9431E+11 in den Zellen drin.
Gruß Manfred

Bild

Betrifft: AW: "Ersetze durch" ändert Formate
von: fcs
Geschrieben am: 29.10.2015 15:07:19
Hallo Manfred,
erstze erst "+" durch "'+"
dann in einer 2. Erstzung die Leerzeichen dirch einen Leerstring
Gruß
Franz

Bild

Betrifft: AW: "Ersetze durch" ändert Formate
von: Manfred
Geschrieben am: 29.10.2015 15:31:45
Hallo Franz,
auch bei deiner Version verfschwindet das Pluszeichen.
Gruß Manfred

Bild

Betrifft: klappt wunderbar, danke (owT)
von: Manfred
Geschrieben am: 29.10.2015 15:34:46


 Bild

Beiträge aus den Excel-Beispielen zum Thema ""Ersetze durch" ändert Formate"