2009-10-07 112 views
1

當在Access中的窗體啓動Word中,我這樣做:從Access啓動Word - 第二次失敗

Dim wordApp As Word.Application 
    Dim wordDoc As Word.Document 
    Dim wordRange As Word.Range 

    Set wordApp = CreateObject("Word.Application") 

    wordApp.Visible = True 
    Set wordDoc = wordApp.Documents.Open(etikettenTemplate) 

    ' fill in some bookmarks in the word doc 

    Set wordApp = Nothing 
    Set wordDoc = Nothing 
    Set wordRange = Nothing 

的問題是:這個運行良好的第一次代碼運行。第二次出現運行時錯誤462:遠程服務器計算機不存在或不可用。

問題是,我無法控制整個循環,因爲用戶在關閉前可能需要編輯word文檔。難道我做錯了什麼? 感謝您的任何建議

+0

問題也可以滿足其他Office應用程序。 – 2009-10-07 21:08:49

回答

1

對不起,已經能夠自己解決問題。

該錯誤是,我是通過

ActiveDocument.Bookmarks訪問該文檔的書籤(mybookmark).Range

代替先前選擇wordDoc可變

通過改變的ActiveDocument出現的所有與wordDoc 問題消失。

感謝所有反正

+0

+1用於獲得解決方案。 – Fionnuala 2009-10-07 21:43:22