2012-02-17から1日間の記事一覧
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