たまに、省略可能な引数の初期値を空っぽにすることがある。 ↓ こんな感じで。 Sub Test(Optional myDate As Date = Empty) If myDate = Empty Then myDate = Date End If Debug.Print myDate End Sub 日付の指定があった場合は、その日付に。 指定の日付が…