表紙へ
3.引数が省略されているか調べる
Private Sub MyFunc(Optional X As Variant) If IsMissing(X) Then MsgBox "引数が省略されました。" End If End Sub メモ:Variant型の引数に対してのみ有効。
Private Sub MyFunc(Optional X As Variant)
If IsMissing(X) Then
MsgBox "引数が省略されました。"
End If
End Sub
メモ:Variant型の引数に対してのみ有効。