複数のWord文書をExcelに埋め込む

Question

2つのMicrosoft Word文書を「はじめに」というExcelワークシートに埋め込みたい。最初の文書はセルA1から埋め込まれ、2番目の文書はセル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に「 '」と表示されるというエラーが表示されます。それは私には意味をなさないこの行のFileNameの後に '）'を置きます。 Xlsheet.OLEObjects.Add(FileName:="intro.docx", Link:=False, DisplayAsIcon:=False)

私は間違っていますか？

Answer 1

ライン7文字33、今、私はコンパイルエラーを取得していますXlsheet.OLEObjects.Add FileName:="intro.docx", Link:=False, DisplayAsIcon:=False