┌──────────────────────────────────────┐
│CREATE FUNCTION [dbo].[関数](                                               │
│    @引数   int = 0                                                         │
│) RETURNS @結果 int                                                         │
│AS                                                                          │
│BEGIN                                                                       │
│  ：処理                                                                    │
│END;                                                                        │
└──────────────────────────────────────┘
MSSQLのストアドファンクションでは上記のような感じだが(なぜそれを例にする?!)
ExcelVBAの場合は、以下のようか感じである。
┌──────────────────────────────────────┐
│Sub 関数(Optional ByVal 引数 As Long = 0)                                   │
│  ：処理                                                                    │
│End Sub                                                                     │
└──────────────────────────────────────┘
引数の先頭に「Optional」修飾子をつけてあげればよい。