Excelでテキストボックス内の数字を通貨形式でフォーマットするにはどうすればよいですか？

通常、ExcelにはActiveXテキストボックス内のテキスト形式を変更するための組み込み機能は提供されていません。ただし、特定の目的でテキストボックスに入力された数字を通貨形式でフォーマットする必要がある場合、簡単なVBAメソッドを使用してこれを実現できます。この記事では、そのプロセスをガイドするステップバイステップの手順を提供します。

VBAコードを使用してテキストボックス内の数字を通貨形式でフォーマットする

VBAコードを使用してテキストボックスを通貨形式でフォーマットする

以下のVBAコードを使用すると、Excelでテキストボックス内の数字を簡単に通貨形式でフォーマットできます。次の手順に従ってください。

1. 「開発」＞「挿入」＞「 テキストボックス（ActiveXコントロール）」をクリックして、ワークシートにテキストボックスを挿入します。スクリーンショットをご覧ください：

2. テキストボックスを右クリックし、右クリックメニューから「コードの表示」をクリックします。

3. 開いた「Microsoft Visual Basic for Applications」ウィンドウで、コードウィンドウ内の元のコードを以下のVBAコードに置き換えてください。

VBAコード: Excelでテキストボックスを通貨形式でフォーマットする

Private Sub TextBox1_Change()
    TextBox1.Value = Format(TextBox1.Value, "$###,##")
End Sub

注: コード内では、TextBox1は通貨としてフォーマットするテキストボックスの名前です。自分のテキストボックスの名前に置き換えてください。

4. 「Alt」+「Q」キーを同時に押して、「Microsoft Visual Basic for Applications」ウィンドウを閉じます。

5. デザインモードをオフにします。

これで、テキストボックスに数字を入力すると、下のスクリーンショットに示すように自動的に通貨形式でフォーマットされます。

関連記事：

• Excelでテキストボックスが選択されたときにテキストを自動選択するにはどうすればよいですか？
• Excelで入力中にテキストボックスを自動補完するにはどうすればよいですか？
• Excelでテキストボックスをパーセンテージ形式でフォーマットするにはどうすればよいですか？
• Excelで複数のセルのテキストを連結してテキストボックスに表示するにはどうすればよいですか？
• Excelでユーザーの入力を防ぐためにテキストボックスの編集を無効にするにはどうすればよいですか？