Excel 2016在VBA PasteSpecial上失败

时间:2015-11-22 10:32:39

标签: excel-vba excel-2016 vba excel

此VBA代码在Excel 2013上运行(在多台不同的计算机上):

Sub CopyStaticData()
    Application.ScreenUpdating = False
    Sheets("Data Input").Range("Input_Station_ID").Copy
    Sheets("Data Received").Range("Data_Station_ID").PasteSpecial Paste:=xlPasteValues
    ...

但是,在Excel 2016上,它会在最后一行引发运行时错误:

  

错误1004:对象'Range'的方法'PasteSpecial'失败

我尝试用其显式代码(-4163)替换xlPasteValues - 无济于事。

有什么想法吗?可能的Microsoft兼容性问题?

1 个答案:

答案 0 :(得分:2)

仅用于粘贴值,我建议不要使用副本。

相反,简化为RangeB.value = RangeA.value

更容易,更快,没有棘手的剪贴板,用一个小行写成。