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
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