青青草97国产精品免费观看无弹窗版,久久久久久久久久亚洲,欧美精品xxxxbbbb

問(wèn)：
嗨，Scripting Guy！我有一系列 Word 文件。我想打開這些文件中的每一個(gè)并將它們另存為純文本文件。有沒有一種通過(guò)使用腳本實(shí)現(xiàn)此目的的方法呢？

-- CG

答：
您好，CG。是的，使用一個(gè)腳本，您很容易實(shí)現(xiàn)此目的。事實(shí)上，除了極少例外情況之外，您在 Microsoft Office 程序中可以做到的事情基本上都可以使用一個(gè)腳本來(lái)完成。在 Word 中，您可以使用“文件”–“另存為”將 Word 文檔另存為文本文件。您也可以使用一個(gè)腳本做同樣的事情。實(shí)際上，您可以使用以下腳本實(shí)現(xiàn)此目的：

復(fù)制代碼代碼如下:

Const wdFormatText = 2   

Set objWord = CreateObject("Word.Application")   
Set objDoc = objWord.Documents.Open("c:\scripts\mylog.doc")   
objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatText   

objWord.Quit  

我們先創(chuàng)建一個(gè)名為“wdFormatText”的常量，然后將值 2 分配給它；此常量將用于告訴 Word 我們希望新文件保存為一個(gè)文本文件。然后我們創(chuàng)建一個(gè) Microsoft Word 實(shí)例，使用“打開”方法打開文件 C:\Scripts\MyLog.doc。文檔打開之后，我們只需要一行代碼就可將此 Word 文檔另存為文本文件：

objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatText

As you can see, we call the SaveAs method, and we pass it two parameters: 1) C:\Scripts\MyLog.txt, which is the path for our new text file; and, 2) wdFormatText, which tells Word to save the file as plain text.這樣就可以了。然后我們使用“Quit”方法關(guān)閉 Word 實(shí)例。

兩個(gè)重要注意事項(xiàng)。第一，您在屏幕上看不到任何正在發(fā)生的事情，因?yàn)椋J(rèn)情況下，無(wú)論何時(shí)您從一個(gè)腳本中調(diào)用 Word，它都將運(yùn)行在一個(gè)不可見窗口中。如果您希望看到它在屏幕上彈出，保存文件，然后消失，請(qǐng)使用以下代碼：

Const wdFormatText = 2

Set objWord = CreateObject("Word.Application")
objWord.Visible = TRUE
Set objDoc = objWord.Documents.Open("c:\scripts\mylog.doc")
objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatText

objWord.Quit

唯一的不同之處在于：我們將“Visible”屬性設(shè)置為 TRUE。

第二，您可以將 Word 文檔另存為純文本以外的格式。例如，使用常量 wdFormatHTML（值 = 8）將 Word 文檔另存為 HTML 文件；使用常量 wdFormatXML（值 = 11）將 Word 文檔另存為 XML 文件。

您可能感興趣的文章:

如何用word vb宏來(lái)生成sql
VB.net讀取Word文檔屬性的方法
VB中的RasEnumConnections函數(shù)返回632錯(cuò)誤解決方法
VB6中的LSet語(yǔ)句和RSet語(yǔ)句詳解
VB實(shí)現(xiàn)的16位和32位md5加密代碼分享
通過(guò)VB6將ASP編譯封裝成DLL組件最簡(jiǎn)教程附全部工程源文件
VB6反編譯軟件VB RezQV2.4a 正式版注冊(cè)碼
VB調(diào)用Word拼寫檢查功能實(shí)例

標(biāo)簽：周口六安廣安臺(tái)灣嘉興玉林延安漳州

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《用vbscript把 Word 文檔保存為文本文件的代碼》，本文關(guān)鍵詞用,vbscript,把,Word,文檔,保,；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。

婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

用vbscript把 Word 文檔保存為文本文件的代碼