Office中国论坛/Access中国论坛

标题: VBA定义打开Word文件的过程。建立Word应该对象及文档对象,并打开文件-->tmtony转 [打印本页]

作者: WTM1    时间: 2002-9-21 01:58
标题: VBA定义打开Word文件的过程。建立Word应该对象及文档对象,并打开文件-->tmtony转移
'定义打开Word文件的过程。建立Word应该对象及文档对象,并打开文件。

PrivateSub OpenWordDocument(ByVal FileName AsString)

    wdApp = CreateObject("Word.Application")



    wdApp.Documents.Open(FileName)

    wdDoc = wdApp.ActiveDocument

    wdDoc.ActiveWindow.DocumentMap = False

    wdApp.Visible = True

    IsWordRunning = True

EndSub


PrivateSub OpenWordDocument(ByVal FileName AsString)

    wdApp = CreateObject("Word.Application")



    wdApp.Documents.Open(FileName)

    wdDoc = wdApp.ActiveDocument

    wdDoc.ActiveWindow.DocumentMap = False

    wdApp.Visible = True

    IsWordRunning = True

EndSub
[em19]
作者: andy    时间: 2002-10-2 10:23
如果打开的是窗体里的绑定ole控件,怎办?




欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/) Powered by Discuz! X3.3