复制并粘贴Excel宏

Question

我有一个宏，我用它来粘贴在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 

Answer 1

有两种PasteSpecial方法的实现。

Worksheet.PasteSpecial从剪贴板粘贴和

Range.PasteSpecial从/到的范围内粘贴。

您可能需要后者，上述链接中的示例。