Wie man Zahlen mit VBA in Excel formatiert (3 Methoden)

  • Teile Das
Hugh West

Umsetzung von VBA-Makro ist die effektivste, schnellste und sicherste Methode, um jede Operation in Excel auszuführen. In diesem Artikel zeigen wir Ihnen, wie Sie die Nummer formatieren in Excel mit VBA .

Arbeitsbuch herunterladen

Sie können die kostenlose Excel-Arbeitsmappe für die Praxis hier herunterladen.

Zahlen mit VBA formatieren.xlsm

3 Methoden zum Formatieren von Zahlen in Excel mit VBA

Sehen Sie sich das folgende Beispiel an: Wir haben die gleichen Zahlen in beiden Säule B und C so dass wir bei der Formatierung der Zahl in Säule C wissen Sie aus dem B-Säule in welchem Format die Nummer vorher war.

1 VBA zum Formatieren von Zahlen von einem Typ in einen anderen in Excel

Zunächst sollten wir wissen, wie man die Nummer formatieren 12345 von Zelle C5 in unserem gegebenen Datensatz mit VBA zu Währung Format.

Schritte:

  • Presse Alt + F11 auf Ihrer Tastatur oder gehen Sie auf die Registerkarte Entwickler -> Visual Basic zu öffnen Visual Basic-Editor .

  • Klicken Sie im Pop-up-Codefenster in der Menüleiste auf Einfügen -> Modul .

  • Kopieren Sie den folgenden Code und fügen Sie ihn in das Codefenster ein.
 Sub NumberFormat() Range("C5").NumberFormat = "#,##0.0" 'Damit wird die Zahl 12345 in eine Währung formatiert End Sub 

Ihr Code ist nun einsatzbereit.

  • Presse F5 auf Ihrer Tastatur oder wählen Sie in der Menüleiste Run -> Run Sub/UserForm Sie können auch einfach auf die Schaltfläche kleines Play-Symbol in der Untermenüleiste, um das Makro auszuführen.

Dieser Code wird die Zahl 12345 in eine Währung formatieren mit einem Dezimalwert.

Wenn Sie das Währungssymbol in der Zelle anzeigen möchten, fügen Sie das Symbol einfach vor dem Code ein.

 Sub NumberFormat() Range("C6").NumberFormat = "$#,##0.0" 'Damit wird die Zahl 12345 in eine Währung mit $-Symbol formatiert End Sub 

Für unseren Fall haben wir die Dollar ($) Sie können jedes beliebige Währungssymbol verwenden.

Dieser Code formatiert die Zahl in eine Währung mit einem Dollar ($) Symbol.

Sie können dieses Zahlenformat auch in viele andere Formate umwandeln. Folgen Sie einfach dem nachstehenden Code, um die Zahl in das von Ihnen gewünschte Format umzuwandeln.

 Sub NumberFormat() 'Original Number 12345 Range("C5").NumberFormat = "#,##0.0" 'Damit wird die Zahl in eine Währung formatiert Range("C6").NumberFormat = "$#,##0.0" 'Damit wird die Zahl in eine Währung mit $-Symbol formatiert Range("C7").NumberFormat = "0.00%" 'Damit wird die Zahl in einen Prozentwert formatiert Range("C8").NumberFormat = "#,##.00;[rot]-#,##.00" 'Damit wird die Zahl in einenformatiert die Zahl in roter Farbe (Bedingte Formatierung) Range("C9").NumberFormat = "#?/?" 'Dies formatiert die Zahl in Brüche Range("C10").NumberFormat = "0#"" Kg""" 'Dies formatiert die Zahl mit Text Range("C11").NumberFormat = "#-#-#-#-#" 'Dies formatiert die Zahl mit Trennzeichen Range("C12").NumberFormat = "#,##0.00" 'Dies formatiert dieZahl mit Kommas und Dezimalstellen, falls zutreffend Range("C13").NumberFormat = "#,##0" 'Damit wird die Zahl in Tausender mit Kommas formatiert, falls zutreffend Range("C14").NumberFormat = "#,##0.00" 'Damit wird die Zahl in Millionen formatiert Range("C15").NumberFormat = "dd-mmm-yyyy hh:mm AM/PM" 'Damit wird die Zahl in Datum & Zeit formatiert End Sub 

