2026年7月– date –

① 最終行を取得する関数 Function Get最終行(ByVal シート As Worksheet, ByVal 列番号 As Long) As Long Get最終行 = シート.Cells(シート.Rows.Count, 列番号).End(xlUp).Row End Function ② 最終列を取得する関数 Function Get最終列(ByVal シート As W...