なぜ「変数」と「入力画面」を使いこなす必要があるのか
VBAで業務効率化を目指す際、マクロ記録機能だけに頼っていると、柔軟な処理が書けずに行き詰まってしまいます。実務で求められるのは、ユーザーから数値を受け取り、それを計算してセルに反映させるような「動的な処理」です。今回は、VBエディタを使って、プログラムに情報を一時的に覚えさせる「変数」と、ユーザーとの対話を行う「InputBox関数」の基礎を解説します。これらを習得することで、マクロの汎用性が劇的に向上します。
基礎知識：変数と型について
プログラムでデータを一時的に保持するための箱を「変数」と呼びます。VBAでは、変数を使う前に「どんなデータを入れるのか」を宣言する必要があります。これを「型の宣言」と言います。
Dim（ディム）という命令を使い、例えば整数を扱うなら「Integer型」と指定します。事前に宣言することで、メモリを効率よく使い、プログラムの誤作動を防ぐことができます。また、「’（シングルクォーテーション）」を使うと、コード内にメモ書き（コメント）を残せます。これは後でコードを見直した際、自分やチームメンバーが処理内容を理解するために非常に重要です。
実装手順：計算マクロの作成
以下の手順で、セルB5にある現在の数値に、InputBoxで入力した数値を加算する処理を作成します。
1. 変数の宣言: Dim命令で、計算に使用する変数を準備します。
2. データの取得: Rangeオブジェクトを使って、セルから現在の値を変数に代入します。
3. ユーザー入力: InputBox関数を使い、ユーザーからの入力を変数に格納します。
4. 計算と出力: 変数同士を足し合わせ、結果をセルに書き戻します。
サンプルプログラム：人数加算マクロ
以下のコードをVBE（Visual Basic Editor）に貼り付けて動作を確認してください。
Sub UpdateTotalCount()
‘ 変数の宣言：整数型として定義します
Dim myTotal As Integer
Dim myCount As Integer
‘ 現在の参加人数をセルB5から取得
myTotal = Range(“B5”).Value
‘ 入力画面を表示し、追加人数を変数myCountに取得
‘ 第3引数は入力ボックスの初期値です
myCount = InputBox(“追加人数を入力してください”, “人数の入力”, 1)
‘ 合計を計算し、セルB5に結果を書き込む
Range(“B5”).Value = myTotal + myCount
‘ 処理を行った現在の日時をセルD6に出力
Range(“D6”).Value = Date + Time
MsgBox “更新が完了しました！”
End Sub
応用・注意点：現場でのトラブルを避けるために
実務でこのコードを使用する際、いくつか注意点があります。
1. 入力値のチェック
InputBoxでユーザーが「キャンセル」を押したり、数字以外を入力したりすると、エラーが発生することがあります。実務では「If IsNumeric(myCount) Then…」のように、入力値が数値かどうかを判定する処理を入れると、より堅牢なプログラムになります。
2. 型の範囲に注意
Integer型は「-32,768から32,767」までの数値しか扱えません。もし数万を超える大きな人数や金額を扱う場合は、より大きな数値を扱える「Long型」を使用するのが鉄則です。
3. セル参照の工夫
今回は「Range(“B5”)」と直接指定しましたが、シートが複数ある場合は「Worksheets(“Sheet1”).Range(“B5”)」のようにシートを明示すると、意図しない場所への書き込みを防ぐことができます。
まずはこのコードを動かし、変数の値がどのように変化するかをステップ実行（F8キー）で確認してみてください。ここがVBA習得の大きなステップになります！
