2

此 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:对象“范围”的方法“PasteSpecial”失败

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

有任何想法吗?可能的 Microsoft 兼容性问题?

4

1 回答 1

2

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

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

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

于 2015-11-22T16:12:48.513 回答