PLZ 5 stellig mit 0
Hallo,
ich muss immer PLZ einfügen und mache haben dann auch vorne eine 0.
Ja, ich weiß dies macht man über Sonderformat und dann PLZ.
Aber dies klappt nur wenn ich dies selber EINTIPPE !
Ich kopiere die 5 Zahlen von der PLZ aber immer, aber dann verschluckt er die 0 und stellt das Sonderformat einfach selber auf Standard um.
Antwort schreiben
Antwort 1 von rainberg vom 13.05.2022, 10:41 Options
Hallo,
formatiere die Zellen als "Text"
Gruss
Rainer
Antwort 2 von NRW- vom 13.05.2022, 10:59 Options
Dann verschwindet auch die 0
01458 PLZ er schreibt dann 1458
Antwort 3 von rainberg vom 13.05.2022, 11:24 Options
Hallo,
dann formatiere Benutzerdefiniert mit
00000
Gruss
Rainer
Antwort 4 von Hajo_Zi vom 15.05.2022, 20:39 Options
Hallo,
oder Sonderformat Postleitzahl
Gruß Hajo
Antwort 5 von KJG17 vom 16.05.2022, 00:22 Options
Moin,
Zitat:
Ich kopiere die 5 Zahlen von der PLZ aber immer, aber dann verschluckt er die 0 und stellt das Sonderformat einfach selber auf Standard um.
Für mich sieht es so aus, als ob dieses Verhalten nicht vom Format der Ziel-Felder bestimmt wird, sondern vom Format der Quelle. Ich kann das zwar mit den von mir unter Excel 2007 getesteten Konstellationen nicht nachvollziehen, es ist aber für mich dennoch die einzig mögliche Erklärung.
- Geht es hier überhaupt um MS Excel oder eine ganz andere 'Tabellenkalkulation'?
- Programmversion dieser 'Tabellenkalkulation'?
- Format der 'Datenquelle', aus welcher die PLZ in die Tabelle kopiert werden?
Gruß
Kalle
Antwort 6 von NRW- vom 16.05.2022, 09:55 Options
Hallo,
@rainberg 00000 geht auch nicht.... dann lässt er nach dem kopieren trotzdem die erste 0 weg.
@Hajo_Zi danke für die Hilfe aber meinen ersten betrag hattets du nicht gelesen ?
@KJG17 Ja, ist MS Excel 2007 !
Ich kopiere die 5 Zahlen (PLZ) aus einer e-Mail (Outlook) bekomme die e-Mail von ebay. Ist einfach wenn jemand etwas ersteigert hat.
Aus dieser e-Mail kopiere ich dann NUR die PLZ. Keine Leertaste oder sonstiges. Wenn ich es dann in Excel einfüge, lässt er einfach die erste 0 weg, obwohl es ja eigentlich als Sonderformat festgelegt ist.
Wenn ich es von Hand eintippe, dann geht es..... Aber kann ja nicht immer alles da von Hand eintippen. Wieso funktioniert das kopieren nicht ?
Bin für jede Hilfe Dankbar !
Antwort 7 von rainberg vom 16.05.2022, 10:17 Options
Hallo NRW,
habe es jetzt mal getestet und es funktioniert wie folgt.
- Zielzelle als "Text" formatieren
- Zahl aus Quelldokument kopieren
- Zielzelle markieren und "Inhalte einfügen" > "Text" > "OK" wählen
Gruss
Rainer
Antwort 8 von NRW- vom 16.05.2022, 10:30 Options
So geht es zwar sehr umständlich aber er macht an die Zelle oben links eine grüne Ecke und gibt mir die Gelbe Fehlermeldung mit dem Ausrufezeichen.
Kann man dies denn nicht einfach ganz normal kopieren ????????
Antwort 9 von rainberg vom 16.05.2022, 10:38 Options
Hallo NRW,
Zitat:
er macht an die Zelle oben links eine grüne Ecke
... deaktiviere in den Optionen die "Fehlerüberprüfung", sie ist in meinen Augen sowieso unnütz und unnötiger Ballast.
Zitat:
Kann man dies denn nicht einfach ganz normal kopieren ????????
...einen anderen Weg kenne ich nicht, Du darfst natürlich selbst forschen, ob es noch irgendwie anders geht.
Gruss
Rainer
Antwort 10 von NRW- vom 16.05.2022, 10:40 Options
Kann man nicht sagen, das wenn nur 4 Zahlen kopiert werden, das dann AUTOMATISCH die 0 angehängt wird vorne ?
Gibt es da keine Formel oder mit VBA ????
Antwort 11 von rainberg vom 16.05.2022, 11:02 Options
Hallo NRW,
muss jetzt erst mal weg.
Nur so viel, sowohl Formel als auch Makro halte ich für mindestens genau so umständlich wie "Inhalte einfügen"
Gruss
Rainer
Antwort 12 von NRW- vom 16.05.2022, 11:11 Options
Aber eine Formel oder ein Makro macht man ja nur einmal und muss es nicht jedes mal so einfügen.....
hmmmmmmmm...
Antwort 13 von fedjo vom 16.05.2022, 18:09 Options
Hallo NRW,
ein Versuch mit VBA:
Code in die Tabelle eintragen, wo die Postleitzahlen eingefügt werden.
Überprüft wird Spalte (A) ob die Postleitzahlen nur vierstellig sind.
Spalte (A) wird auf Text formatiert.
Postleitzahl wird mit einer "0" ergänzt.
Gruß
fedjo
Option Explicit
Private Sub Worksheet_Change(ByVal Ziel As Range)
On Error GoTo 10
If Ziel.Column = 1 Then
Columns("A:A").NumberFormat = "@"
If Len(Ziel) = 4 Then
Ziel = 0 & Ziel.Value
End If
End If
10
End Sub