Office中国论坛/Access中国论坛

标题: 菜鸟问题请教高手，我的这个关于WORD合并按钮事件代码那里有问题。。 [打印本页]

作者: flywolk 时间: 2004-3-1 17:34
标题: 菜鸟问题请教高手，我的这个关于WORD合并按钮事件代码那里有问题。。
我自己是做了个用WORD文档的合并域打印报表的。。
在从OFFICE链接做的用WORD合并出来的就可以打出来先对应记录的WORD格式的报表

用从网上找到的按钮事件的代码打出来每次在各个WORD域的位置就出现“错误！数据源的域名记录中找不到合并域。”
请教各位高手，怎么解决，，菜鸟先在这里谢谢了
按钮的代码：
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]

[此贴子已经被作者于2004-3-1 12:23:55编辑过]

作者: flywolk 时间: 2004-3-1 19:31
我是菜鸟，，大家帮帮忙啊，，

作者: flywolk 时间: 2004-3-1 20:31
怎么没人理我啊，急需，各位高手，是不是我的问题太菜了，，，

作者: flywolk 时间: 2004-3-1 23:07
不好意思，是我数据源没设置好，，，现在已经搞定。。。

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)