在右键菜单中转换Word文档

软件世界

唐永华

笔者因工作需要常要将Word文档(.DOC)转换为纯文本文件(.TXT)，每次都要打开Word然后再用“另存为…”命令来完成，很麻烦，但又苦于没有好方法。前几日终于找到了在“.DOC”文档的右键菜单中加上一个“转换为文本”的命令来自动完成文本转换的办法，特整理成文，与大家共享。
一、打开Word，录制一个基于共同模板Normal.dot的“另存为”的宏，具体方法是：选择“工具→宏→录制新宏”，将宏名改为“Savetxt”，然后再选择“文件→另存为”，将“文件类型”改为“纯文本(.TXT)”，按“确定”后停止录制宏。再选择“工具→宏→宏”后，编辑“Savetxt”宏，将宏的第一行“ActiveDocument.SaveAs FileName:="Doc1.txt"”改为“ActiveDocument.SaveAs FileName:=ActiveDocument.Name+".txt"”，退出Word，在出现“所做修改会影响共用模板Normal.dot。是否保存所做修改？”时，选择“是”。
二、打开“我的电脑”(任意文件夹都行)，选择“查看→文件夹选项”，单击“文件类型”标签，在“已注册的文件类型”中找到“Microsoft Word 文档”，单击“编辑”，然后选择“新建”，选中“使用DDE”，在“操作”中填上“转为文本”，在“用于执行操作的应用程序”中填上“"C:\Program Files\Microsoft Office\Office\WINWord.EXE" /x /n”(Microsoft Office如果不是安装在默认目录中，可根据实际路径修改)，在“DDE消息”中填上“[REM _DDE_Minimize][FileOpen("%1")][DocClose]”，在“应用程序”中填“WinWord”，在“未运行的DDE程序”中填“[FileOpen("%1")][savetxt][FileExit 2]”，在“主题”中填“system”，最后按“确定”退出。
三、选中要转换的Word文档，单击鼠标右键，选择“转为文本”，这时会自动启动Word，并运行“Savetxt”宏，将文档转为文本，然后自动关闭Word。我们就可到Word默认的工作目录中找到转换后的文本文件了，该文件用原主文件名加上“.TXT”作为文件名。如果同时选中多个Word文档，也可实现文件的批量转换。
功能扩展：有时除了要把Word文档转为文本文件外，同时还要转为“RTF”等其他格式，可以依照第一步先录制宏“Savertf”等，然后在“未运行的DDE程序”中添上“[Savertf]”就行了。