嗨，Scripting Guy！

  • 發行項

嗨，Scripting Guy！

歡迎使用 TechNet 專欄，Microsoft Scripting Guys 會在此為您解答有關系統管理指令碼的常見問題。您有關於系統管理指令碼方面的問題嗎？請將電子郵件傳送到 scripter@microsoft.com。我們無法保證能夠逐一回答每個問題，不過我們會盡力而為。

還有，別忘了瞧瞧全新經過改良的嗨，Scripting Guy！過往文件。

今天的問題：如何將 Word 的修訂檢視模式改成完稿？

如何將 Word 的修訂檢視模式改成完稿？

問

嗨，Scripting Guy！我的文件在 Microsoft Word 2003 中是以顯示完稿變更狀態開啟。請問要如何修改，使預設檢視為完稿？

-- CD
答

CD，您好。這是感恩節過後我們第一個撰寫的嗨，Scripting Guy！專欄。連著四天吃大餐、打橄欖球、吃大餐、打棒球，又再吃點東西 (嗯，其實是暴飲暴食，不是只有一點)，我們決定回來後最好挑個簡單的問題，當作暖身運動，如果真的挑簡單的下手，比較聰明，沒想到選上您的問題。

我們很快就發現事實沒有想像 (期待) 中的簡單。第一，沒有辦法將「完稿」設定為全域預設值，也就是無法使所有的 Word 文件開啟時，修訂檢視模式已經設為「完稿」。這個設定必須在文件中一一設定。因此我們提供的指令碼可以開啟特定文件，並設定這一文件的修訂檢視模式。雖然不完全是您要的結果，但已經是我們能想出的最好辦法。

第二，Word 的 RevisionsView 屬性其實有兩個設定：「顯示完稿變更」和「原始原稿標記」。這倒也還好，問題出在 Word 本身有四個類似的設定：「顯示完稿變更」、「原始原稿標記」、「原稿」和您要求的「完稿」。已驚嚇得眾人花容失色，還用問？

幸好 Scripting Guy 已經從許多驚嚇的經驗練就堅強的個性。我們花了點時間實驗和探索 Microsoft Word 物件模型，終於找到解決辦法。以下面的指令碼為例，它可以開啟 C:\Scripts\Test.doc 文件並將修訂檢視模式設定為「完稿」。

 
Const wdRevisionsViewFinal = 0

Set objWord = CreateObject("Word.Application")
Set objDoc = objWord.Documents.Open("c:\scripts\test.doc")

Set objView = objWord.ActiveDocument.ActiveWindow.View

objView.RevisionsView = wdRevisionsViewFinal 
objView.ShowRevisionsAndComments = False 

objWord.Visible = True

您瞧，指令碼一點也不長或複雜，指示有點複雜。我們先定義一個名為 wdRevisionsViewFinal 的常數，並且將值設為 0，這個常數當然是用來指出 RevisionsView 屬性是否應該設定為「完稿」或「顯示完稿變更」。別擔心，我們會解釋如何進行這兩個設定)。那如果要把 RevisionsView 設定為「原稿」或「原始原稿標記」，又該如何？這時就需要定義一個名為 wdRevisionsViewOriginal 的常數，並將值設定為 1：

Const wdRevisionsViewOriginal = 1

接著建立 Word.Application 物件的執行個體，使用 Open 方法開啟 C:\Scripts\Test.doc 檔案。然後利用下面這行指令碼，替這個文件建立 View 物件的參考。

Set objView = objWord.ActiveDocument.ActiveWindow.View

現在要做兩件事：第一，將 RevisionsView 屬性的值設為 0 (使用 wdRevisionsViewFinal 常數)。第二，將 RevisionsView 設定為 0 ，即可取得「顯示完稿變更」的修訂檢視模式。

等等，您要的不是「顯示完稿變更」，而是簡簡單單的「完稿」。沒問題，要取得這個模式，您得先設定 RevisionsView 屬性，把 ShowRevisionsAndComments 屬性設定為 False：

objView.ShowRevisionsAndComments = False

這樣應該就可行了。設定過 RevisionsView 和 ShowRevisionsAndComments 後，接著將 Visible 屬性設定為 True，以便在螢幕上看見 Test.doc，而且修訂檢視模式以經設定為「完稿」。

還是困惑嗎？不要難過，我們一開始也是這樣的。下面的表格顯示每個檢視模式的必要設定，供您參考：

檢視模式RevisionsViewShowRevisionsAndComments
完稿0False
FinalShowingMarkup0True
原稿1False
OriginalShowingMarkup1True

試著玩玩看，您馬上就知道這是怎麼運作的了。

附註：下次感恩節我們一定要挑一個簡單點的問題。如果讀者有興趣知道 2006 年感恩節專欄的內容，歡迎閱讀。

嗨，Scripting Guy！如何使用 WSH 顯示訊息方塊？

-- GS

GS，方法如下：

Wscript.Echo "This is my message box."

咦！這個問題好像今年已經討論過了...

如需詳細資訊

查看嗨，Scripting Guy！- 過往文件

 

回到頁首 回到頁首