|
▼ななこ さん:
特に不愉快に思っているわけでは無いのでご安心を。
ただ、マクロの記録を行っていて気づいたんですが「値の貼り付け」のマクロ記録、
ちょっとおかしな記録の仕方をしているように思えます。
貼り付け位置のセルを選択してから
ActiveSheet.PasteSpecial
という流れは本来、他のアプリケーションなどでコピーしたものをExcelに張り付ける場合のもので
同じExcel内であれば
Range(C6).PasteSpecial
となるのではないかなと。
基本はSelectとSelectionをまとめることなので
> Range("C7:F13").Select
> Selection.Copy
> Range("C6").Select
> ActiveSheet.PasteSpecial Format:=3, Link:=1, DisplayAsIcon:=False, _
> IconFileName:=False
> Range("A1").Select
は
Range("C7:F13").Copy
Range("C6").Select
ActiveSheet.PasteSpecial Format:=3, Link:=1, DisplayAsIcon:=False, _
IconFileName:=False
になりますが最初に書いた点を反映させると
Range("C7:F13").Copy
Range("C6").PasteSpecial Paste:=xlPasteValues
で、どうでしょうか?
|
|