VBA-Makro

Übersicht

Lesen Sie mehr: Excel Custom Number Format Multiple Conditions

2) Makro zum Formatieren eines Zahlenbereichs in Excel

Wir haben gesehen, wie Sie das Zahlenformat für eine einzelne Zelle ändern können. Wenn Sie jedoch das Format für eine Reihe von Zahlen ändern dann die VBA Die Codes sind im Wesentlichen dieselben wie im obigen Abschnitt. Diesmal müssen Sie statt einer einzelnen Zellreferenznummer innerhalb der Klammern des Range-Objekts Folgendes eingeben den gesamten Bereich durchlaufen (wie diese C5:C8) innerhalb der Klammern.

 Sub NumberFormatRng() Range("C5:C8").NumberFormat = "$#,##0.0" End Sub 

Mit diesem Code wird ein bestimmter Zahlenbereich aus Ihrem Datensatz in Excel formatiert.

Lesen Sie mehr: Wie man in Excel Zahlen in Millionen formatiert (6 Möglichkeiten)

Ähnliche Lektüre:

  • Excel Rundung auf 2 Dezimalstellen (mit Taschenrechner)
  • Wie man Negative Zahlen in Excel in Klammern setzen
  • Formatierung einer Zahl in Tausender K und Millionen M in Excel (4 Möglichkeiten)
  • Benutzerdefiniertes Zahlenformat: Millionen mit einer Dezimalstelle in Excel (6 Möglichkeiten)
  • Ändern des Zahlenformats von Komma in Punkt in Excel (5 Möglichkeiten)

3 VBA zum Konvertieren von Zahlen mit der Formatfunktion in Excel einbetten

Sie können auch die Funktion formatieren in Excel VBA Das Makro dazu lautet,

Schritte:

  • Auf die gleiche Weise wie zuvor, öffnen Sie Visual Basic-Editor von der Entwickler Registerkarte und einfügen. a Modul im Code-Fenster.
  • Kopieren Sie im Codefenster den folgenden Code und fügen Sie ihn ein.
 Sub NumberFormatFunc() MsgBox Format(12345, "#,##0.00") End Sub 

Ihr Code ist nun einsatzbereit.

Sie erhalten die formatierte Zahl in der Nachrichtenbox.

Verwandte Inhalte: Wie man in Excel Zahlen in Prozente umwandelt (3 schnelle Wege)

Schlussfolgerung

Dieser Artikel zeigt Ihnen, wie Sie die Nummer formatieren in Excel mit VBA Ich hoffe, dass dieser Artikel für Sie von Nutzen war. Wenn Sie Fragen zum Thema haben, können Sie sich gerne an mich wenden.

Hugh West ist ein äußerst erfahrener Excel-Trainer und -Analyst mit über 10 Jahren Erfahrung in der Branche. Er verfügt über einen Bachelor-Abschluss in Rechnungswesen und Finanzen sowie einen Master-Abschluss in Betriebswirtschaft. Hugh hat eine Leidenschaft für das Unterrichten und hat einen einzigartigen Lehransatz entwickelt, der leicht zu befolgen und zu verstehen ist. Seine Expertenkenntnisse in Excel haben Tausenden von Studenten und Berufstätigen auf der ganzen Welt geholfen, ihre Fähigkeiten zu verbessern und in ihrer Karriere herausragende Leistungen zu erbringen. Über seinen Blog teilt Hugh sein Wissen mit der Welt und bietet kostenlose Excel-Tutorials und Online-Schulungen an, um Einzelpersonen und Unternehmen dabei zu helfen, ihr volles Potenzial auszuschöpfen.