VBA引数のデフォルト値設定ガイド！Optionalで使いやすい関数を作る方法
生徒
「VBAで関数を作ったのですが、呼び出すたびに毎回同じような数字を入力するのが面倒になってきました。省略しても勝手にいつもの数字が入るようになりませんか？」
先生
「それは『引数のデフォルト値』という機能を使えば解決できますよ！VBAの Optional というキーワードを使えば、入力を省略できる便利な関数が作れます。」
生徒
「省略できるんですか！入力の手間が減ってミスも少なくなりそうです。ぜひ詳しく教えてください！」
先生
「使い勝手の良いプログラミングには欠かせないテクニックです。基本から丁寧に見ていきましょう！」
1. 引数のデフォルト値（初期値）とは？
Excel VBAの関数やプロシージャを作るとき、外部からデータを受け取るための窓口を「引数（ひきすう）」と呼びます。通常、引数が設定されている関数を呼び出すときは、必ずそのデータを渡さなければなりません。しかし、デフォルト値（初期値）を設定しておけば、データを渡さなかった場合に、あらかじめ決めておいた「いつもの値」を自動で使ってくれるようになります。
例えば、書類を作成するロボットに「枚数」という引数があるとします。普段は1枚しか作らないのであれば、枚数を指定しなかったときは自動的に「1枚」と判断してくれるように設定するのがデフォルト値の考え方です。これにより、特別な時だけ枚数を指定すればよくなり、操作がぐっと楽になります。関数設計において、この「優しさ」を組み込むことは非常に重要です。
2. Optionalキーワードの使い方を覚えよう
引数を省略可能にするためには、引数名の前に Optional（オプショナル）という言葉を付けます。英語で「任意の」「自由選択の」という意味がある通り、これをつけることで「このデータは渡しても渡さなくてもいいですよ」というルールになります。
ただし、一つだけ大切なルールがあります。それは、「Optionalを付けた引数は、普通の引数よりも後ろに書かなければならない」ということです。例えば、材料が3つある場合、2番目だけを省略可能にすることはできません。2番目以降すべて、あるいは3番目だけ、といった形で、必ず右側（後ろ側）に固めて配置する必要があります。これを守らないと、VBAはどのデータを省略したのか判断できず、エラーになってしまいます。
3. 実践！基本的なデフォルト値の設定方法
それでは、実際に Optional を使って、デフォルト値を設定するコードを書いてみましょう。今回は、挨拶を表示する簡単なプログラムを作ります。名前を省略したときは「お客様」と表示されるように設計します。
' 名前(uName)を省略可能にし、デフォルト値を "お客様" に設定
Sub GreetUser(Optional uName As String = "お客様")
MsgBox "こんにちは、" & uName & " さん！"
End Sub
' 呼び出し側のテストコード
Sub RunGreet()
' 引数を渡して呼び出す場合
Call GreetUser("田中")
' 引数を省略して呼び出す場合
Call GreetUser
End Sub
このコードを実行すると、一度目は「田中さん」、二度目は「お客様さん」と表示されます。プログラミング未経験の方でも、= を使って値を書いておくだけなので、とても簡単に感じられるはずです。
4. 数値計算での活用：消費税計算のデフォルト化
次に、実務で役立つ消費税計算の関数を作ってみましょう。多くの場合、税率は10%（0.1）ですが、たまに8%（0.08）で計算したいこともあります。このようなケースこそ、デフォルト値の出番です。
' 金額(price)は必須、税率(taxRate)は省略可能でデフォルトは0.1
Function CalcPriceWithTax(price As Long, Optional taxRate As Double = 0.1) As Long
CalcPriceWithTax = price * (1 + taxRate)
End Function
' 呼び出し側のテストコード
Sub CheckTax()
' 1000円をデフォルトの10%で計算
Debug.Print "通常(10%): " & CalcPriceWithTax(1000)
' 1000円を明示的に8%で計算
Debug.Print "軽減税率(8%): " & CalcPriceWithTax(1000, 0.08)
End Sub
この設計により、普段は CalcPriceWithTax(1000) と書くだけで済み、特別な時だけ 0.08 を書き足せばよくなります。再利用性の高いコードを書くための基本テクニックです。
5. IsMissing関数で引数が渡されたか判定する
デフォルト値を = で設定するのではなく、「引数が渡されたかどうか」で処理を大きく変えたい場合があります。その時に使うのが IsMissing（イズ・ミッシング）関数です。これは「データが行方不明（省略されている）ですか？」と確認する道具です。
ただし、この IsMissing を使うには、引数の型を Variant（バリアント型）という、何でも入る特別な型にしておく必要があります。数値や文字などの型をカチッと決めてしまうと、この関数はうまく動きません。パソコン初心者の方には少し難しいかもしれませんが、「型を指定しない自由な箱なら、中身が空っぽかどうかを調べられる」と覚えておきましょう。
6. 実践！IsMissingを使った条件分岐
引数が渡されたときはその値を使い、渡されなかったときは全く別の複雑な処理を行うような設計を見てみましょう。今回は、報告書の日付を扱う例です。
' 日付(targetDate)が省略されたら今日の日付を使う
Sub CreateReport(Optional targetDate As Variant)
Dim finalDate As Date
' 引数が省略されているかチェック
If IsMissing(targetDate) Then
finalDate = Date ' 省略時は今日の日付
Else
finalDate = targetDate ' 渡された日付
End If
MsgBox finalDate & " の報告書を作成します。"
End Sub
' 実行例
Sub RunReport()
' 日付を指定せずに実行
CreateReport
End Sub
7. 複数のOptional引数を設計する際の注意点
一つの関数に、省略できる引数を複数作ることも可能です。例えば、「文字の色」と「背景の色」の両方を省略可能にする場合です。ここで便利なのが「名前付き引数」という呼び出し方です。
複数の Optional 引数があるとき、2番目だけを指定したい場合があります。その際、( , "赤") のようにカンマを並べて場所を合わせるのは大変ですし、間違いの元です。そこで 引数名:=値 という書き方を使えば、順番を気にせず特定の引数だけにデータを渡すことができます。これをマスターすると、複雑なプロシージャ設計も自由自在になります。
8. 実践！名前付き引数でスマートに呼び出す
色を指定してセルを装飾する関数を例に、名前付き引数の便利さを体験してみましょう。
' 文字色(fColor)と背景色(bColor)をどちらも省略可能に
Sub SetCellColor(Optional fColor As Long = vbBlack, Optional bColor As Long = vbWhite)
With ActiveCell
.Font.Color = fColor
.Interior.Color = bColor
End With
End Sub
' 呼び出し例
Sub ApplyColor()
' 背景色(bColor)だけを黄色にしたい場合
' 名前を指定して渡すので、最初の引数を飛ばせる
Call SetCellColor(bColor:=vbYellow)
End Sub
このように書くことで、コードを読んだ瞬間に「背景色を黄色にしているんだな」と理解できるようになります。自分以外の人にも優しい、非常に丁寧な設計術です。
9. デフォルト値設定がもたらすメンテナンスの向上
なぜ Optional を使ってデフォルト値を決めておくのが良いのでしょうか。それは、将来プログラムを修正したくなった時に大きな威力を発揮するからです。
例えば、ある関数を100箇所で使っていたとします。そこに新しい設定項目（引数）を追加したくなった時、もしデフォルト値を設定していなければ、100箇所すべてを書き直さなければエラーで動かなくなります。しかし、新しい引数を Optional で追加し、デフォルト値を決めておけば、既存の100箇所はそのままでも動き続けます。このように、プログラムの拡張性を保つために、デフォルト値の設定は欠かせないテクニックなのです。
10. ユーザーのミスを減らすための優しい設計
プログラミング未経験の方がマクロを使う際、入力項目が多いとそれだけで心理的なハードルが高くなってしまいます。「ここは空欄でも大丈夫ですよ」という安心感を与えるのが、プロレベルの関数設計です。デフォルト値は、単なる効率化だけでなく、使う人への「思いやり」でもあります。
何でもかんでも必須にするのではなく、「一番よく使うパターンは何だろう？」と想像力を働かせてみてください。その答えをデフォルト値として設定することで、あなたのVBAツールは驚くほど使いやすく、プロフェッショナルな仕上がりになるはずです。一歩ずつ、こうした小さな工夫を積み重ねて、素晴らしい自動化ツールを構築していきましょう！
