Office中国论坛/Access中国论坛

标题: 请问直接打开一个word文档的vba指令是什么? [打印本页]

作者: 徐阿鹏    时间: 2003-6-23 22:59
标题: 请问直接打开一个word文档的vba指令是什么?
请问直接打开一个word文档的vba指令是什么?
不会是shell吧?
谢谢!
作者: sea.er    时间: 2003-6-25 21:22
Shell "WINWORD.EXE *.doc"可以
作者: 徐阿鹏    时间: 2003-6-26 01:11
不错,谢谢,要加个路径,不加路径就是默认的我的文档的路径
谢谢
作者: sunredday    时间: 2003-7-20 01:06
如何加上具体的文件路径?
作者: sea.er    时间: 2003-7-20 01:14
Shell "WINWORD.EXE c:\sunredday\sunredday.doc"
作者: sunredday    时间: 2003-7-20 01:44
就这么简单?
不用WINWORD.EXE +CH(34)+ c:\sunredday\sunredday.doc+ CH(34)



作者: sunredday    时间: 2003-7-20 01:45
1 Dim retval
retval = Shell("WINWORD.EXE" + Chr(34) + "c:\aaa.doc" + Chr(34), vbMaximizedFocus)
2 Dim app As Word.Application
Set app = GetObject("C:\aaa.doc", "Word.Application")


都打不开

作者: sea.er    时间: 2003-7-20 02:11
应该这样用:
Private Sub sunredday_Click()
Shell "WINWORD.EXE c:\sunredday\sunredday.doc"
End Sub






[此贴子已经被作者于2003-7-19 18:20:08编辑过]


作者: sunredday    时间: 2003-7-20 02:33
但实际上我的文件名称里面有变量 MYPATH
retval = Shell("WINWORD.EXE" + Chr(34) +MYPATH + "c:\aaa.doc" + Chr(34), vbMaximizedFocus)
这个问题是由于MYPATH里有空格造成的
应如何处理呢?

作者: sea.er    时间: 2003-7-21 18:24
我没这样用过,那位高手知道?
作者: tmtony    时间: 2017-9-11 11:21

Set app = CreateObject"Word.Application")
App.documents.open
来打开已有的Word文件




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