電子探訪記

モンハン好きのおっさんが残すライフログ、読書・ゲームがメイン

【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

広告を非表示にする