Как сделать аргумент функции по умолчанию

Для этого нужно использовать ключевое слово Optional

Private Function TestFunction(ByVal arg1 As Integer, _
Optional arg2 As Integer = 10)
'.....
End Function

Если Вам нужно знать был ли задан аргумент по умолчанию или нет, то тип и значение по умолчанию не нужно задавать

Private Function TestFunction(ByVal arg1 As Integer, _
Optional arg2)
' Если аргумент не задан
If IsMissing(arg2) = True Then
'.....
End If
'.....
End Function