Тест VBA необязательный аргумент
Sub MySub(Optional pParam As Variant)
If IsMissing(pParam) Then
msgbox "Missing"
End If
End Sub
VasteMonde
Sub MySub(Optional pParam As Variant)
If IsMissing(pParam) Then
msgbox "Missing"
End If
End Sub