テキストボックスの値を合計する方法は？

次のスクリーンショットに示すように、Textbox1とTextbox2の値を合計し、結果をTextbox3に自動的に計算するXNUMXつのテキストボックスがあるとします。 Excelでこの仕事にどのように対処できますか？

テキストボックスの値をVBAコードで合計する

テキストボックスの値をVBAコードで合計する

XNUMXつのテキストボックスの値を合計し、その結果をXNUMX番目のテキストボックスに取り込むには、次のVBAコードが役立ちます。

1。 まず、XNUMXつのテキストボックスを挿入する必要があります。 Developer > インセット > テキストボックス（ActiveXコントロール）、次にテキストボックスを描画し、XNUMXつのコピーを作成します。スクリーンショットを参照してください。

2。 テキストボックスを挿入したら、使用するテキストボックスが含まれているシートタブを右クリックして、 コードを表示 コンテキストメニューから アプリケーション向け Microsoft Visual Basic ウィンドウをクリックし、次のVBAコードをコピーして空のモジュールに貼り付けます。

VBAコード：テキストボックスからの値を合計します。

Private Sub Sum_Click()
    TextBox3.Text = Val(TextBox2.Text) + Val(TextBox1.Text)
End Sub

3。 次に、Textbox1とTextbox2に値を入力し、を押します。 F5 キーまたは ラン ボタンをクリックしてコードを実行すると、計算結果がすぐにTextbox3に表示されます。スクリーンショットを参照してください。