神马文学网我如何使用一个脚本把 Word 文档保存为文本文件？
来源：百度文库 编辑：神马文学网 时间：2024/05/01 21:41:58
问：
嗨，Scripting Guy！我有一系列 Word 文件。我想打开这些文件中的每一个并将它们另存为纯文本文件。有没有一种通过使用脚本实现此目的的方法呢？
-- CG
答：
您好，CG。是的，使用一个脚本，您很容易实现此目的。事实上，除了极少例外情况之外，您在 Microsoft Office 程序中可以做到的事情基本上都可以使用一个脚本来完成。在 Word 中，您可以使用“文件”–“另存为”将 Word 文档另存为文本文件。您也可以使用一个脚本做同样的事情。实际上，您可以使用以下脚本实现此目的：
Const wdFormatText = 2Set objWord = CreateObject("Word.Application")Set objDoc = objWord.Documents.Open("c:\scripts\mylog.doc")objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatTextobjWord.Quit
我们先创建一个名为“wdFormatText”的常量，然后将值 2 分配给它；此常量将用于告诉 Word 我们希望新文件保存为一个文本文件。然后我们创建一个 Microsoft Word 实例，使用“打开”方法打开文件 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”方法关闭 Word 实例。
两个重要注意事项。第一，您在屏幕上看不到任何正在发生的事情，因为，默认情况下，无论何时您从一个脚本中调用 Word，它都将运行在一个不可见窗口中。如果您希望看到它在屏幕上弹出，保存文件，然后消失，请使用以下代码：
Const wdFormatText = 2Set objWord = CreateObject("Word.Application")objWord.Visible = TRUESet objDoc = objWord.Documents.Open("c:\scripts\mylog.doc")objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatTextobjWord.Quit
唯一的不同之处在于：我们将“Visible”属性设置为 TRUE。
第二，您可以将 Word 文档另存为纯文本以外的格式。例如，使用常量 wdFormatHTML（值 = 8）将 Word 文档另存为 HTML 文件；使用常量 wdFormatXML（值 = 11）将 Word 文档另存为 XML 文件。
冒着被误认为是在做商业宣传的风险告诉您：如果您想了解关于脚本和 Microsoft Office 的更多信息，欢迎访问“Scripting Week 2”网络广播If You Want Something Done Right, Let Microsoft Office Do It For You（如果您想把事情做好，请让 Microsoft Office 来帮助您）— 2005 年 1 月 25 日为您播出。
嗨，Scripting Guy！我有一系列 Word 文件。我想打开这些文件中的每一个并将它们另存为纯文本文件。有没有一种通过使用脚本实现此目的的方法呢？
-- CG
答：
您好，CG。是的，使用一个脚本，您很容易实现此目的。事实上，除了极少例外情况之外，您在 Microsoft Office 程序中可以做到的事情基本上都可以使用一个脚本来完成。在 Word 中，您可以使用“文件”–“另存为”将 Word 文档另存为文本文件。您也可以使用一个脚本做同样的事情。实际上，您可以使用以下脚本实现此目的：
Const wdFormatText = 2Set objWord = CreateObject("Word.Application")Set objDoc = objWord.Documents.Open("c:\scripts\mylog.doc")objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatTextobjWord.Quit
我们先创建一个名为“wdFormatText”的常量，然后将值 2 分配给它；此常量将用于告诉 Word 我们希望新文件保存为一个文本文件。然后我们创建一个 Microsoft Word 实例，使用“打开”方法打开文件 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”方法关闭 Word 实例。
两个重要注意事项。第一，您在屏幕上看不到任何正在发生的事情，因为，默认情况下，无论何时您从一个脚本中调用 Word，它都将运行在一个不可见窗口中。如果您希望看到它在屏幕上弹出，保存文件，然后消失，请使用以下代码：
Const wdFormatText = 2Set objWord = CreateObject("Word.Application")objWord.Visible = TRUESet objDoc = objWord.Documents.Open("c:\scripts\mylog.doc")objDoc.SaveAs "c:\scripts\mylog.txt", wdFormatTextobjWord.Quit
唯一的不同之处在于：我们将“Visible”属性设置为 TRUE。
第二，您可以将 Word 文档另存为纯文本以外的格式。例如，使用常量 wdFormatHTML（值 = 8）将 Word 文档另存为 HTML 文件；使用常量 wdFormatXML（值 = 11）将 Word 文档另存为 XML 文件。
冒着被误认为是在做商业宣传的风险告诉您：如果您想了解关于脚本和 Microsoft Office 的更多信息，欢迎访问“Scripting Week 2”网络广播If You Want Something Done Right, Let Microsoft Office Do It For You（如果您想把事情做好，请让 Microsoft Office 来帮助您）— 2005 年 1 月 25 日为您播出。
我如何使用一个脚本把 Word 文档保存为文本文件？
如何将 文本文件 保存为 BAT文件
应该如何将输出保存到一个文本文件？
应该如何将输出保存到一个文本文件？
PDF文档如何转换为WORD文档
PDF文档如何转换为WORD文档
把EXCEL表格转换为WORD文档
把EXCEL表格转换为WORD文档
把EXCEL表格转换为WORD文档.
把EXCEL表格转换为WORD文档。。。
如何把Word文档转成PowerPoint简报
如何快速实现把word文档转换成PDF文档
我把《如何教宝宝阅读》整理成了word文档 - 儿童教育论坛
可以使用脚本合并多个文本文件吗？
把EXCEL表格转换为WORD文档00
把EXCEL表格转换为WORD文档2
如何把Word文档插入到Excel电子表格中_
如何把Word文档插入到Excel电子表格中
如何把Word文档插入到Excel电子表格中
如何把Word文档插入到Excel电子表格中_
如何把Word文档插入到Excel电子表格
如何把自动播放插入到Word文档做背景音乐 -
转：我把《如何教宝宝阅读》整理成了word文档 - 儿童教育论坛 - Powered By ETJY
NS2脚本中如何使用God - 程序开发 - 文档专区 - Linux论坛