在研究此错误时,我得出的结论是,它与剪贴板没有像应有的清除方式有关,这在我们使用 2003 时不是问题,但现在我们使用的是 2010。(我也继承了此代码来自不再在这里工作的人)
运行时错误“4605”:
此方法或属性不可用,因为剪贴板为空或无效。
这是我的代码:
Worksheets("Exec Sum").Range("B140:I186").Copy
With myDoc.Bookmarks
.Item("b3").Range.PasteSpecial Link:=True, DataType:=wdPasteMetafilePicture, Placement:=bmark, DisplayAsIcon:=False
End With
' Clears Clipboard
Application.CutCopyMode = False
我已经尝试过先选择一个空单元格的 sendkeys ("^C") 但没有运气。有什么方法可以不使用复制/粘贴方法来执行此操作,或者使用其他方法来清除剪贴板?