VBA セル範囲自動取得のコピペ

セル  範囲自動取得のコピペ

Sub test()

　'　別シートへコピペ（転記）　行列幅自動取得
    
    With Sheet1.Range("A4").CurrentRegion
                Sheet2.Range("A2").Resize(.Rows.Count, .Columns.Count).Value = .Value
    End With

End Sub

実行結果

― ― ― ― ― ― ― ― ― ― → Excel VBA基礎入門もくじ へ戻る 

参考記事

『VBA 　セルの操作　セルのコピー貼り付け』

『VBA セル選択範囲の変更 Resizeプロパティ』

『VBA Withステートメント』