Mod03a_Subflow

Option Explicit
Option Base 1

'-----------------------------------------------
' プロシージャ名 : prc列番号変換
' 機能概要       : 工程列定義から列名（A～Z）を列番号に変換して変数に格納する
' 留意点         : lng工程Idxは1～3の範囲であること
'-----------------------------------------------
Public Sub prc列番号変換( _
    ByRef typ列 As typガント列定義, _
    ByVal lng工程Idx As Long, _
    ByRef lng工数列 As Long, _
    ByRef lngCol担当 As Long, _
    ByRef lng開始日列 As Long, _
    ByRef lng終了日列 As Long _
)
    lng工数列 = fncColumnLetterToNumber(typ列.工程(lng工程Idx).工数)
    lngCol担当 = fncColumnLetterToNumber(typ列.工程(lng工程Idx).担当)
    lng開始日列 = fncColumnLetterToNumber(typ列.工程(lng工程Idx).開始日)
    lng終了日列 = fncColumnLetterToNumber(typ列.工程(lng工程Idx).終了日)
End Sub