Excel VBA の Sub/Function 内で(変更するかもしれない)コード内の主要なパラメーターを省略可能な名前付き引数としてリストアップするとコードが見易いかもしれない

Excel VBA の Sub/Function 内で(変更するかもしれない)コード内の主要なパラメーターを省略可能な名前付き引数としてリストアップするとコードが見易いかもしれない

Function setDicRawKeyVal授業データ( _
      wsIn As Worksheet _
    , wsOut As Worksheet _
    , Optional row項目名 = 2 _
    , Optional col項目名Begin = "A" _
    , Optional col項目名End = "CC" _
    , Optional rowデータBegin = 3 _
    , Optional rowデータEnd = 3 _
) As Object
    Dim dic as Object, ...
    ...
    [What to do]
    ...
    Set setDicRawKeyVal授業データ = dic
End Function

*1
*2

*1:Optional は Variant 型しか使えないことに注意。

*2:たいていの局所スコープの変数は Variant 型にして As Variant は書かない習慣にしている。