マクロを使って・・・
シート1に入力したデータをシート2にコピーするいうマクロを作りました。
シート2にコピーはできるのですが
例えば、そのデータを消して再度新しいデータを入れていきたいと思い
エクセル左上のシート全体を選択して「Delete」を押すと
会社のエクセル(2003?)は中断モードがどーのこーのとエラー画面が出て
マクロが黄色になって、前に進めません。
やり方が決まっているのでしょうか?
コピーした行全体を選択して右クリック「削除」とすると
エラー画面が出ません。
やり方など決まっているのでしょうか?
↓がんばって作ったマクロです
Sub 正方形長方形4_Click()
Call macro01
Call macro02
End Sub
Sub macro01()
Dim ws1 As Worksheet, ws2 As Worksheet
Dim x As Long, y As Long
Set ws1 = Sheets("Sheet1")
Set ws2 = Sheets("Sheet2")
x = ws2.Cells(Rows.Count, "b").End(xlUp).Row + 1
y = ws1.Cells(Rows.Count, "b").End(xlUp).Row
ws1.Cells(21, "b").Resize(y, 9).Copy
ws2.Cells(x, "B").PasteSpecial Paste:=xlPasteValues ←この行が黄色になります
Application.CutCopyMode = False
End Sub
Sub macro02()
Worksheets("Sheet1").PrintOut
End Sub