【VBA】最終行(列)の取得

Sub MaxRowMaxColumn()

Dim MaxRow As Long Dim MaxCol As Long

‘ MaxRow=Range(“A1”).End(xlDown).Row ’ MaxCol=Range(“A1”).End(xlDown).Column ‘ MaxRow=Range(“A65535”).End(xlUp).Row ’ MaxCol=Range(“IV1”).End(xlToLeft).Column

End Sub