Zahlen in Excel VBA formatieren

Einführung

Zahlenformate sind wichtig beim Formatieren von Tabellen. In Excel gibt es mehrere Möglichkeiten, Zahlen in einer Zelle oder in einem Zellbereich zu formatieren.

Möglichkeit 1

Die gewünschte Zelle oder den gewünschten Zellbereich markieren

Auf die Registerkarte „Start“ klicken
In der blau markierten Registergruppe „Zahl“ auf das gewünschte Format klicken. Falls das gewünschte Format nicht angezeigt wird auf den kleinen Pfeil rechts unten klicken. Dann erscheint das in der zweiten Abbildung gezeigt Pop-Up Fenster „Zellen formatieren“.

Im Fenster „Zellen formatieren“ kann man das gewünschte Format auswählen.

Möglichkeit 2

Die gewünschte Zelle oder den gewünschten Zellbereich markieren

Auf die Registerkarte „Start“ klicken
In der blau markierten Registergruppe „Zellen“ auf den kleinen Pfeil rechts neben „Format“ klicken. Dann öffnet sich das in der zweiten Abbildung gezeigt Pop-Up Fenster. Dort uaf den blau markierten untersten Eintrag „Zellen formatieren“ klicken. Dann erscheint wieder das oben gezeigte Pop-Up Fensters „Zellen formatieren“, in dem man das gewünschte Format auswählnen kann.

In der folgenden Tabellen werden die Zahlenformate erklärt:

Zahlen in VBA formatieren

In VBA gibt es zwei Möglichkeiten Zahlen zur formatieren

Zahlen mit der Funktion „Format“ formatieren.
Die Funktion „Format“ wendet ein bestimmtes Format auf einen Ausdruck an und gibt das Ergebnis als Zeichenfolge zurück. Die Syntax ist
Format( Expression, [Format], [FirstDayOfWeek] , [FirstWeekOfYear] )
wobei
Ausdruck – Erforderlich. Gültiger Ausdruck.
Format – Optional. Ein gültiger benannter oder benutzerdefinierter Formatausdruck.
FirstDayOfWeek – Optional. Eine Konstante, die den ersten Tag der Woche angibt.
FirstWeekOfYear – Optional. Eine Konstante, die die erste Woche des Jahres angibt.
Zahlen mit der Eigenschaft „NumberFormat“ formatieren.
In VBA können Zahlenformate mit der Anweisung „Range.NumberFormat“ einstellt werden. Die Syntax ist
Ausdruck.NumberFormat
Hierbei ist „Ausdruck“ eine Variable, die ein Range-Objekt darstellt.
Beispiel

Zahlen in VBA mit der Eigenschaft NumberFormat formatieren

Beispiel für die Anwendung der Eigenschaft NumberFormat

Sheets("Tabelle1").Range("A1:A10").NumberFormat = "#,##0.00"

In der folgenden Tabelle sind Beispiel für Zahlenformate für die unterschiedlichen Kategorien gezeigt. Ist in der Spalte Anmerkung „Beispielformat“ eingetragen handelt es sich um ein Beispiel. Das genaue Format hängt von den eigenen Wünschen ab.

Anmerkungen:

Leider ist die Eigenschaft NumberFormat nicht sehr gut dokumentiert. In vielen Fällen ist der Makrorekorder eine gute Hilfe.
Beim Setzen der Eigenschaft NumberFormat lassen sich Text und Zahlenformat kombinieren. Falls eine solche Kombination gewünscht wird, gibt es zwei Möglichkeiten
– denText in doppelten Anführungszeichen eingefügen.
– den Buchstaben einen umgekehrten Schrägstrich (\) voranstellen.

Beispiel:

Sub Test_Kombination_Text_und_Zahlenformat()
Dim ws As Worksheet
Set ws = Worksheets("Text u Zahl")
ws.Cells(2, 1).NumberFormat = "General"
ws.Cells(3, 1).NumberFormat = """Die Ware kostet ""#.00 €"" bis Ende des Jahres"""
ws.Cells(4, 1).NumberFormat = "General"
ws.Cells(5, 1).NumberFormat = """Buchungsnummer: ""#"
ws.Cells(6, 1).NumberFormat = "\B\u\c\h\u\n\g\s\n\u\m\m\e\r\:\ #"
ws.Cells(7, 1).NumberFormat = "\$#,##0.00 \mill"
Set ws = Nothing
End Sub

Das Ergebnis sieht wie folgt aus: