KutoolsforOffice — Eine Lösung, fünf leistungsstarke Tools.Mehr erreichen mit weniger Aufwand.März-Aktion: 20 % Rabatt

Wie lassen sich Zahlen in einem Word-Dokument in Wörter umwandeln?

AutorSun Änderungsdatum

Dieser Artikel zeigt, wie Sie Zahlen in englische Wörter in einem Word-Dokument umwandeln können. Lesen Sie weiter, wenn Sie daran interessiert sind.

Zahl mithilfe von VBA in englische Wörter umwandeln

Zahl in Excel mit Kutools für Excel in englische Wörter umwandeln


Zahl mithilfe von VBA in englische Wörter umwandeln

1. Markieren Sie die Zahl, die Sie in Wörter umwandeln möchten, und drücken Sie Alt + F11, um das Fenster Microsoft Visual Basic for Applications zu öffnen.

2. Klicken Sie auf Einfügen > Modul, kopieren Sie den folgenden Code und fügen Sie ihn in das Modul-Skript ein.

VBA: Zahl in Wörter umwandeln

Sub ConvertNumberToWord()
'UpdatebyExtendoffice20181010
    Dim xDigit As Double
    Dim xBuff As String
    On Error Resume Next
    Selection.MoveLeft wdWord, 1, wdMove
    Selection.MoveRight wdWord, 1, wdExtend
    xDigit = Val(Trim(Selection.Text))
    If xDigit = 0 And Str(xDigit) <> Trim(Selection.Text) Then Exit Sub
    If xDigit > 999999 Then
        If xDigit <= 999999999 Then
            xBuff = Trim(Int(Str(xDigit / 1000000)))
            Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + xBuff + " \* CardText", True
            Selection.MoveLeft wdWord, 1, wdExtend
            xBuff = Selection.Text & " million "
            xDigit = Right(Str(xDigit), 6)
        End If
    End If
    If xDigit <= 999999 Then
        Selection.Fields.Add Selection.Range, wdFieldEmpty, "= " + Str(xDigit) + " \* CardText", True
        Selection.MoveLeft wdWord, 1, wdExtend
        xDigit = xBuff & Selection.Text
        Selection.TypeText xDigit + " "
    Else
        MsgBox "Number too large", vbOKOnly, "Kutool for Word"
    End If
End Sub

3. Drücken Sie die Taste F5, um den Code auszuführen. Die Zahl wurde nun in Wörter umgewandelt.
Zahl in englische Wörter umgewandelt

Hinweis: Der Code funktioniert jeweils nur für eine einzelne Zahl.


Zahl mithilfe von Kutools für Excel in englische Wörter umwandeln

Wenn Sie Zahlen in Wörter umwandeln möchten, steht Ihnen in einem Excel-Arbeitsblatt ein praktisches Werkzeug zur Verfügung – In Wörter umwandeln aus Kutools für Excel, mit dem Sie Zahlen in englische oder chinesische Wörter sowie in englische oder chinesische Währungsbeträge umwandeln können.

Kutools für Excel,mit KI ausgestattet 🤖bietet über 300 praktische Funktionen, um Ihre Aufgaben zu vereinfachen.

Nachdem Sie Kutools für Excel kostenlos installiert haben, führen Sie bitte die folgenden Schritte aus:

1. Wählen Sie die Zellen aus, die Sie in Wörter umwandeln möchten, und klicken Sie anschließend auf Kutools > Inhalt > In Wörter umwandeln.
Option „Zahlen in Wörter“ auf der Kutools-Registerkarte im Excel-Menüband

2. Aktivieren Sie im erscheinenden Dialogfeld die Optionen Englisch und Nicht in Währung umwandeln.
Dialogfeld „Zahlen in Wörter“

3. Klicken Sie auf OK oder Übernehmen, um die ausgewählten Zahlen in Wörter umzuwandeln.

Beste Office-Produktivitätswerkzeuge

Kutools für Word – Verbessern Sie Ihr Word-Erlebnis mit über 100 bemerkenswerten Funktionen!

🤖KUTOOLS KI-Funktionen: KI-Assistent / Echtzeit-Assistent / Super Polieren (Format beibehalten) / Super Übersetzen (Format beibehalten) / KI-Redaktion / KI-Korrekturlesen

📘Dokument-Meisterschaft: Seiten aufteilen, Dokumente zusammenführen, Auswahl in verschiedenen Formaten exportieren (PDF/TXT/DOC/HTML …), stapelweise in PDF konvertieren

Inhaltsbearbeitung: Stapelweises Suchen und Ersetzen in mehreren Dateien / Alle Bilder skalieren / Tabelle transponieren – Zeilen und Spalten tauschen / Tabelle in Text umwandeln

🧹Mühelose Bereinigung: Fegen Sie überflüssige Leerzeichen/Abschnittsumbruch/Textfeld/Hyperlinks/ Weitere Entfernungs-Werkzeuge finden Sie in der EntfernenGruppe …

Kreative Einfügungen: Fügen Sie Tausendertrennzeichen/Kontrollkästchen/Optionsfeld/QR-Code/Strichcode/Mehrere Bilder/ Weitere Funktionen finden Sie in der Einfügen-Gruppe …

🔍Präzisionsauswahl: Wählen Sie gezielt bestimmte Seiten, Tabellen, Formen oder Überschriftenabsätze aus – und verbessern Sie Ihre Navigation mit weiteren Auswählen-Funktionen

Hervorragende Erweiterungen: Zu beliebigen Positionen navigieren / Wiederkehrenden Text automatisch einfügen / Zwischen Dokumentenfenstern wechseln / 11 Konvertierungswerkzeuge Konvertierungs-

🌍Unterstützt über 40 Sprachen: Nutzen Sie Kutools in Ihrer bevorzugten Sprache – mit Unterstützung für Englisch, Spanisch, Deutsch, Französisch, Chinesisch und über 40 weitere!

Kutools for Word Registerkarten im Menüband
 
 

Office Tab– Bringt eine tabbasierte Oberfläche in Office und macht Ihre Arbeit viel einfacher

  • Aktivieren Sie die tabbasierte Bearbeitung und das Lesen in Word, Excel, PowerPoint, Publisher, Access, Visio und Project.
  • Öffnen und erstellen Sie mehrere Dokumente in neuen Tabs desselben Fensters – statt in separaten Fenstern.
  • Steigert Ihre Produktivität um 50 % und spart Ihnen täglich Hunderte von Mausklicks!

✨ Kutools for Office – Eine Installation, fünf leistungsstarke Werkzeuge!

Enthält Office Tab Pro·Kutools für Excel·Kutools für Outlook·Kutools für Word·Kutools for PowerPoint

📦 Alle 5 Werkzeuge in einem Paket erhalten | 🔗 Nahtlose Integration in Microsoft Office | ⚡ Zeit sparen und sofort die Produktivität steigern

Beste Office-Produktivitätswerkzeuge

Kutools für Word– 100+-Werkzeuge für Word