|
よろしくお願いします。
-------------------------------------
A B C
¥ 1000
$ 2000
¥ 1000
$ 2000
-------------------------------------
この表の$を下のように右斜め上に移動させたいのですが、
-------------------------------------
A B C
¥ 1000 2000
¥ 1000 2000
-------------------------------------
はじめのデータはA3のセルにあります。
データの数は下に200〜300あります。
Range("A3").Select
Selection.Copy
Application.CutCopyMode = False
Selection.Cut
ActiveCell.Offset(-1, 1).Select
ActiveSheet.Paste
上のマクロをFor Nextでデータの終わりまで処理するにはどうしたらいいのでしょうか?参考書を色々読んだのですが、分かりませんでした。
よろしくお願いします。
|
|