PLZ 5 stellig mit 0

Question

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.

Answer 1

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

Answer 2

Aber eine Formel oder ein Makro macht man ja nur einmal und muss es nicht jedes mal so einfügen.....

hmmmmmmmm...

Answer 3

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