在研究这个错误时,我得出的结论是,它与剪贴板有关,不应该像我们使用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
Run Code Online (Sandbox Code Playgroud)
我已经尝试过sendkeys("^ C"),首先选择一个空单元格,但没有运气.有没有办法我可以不使用复制/粘贴方法来执行此操作或以其他方式清除剪贴板?
我有一个数据库,其中有 2 个相似的字段(与另一个表匹配),然后第三个是唯一的。我想将表转换为列中列出的第三个唯一值,而不是单独的记录。
IE
5/1/2013 A321 1 $1,120
5/2/2013 A325 1 $2,261
5/1/2013 A321 2 $2,120
Run Code Online (Sandbox Code Playgroud)
将转换为
5/1/2013 A321 $1,120 $2,120
5/2/2013 A325 $2,261
Run Code Online (Sandbox Code Playgroud)
我可以为第 3 列中的每个值创建单独的查询,然后有另一个查询以我想要的方式连接它们,但我希望有一个更优雅的解决方案。