メインコンテンツへスキップ

Word文書で数字を単語に変換するにはどうすればよいですか？

Author: Sun Last Modified: 2025-08-06

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

VBAを使用して数字を英単語に変換する

Kutools for Excelを使用してExcelで数字を英単語に変換する

VBAを使用して数字を英単語に変換する

1. 変換したい数字を選択し、Alt + F11キーを押してMicrosoft Visual Basic for Applicationsウィンドウを開きます。

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 キーを押してコードを実行すると、数字が単語に変換されます。
Number converted to English words

注釈: このコードは一度に1つの数字に対してのみ動作します。

Kutools for Excelを使用して数字を英単語に変換する

Excelシート内で数字を単語に変換したい場合、Kutools for Excelの「Numbers to Words」機能という便利なツールがあります。これにより、数字を英単語や中国語の単語に変換したり、英語または中国語の通貨に変換することができます。

Kutools for Excelについて、AI 🤖を搭載し、300以上の便利な機能を提供して作業を簡素化します。

Kutools for Excelを無料でインストール した後、以下のように操作してください：

1. 数字を単語に変換したいセルを選択し、次にクリックします Kutools > テキスト > Numbers to Words.
Numbers to Words option on the Kutools tab on the Excel ribbon

2. 表示されるダイアログで、次のオプションをチェックします： 英語 および 通貨単位に変換しない オプション
Numbers to Words dialog box

3. 「OK」または「適用」をクリックすると、選択された数字が単語に変換されます。

最高のオフィス生産性ツール

Kutools for Word - 100以上の優れた機能でWordの操作をさらに向上！

🤖 Kutools AI Features：AIアシスタント / リアルタイムアシスタント / スーパー ポリッシュ（形式を保持） / スーパー トランスレート（形式を保持） / AI編集 / AI校正...

📘 文書マスター：ページの分割 / 文書の結合 / 選択範囲を各種形式（PDF／TXT／DOC／HTMLなど）でエクスポート / 一括PDF変換...

✏ 内容編集：複数ファイルにわたる一括検索と置換 /すべての画像のリサイズ / 表の行と列の転置 / 表をテキストに変換...

🧹 簡単クリーン：余分なスペース / セクション区切り / テキストボックス / ハイパーリンクを一掃します。その他の削除ツールは削除グループでご覧いただけます...

➕ クリエイティブ挿入：千位区切りの挿入 / チェックボックスの挿入 / ラジオボタンの挿入 / QRコード / バーコード / 複数画像の挿入 / 他にも挿入グループにて発見...

🔍 高精度選択：特定のページ / 表 / 図形 / 見出し段落をピンポイントで選択。さらに多くの 選択 機能でナビゲーションを強化...

⭐ スター強化：任意の場所へ移動 / 繰り返しテキストの自動挿入 / 複数文書ウィンドウ間の切替 /11 種類の変換ツール...

🌍 40以上の言語に対応：Kutoolsはお好みの言語でお使いいただけます―英語、スペイン語、ドイツ語、フランス語、中国語など40以上の言語をサポート！

Kutools and Kutools Plus tabs on the Word Ribbon
👉これらの機能を体験してみませんか？今すぐKutools for Wordをダウンロード！🚀
 

最高のオフィス生産性ツール

Kutools for Word - 100+ のWord用ツール

無料ダウンロード 今すぐ購入 Kutoolsについて詳しく見る