Sein und Schein – Formate in Excel auf Makrotasten

Excel-Tipp

Excel Zahlen-und Zellformate im Vergleich
Excel Zahlen-und Zellformate im Vergleich

Leider fehlt in Excel ein Ein-Klick-Format für Zahlen über Tausend: 1.234,56, rechtsbündig in der Zelle.  In der Start-Registerkarte, in der Gruppe Zahlenformate, finden Sie die Formate Standard und Zahl, jedoch ist bei beiden kein Tausender-Punkt standardmäßig dabei. Setzt man das Format über Rechtsklick, Formatkontextmenü, Symbol 000, so verwendet Microsoft ein rechts eingerücktes Format mit einem Platz z.B. für eine Maßeinheit​. Auch die Formate-Schnellklicks in der Formatvorlagengalerie bieten nur die eingerückten Formate.

Tipp 1 (ohne VBA)

Erstellen Sie sich einen neue Formatvorlage im Formatvorlagenkatalog. Formatieren Sie in einer beliebigen Zelle eine Zahl wie gewünscht. Öffnen Sie dann mit markierter Zelle den Katalog. In der vorletzten Zeile steht  ‚…Neue Zellenformatvorlage‘.  Benennen Sie die gewünschte Formatierung beispielsweise mit „Dezimalzahl“, klicken Sie dabei alle nicht zu beeinflussenden Formatbestandteile aus.

Das neue Format steht nun oben im Katalog in der Rubrik „Benutzerdefiniert“

Tipp 2 (mit VBA)

Um zu einem Schnellklick zu kommen, werden wir das Format in eine VBA-Codezeile schreiben und diese Prozedur mit einer Tastenkombination belegen.

Zeichnen Sie den Formatierungsvorgang als Makro auf, verwenden Sie als Zieldatei die sogenannte Persönliche Arbeitsmappe PERSONAL.XLSB und legen gleich zu Beginn die Tastenkombination STRG + <Buchstabe> fest. Oder tippen Sie in einen neuen Modul dieser Datei folgende Code-Zeilen.
Sub Dezimalformat()
' Dezimalformat Makro
' Kommazahl
' Tastenkombination: Strg+k
	' Wenn es die Formatvorlage noch nicht gibt, wie in jedem neuen Dokument
 	On Error Resume Next
 	ActiveWorkbook.Styles.Add("Dezimalzahl").NumberFormat = "#,##0.00;[Red]-#,##0.00"
 	On Error GoTo 0
    	Selection.Style = "Dezimalzahl"
End Sub

​
Speichern Sie die Prozedur und schließen Sie den VBA-Editor.

Nun rufen Sie mit Alt F8 die Liste Ihrer VBA-Prozeduren auf, suchen die Formatierungsfunktion, klicken auf die Optionen-Schaltfläche und ordnen der Prozedur die gewünschte Tastenkombination zu.
 Auch für die Schnellzugriffsleiste ist dieses Dezimalformat-Makro geeignet.