复制并粘贴Excelmacros

我有一个macros用于粘贴在Excel中,除了从一个单元格复制粘贴到另一个单元格时,它可以正常工作。 换句话说,它可以正常工作,从网页上说文本,但不是从一个单元格到另一个单元格。 错误消息说Run time error '1004': PasteSpecial method of Worksheet class failed. 这里是代码:

 Sub MousePaste() ' ' MousePaste Macro ' ' Keyboard Shortcut: Ctrl+Shift+M ' ActiveCell.Select ActiveSheet.PasteSpecial Link:=False, DisplayAsIcon:= _ False, NoHTMLFormatting:=True End Sub 

有两个PasteSpecial方法的实现。

Worksheet.PasteSpecial粘贴从剪贴板和

Range.PasteSpecial粘贴从/到一个范围。

你可能需要后者,在上面的链接的例子。