Question

我尝试使用Word 2010从Access 2010执行此操作。我有一个WordDoc对象，无法找到嵌入文件的方法。

我尝试使用书签从零开始：

bmFile.Range.InsertFile "C:\Users\Me\Desktop\TestFile.xlsx"

并且有关文件被损坏的错误。

我尝试使用WordDoc.InlineShapes(1)编辑现有的嵌入文件，但没有属性可更改或相关。

非常感谢任何想法。

由于

Answer 1

theWordDocObject.InlineShapes.AddOLEObject _
    FileName:="pathtofile", _
    LinkToFile:=False, DisplayAsIcon:=False

（至少与Excel文件一起使用）

Answer 2

从现有文件（根据您的示例），您应该可以执行此操作

bmFile.Range.InlineShapes.AddOLEObject ClassType:="Excel.Sheet.12", _
  FileName:="C:\Users\Me\Desktop\TestFile.xlsx", _
  LinkToFile:=False, _
  DisplayAsIcon:=False

在不使用文件的情况下插入对象实际上更糟糕。您可以通过将FileName参数设置为＆＃34;＆＃34;来实现它，但随后将启动OLE服务器并显示其UI（当您从文件嵌入时不会发生这种情况）。

至于修改嵌入对象中的任何内容，它并不是特别简单，因为对象的UI往往会妨碍，但起点是Shape（或InlineShape）的OLEFormat成员。很难找到因为＆＃34; OLEFormat＆＃34;不是一个特别有用的名字。

使用VBA将文件嵌入Word文档

2 个答案: