Sub test3()
Range("A1").Copy Destination:=Range("A2")
Range("A1").Copy Range("A3")
Sheets(1).Range("a1").Copy Sheets(2).Cells(1)
Range("A1").Copy
Range("A4").PasteSpecial Paste:=xlPasteValues
Application.CutCopyMode = False '
コピーを使った後は必ずFalseにした方が、予想外なエラーが起きない
End Sub
Copy後にセルが点線で選択された状態で、他のセルを選択すると、思わぬ場所でクリップボードからの貼り付けが起きてエラーが起きます。Application.CutCopyMode = Falseをにすることで、このトラブルを回避できます。
Copy後にセルが点線で選択された状態で、他のセルを選択すると、思わぬ場所でクリップボードからの貼り付けが起きてエラーが起きます。Application.CutCopyMode = Falseをにすることで、このトラブルを回避できます。
Microsoft Office ブログランキングへ