粘贴为值错误 1004

Paste as value error 1004

我正在运行创建一个要复制和粘贴的宏。到目前为止,它 运行 就像一场梦。现在看起来像这样:

WsComp.Range("A2:A" & LastRow).Copy WsCBlad.Range("B2")

不过,我想粘贴为值。我假设代码必须如下所示才能实现:

WsComp.Range("A2:A" & LastRow).Copy WsCBlad.Range("B2").PasteSpecial(xlPasteValues)

当我 运行 它时,它给出错误 1004,Pastespecial class 范围。

非常感谢任何意见!

你能在下一行试试过去的值吗

WsComp.Range("A2:A" & LastRow).Copy 
WsCBlad.Range("B2").PasteSpecial(xlPasteValues)