菜鳥問題請教高手，我的這個關(guān)于WORD合并按鈕事件代碼那里有問題。。

flywolk

我自己是做了個用WORD文檔的合并域打印報表的。。
在從OFFICE鏈接做的用WORD合并出來的就可以打出來先對應(yīng)記錄的WORD格式的報表

用從網(wǎng)上找到的按鈕事件的代碼打出來每次在各個WORD域的位置就出現(xiàn)“錯誤！數(shù)據(jù)源的域名記錄中找不到合并域�！�
請教各位高手，怎么解決，，菜鳥先在這里謝謝了
按鈕的代碼：
Option Compare Database
Option Explicit
    Private Sub Command32_Click()
    On Error GoTo Err_Command32_Click
    Dim WORDAPP As Object
    Dim activedocument As Variant
    Dim documents As Variant
    Set WORDAPP = CreateObject("Word.Application")
    WORDAPP.Visible = True
    Set documents = WORDAPP.documents
    documents.Open "c:/gd/gd.doc"
    Set activedocument = WORDAPP.activedocument
Exit_Command32_Click:
       Exit Sub
Err_Command32_Click:
      MsgBox Err.Description
      Resume Exit_Command32_Click
    End Sub
[em24]

[此貼子已經(jīng)被作者于2004-3-1 12:23:55編輯過]

flywolk

我是菜鳥，，大家?guī)蛶兔Π�，�?/td>

flywolk

怎么沒人理我啊，急需，各位高手，是不是我的問題太菜了，，，

flywolk

不好意思，是我數(shù)據(jù)源沒設(shè)置好，，，現(xiàn)在已經(jīng)搞定。。。