Zellen formatieren
11.05.2004 11:55:36
Brillo
Josef hat mir weiter unten im Forum bereits eine Antwort zu meiner Frage
Zellen formatieren geschrieben.
Leider kann ich damit nix anfangen.
Ich kann mit VBA überhaupt nix anfangen.
Kann mir jemand (vielleicht Josef *fg) genau erklären wo und wie ich diesen Code
eingeben muß ? Was z.B ist der Tabellenreiter ?
Vielen Dank schon mal.
Gruß Erik
Josef schrieb:
Hallo Erik!
Das geht am einfachsten mit VBA!
Rechtsklick auf den Tabellenreiter > Code anzeigen und
im Rechten Fenster des VBA-Editors diesen Code einfügen.
Private Sub Worksheet_Change(ByVal Target As Range)
'gültig in Spalte "A" (.Column = 1), sonst anpassen
If Target.Column = 1 And Len(Target) = 10 Then
Application.EnableEvents = False
Target = Left(Target, 3) & "/" & Mid(Target, 4, 2) & "R" & Mid(Target, 6, 2) & " " & UCase(Right(Target, 3))
Application.EnableEvents = True
End If
End Sub
Gruß Sepp