請(qǐng)問直接打開一個(gè)word文檔的vba指令是什么？

徐阿鵬 · 發(fā)表于 2003-6-23 22:59:00

請(qǐng)問直接打開一個(gè)word文檔的vba指令是什么？
不會(huì)是shell吧？
謝謝！

sea.er · 發(fā)表于 2003-6-25 21:22:00

Shell "WINWORD.EXE *.doc"可以

徐阿鵬 · 發(fā)表于 2003-6-26 01:11:00

不錯(cuò)，謝謝，要加個(gè)路徑，不加路徑就是默認(rèn)的我的文檔的路徑
謝謝

sunredday · 發(fā)表于 2003-7-20 01:06:00

如何加上具體的文件路徑？

sea.er · 發(fā)表于 2003-7-20 01:14:00

Shell "WINWORD.EXE c:\sunredday\sunredday.doc"

sunredday · 發(fā)表于 2003-7-20 01:44:00

就這么簡(jiǎn)單？
不用WINWORD.EXE +CH（34）+ c:\sunredday\sunredday.doc+ CH（34）

sunredday · 發(fā)表于 2003-7-20 01:45:00

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 · 發(fā)表于 2003-7-20 02:11:00

應(yīng)該這樣用：
Private Sub sunredday_Click()
Shell "WINWORD.EXE c:\sunredday\sunredday.doc"
End Sub

[此貼子已經(jīng)被作者于2003-7-19 18:20:08編輯過]

sunredday · 發(fā)表于 2003-7-20 02:33:00

但實(shí)際上我的文件名稱里面有變量 MYPATH
retval = Shell("WINWORD.EXE" + Chr(34) +MYPATH + "c:\aaa.doc" + Chr(34), vbMaximizedFocus)
這個(gè)問題是由于MYPATH里有空格造成的
應(yīng)如何處理呢？

sea.er · 發(fā)表于 2003-7-21 18:24:00

我沒這樣用過，那位高手知道？

帳號(hào)		自動(dòng)登錄	找回密碼
密碼			注冊(cè)

群介紹
Access培訓(xùn)群 (792054000)
Access免費(fèi)培訓(xùn)2群 (163530137)
Access免費(fèi)培訓(xùn)群 (833510950)
Access免費(fèi)培訓(xùn)群2 (792054000)
Access交流總?cè)?br/>(5004108)

主題相關(guān)群

地區(qū)相關(guān)群[您還沒設(shè)置居住地]

[模塊/函數(shù)] 請(qǐng)問直接打開一個(gè)word文檔的vba指令是什么？

群介紹
主題無相 (隨機(jī)顯示版	同地區(qū)群塊其他地區(qū))

主題相關(guān)群

地區(qū)相關(guān)群[您還沒設(shè)置居住地]

[模塊/函數(shù)] 請(qǐng)問直接打開一個(gè)word文檔的vba指令是什么？

[模塊/函數(shù)] 請(qǐng)問直接打開一個(gè)word文檔的vba指令是什么？