VBA: чтение данных Excel в слово

Question

Я делаю простую форму, которая извлекает данные из моего листа Excel, такие как имя, дата рождения и адрес. И вставляя их в мою словесную форму, я каждый раз делаю по 20-30 листов, поэтому думаю, что это поможет сэкономить время на копирование и вставку.

Я попытался следовать этому руководству: http://www.makeuseof.com/tag/integrate-excel-data-word-document/ И создал кнопку с простым ярлыком с именем m_name, для имени участника. Но это говорит мне Compile error: User-defined type not defined, И вспыхнул на линии 1.

Я использую Word 2003 (я не могу найти Tools > Reference, как просило руководство). Я не уверен, связано ли это с этой ошибкой.

Private Sub CommandButton1_Click()
Dim objExcel As Excel.Application
Dim exWb As Excel.Workbook

Set exWb = objExcel.Workbooks.Open("U:\test.xls")
ThisDocument.m_name.Caption = exWb.Sheets("Member's Data").Cells(3, 3)

exWb.Close

Set exWb = Nothing

End Sub

Answer 1

Да, очень важно установить ссылки в соответствии с руководством.

Однако измените эти две строки:

Dim objExcel As Excel.Application
Dim exWb As Excel.Workbook

в эти:

Dim objExcel As Object
Set objExcel = CreateObject("Excel.Application")

и код тоже должен работать.