VBA/Excel/Access/Word/Language Basics/ParamArray

Variable number of parameters

 
Function sum(ParamArray x())
  Dim var
  For Each var In x()
    sum = sum + var
  Next var
End Function