Vba 将多个Word文档嵌入Excel

我想将2个Microsoft Word文档嵌入到名为“简介”的Excel工作表中。第一份文件应从单元格A1开始嵌入，第二份文件应从单元格A62开始嵌入

Set objExcel = CreateObject("Excel.Application")  
objExcel.Visible = True 
objExcel.DisplayAlerts=False
Set objWorkbook1= objExcel.Workbooks.Open("workbook.xlsx")
Set Xlsheet = objWorkbook1.Worksheets("Introduction")
Xlsheet.Select
Xlsheet.OLEObjects.Add(FileName:="intro.docx", Link:=False, DisplayAsIcon:=False)
Xlsheet.Range("A62").Select
Xlsheet.OLEObjects.Add(FileName:="methods.docx", Link:=False, DisplayAsIcon:=False).Select
objWorkbook1.saveAs "workbook_new.xlsx",51
objWorkbook1.close
objExcel.DisplayAlerts=True
set objExcel=nothing

当我运行上面的代码时，我得到一个错误，在第7行，字符32应该是'。这会在这一行的文件名后面加一个“'），这对我来说毫无意义<代码>Xlsheet.OLEObjects.Add（文件名：=“intro.docx”，链接：=False，显示图标：=False）

---

我做错了什么

尝试将其更改为

Xlsheet.OLEObjects.Add FileName:=“intro.docx”，Link:=False，DisplayAsIcon:=False

现在我得到一个编译错误，第7行字符33，预期语句。代码800A0400I最终让它按照上面的建议工作，并删除参数名称。不知道为什么这对他们不起作用。需要一个前导逗号，因为

ClassType

在位置上是第一个参数，

FileType

是第二个参数

Xlsheet.OLEObjects.Add，“intro.docx”，False，False

第9行需要相同的编辑。