Note: The other languages of the website are Google-translated. Back to English

Word文書で数字を単語に変換する方法は?

この記事では、Word文書で数字を英語の単語に変換する方法について説明しています。興味がある場合は、詳細を表示してください。

VBAで数値を英語の単語に変換する

Kutools forExcelを使用してExcelで数値を英語の単語に変換する


VBAで数値を英語の単語に変換する

1.単語に変換する数値を選択し、を押します Altキー+ F11 開くキー アプリケーション向け Microsoft Visual Basic 窓。

2。 クリック インセット > モジュール、以下のコードをコピーして、 モジュール スクリプト。

VBA:数値を単語に変換する

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。 押す F5 コードを実行するためのキー。これで、数値が単語に変換されました。
ドキュメント番号からワード1

注意:コードは毎回XNUMXつの番号でのみ機能します。


Kutools forExcelで数値を英語の単語に変換する

Excelシートで数字を単語に変換したい場合は、便利なツールがあります- 数字から言葉へ 数字を英語または中国語の単語に変換したり、数字を英語または中国の通貨に変換したりできるKutools forExcelの

Kutools for Excel, 以上で 300 便利な機能は、あなたの仕事をより簡単にします。 

後の 無料インストール Kutools for Excel、以下のようにしてください:

1.数値を単語に変換するセルを選択し、[ クツール > コンテンツ > 数字から言葉へ.
ドキュメント番号からワード1

2.ポップダイアログで、チェックします 英語 及び 通貨に変換されません オプション。
ドキュメント番号からワード1

3。 クリック Ok or お申し込み、選択した数字が単語に変換されます。


推奨される単語生産性ツール

 

Kutools For Word-100を超えるWordの高度な機能で50%の時間を節約

  • 複雑で繰り返される操作は、数秒でXNUMX回の処理で実行できます。
  • 複数の画像をフォルダ間でWord文書に一度に挿入します。
  • フォルダ間で複数のWordファイルをマージして、希望の順序でXNUMXつに結合します。
  • 見出し、セクション区切り、またはその他の基準に従って、現在のドキュメントを個別のドキュメントに分割します。
  • DocとDocx、DocxとPDFの間でファイルを変換し、一般的な変換と選択のためのツールのコレクションなど...