Excel VBAで足し算をする方法

日付:

 


Excel VBAで足し算をする方法

Excel VBA（Visual Basic for Applications）を使用して、2つの数字を足し算する方法を学びましょう。VBAはExcelのマクロ言語であり、独自のプログラムを作成してExcelの機能を拡張できます。

1. マクロを作成する

  1. Excelを開き、新しいワークブックを作成します。
  2. 「開発」タブを表示するために、[ファイル] > [オプション] > [リボンのユーザー設定] を選択します。
  3. [開発] チェックボックスをオンにして、[OK] をクリックします。

2. VBAエディタを開く

  1. [開発] タブで [Visual Basic] をクリックします。
  2. VBAエディタが開きます。

3. 足し算のマクロを作成する

以下のコードをVBAエディタに入力します。

Sub 足し算()
    Dim userInput1 As Variant
    Dim userInput2 As Variant
    Dim wa As Long
    
    ' データ入力を促す
    MsgBox "足し算をします。"

    
    ' 1つ目のデータの入力
    userInput1 = InputBox("1つ目の数字を入力してください:", "ユーザー入力", "デフォルト値1")

    
    ' 2つ目のデータの入力
    userInput2 = InputBox("2つ目の数字を入力してください:", "ユーザー入力", "デフォルト値2")

    
    If IsNumeric(userInput1) And IsNumeric(userInput2) Then
        wa = CLng(userInput1) + CLng(userInput2)
        MsgBox "入力された1つ目の値は: " & userInput1 & vbCrLf & "入力された2つ目の値は: " & userInput2 & vbCrLf & "2つの数の和は: " & wa
    Else
        MsgBox "数字を入力してください。"
    End If
End Sub

4. マクロを実行する

  1. VBAエディタで [実行] ボタンをクリックします。
  2. 1つ目と2つ目の数字を入力して、結果を確認します。

これで、Excel VBAを使用して足し算を行うマクロが作成されました。初心者でも簡単に使えるので、ぜひ試してみてください！