Argumente - Standardwerte

Setzte explizit Standardwerte für optionale Argumente

Optionale Argumente ohne Standardwerte können bzw. sollten vor ihrer Verwendung geprüft werden:

Sub ShowUserName(Optional ByVal UserCount As Variant)
    If IsMissing(UserCount) Then UserCount = 0
End Sub

Durch die Vergabe eines Standardwerts ist zum einen die Überprüfung mit IsMissing nicht notwendig zum anderen wird – zumindest im Falle eines Varianten – dessen Typ klar(er).

Sub ShowUserName(Optional ByVal UserCount As Variant = 0)

In diesem Beispiel wird klar, dass es sich um ein nummerisches Argument mit dem Standardwert 0 handelt.