■呼び出し元プロシージャ Sub セルアドレス情報取得() Dim strChr As String Dim strNum As String Call infoCellAddress("H3", strNum, strChr) 'アルファベット部分出力 MsgBox strChr '行数部分出力 MsgBox strNum End Sub ■呼び出し先プロシージャ Sub i…

セルアドレスより列番号を取得 ※セルアドレスよりアルファベット部分と行数部分を別々にして戻り値として返す部品と アドレスのアルファベット部分を元に列番号を抽出する部品を組み合わせています ■呼び出し元プロシージャ Sub 列番号取得() Dim columnInde…