一、还是求WORD批量处理宏要求：将一个文件夹里的所有WORD文件（

我觉得这个可能很难。

如果我们让宏打开一个一个的文件执行设置字号操作，其实还是要让Word打开这些文件，速度还是很慢。 如果我们了解Word文档的内部结构，或许可以完全通过代码在后台实现，无须使用Word将它们一个个打开。

我不是太懂编程，不知有人懂吗？ 或许我可以推荐你使用OfficeTab这款让Word、Excel、PowerPoint支持标签的插件（下载地址： 安装OfficeTab后，进入有多个DOC文档的文件夹，全选所有文件，按下回车键，Word就会打开所有文件并在同一个窗口中显示多个标签，执行宏代码，这样或许感觉舒服点。 不过我试了下打开40个DOC文件，确实有些慢，然后直接点Word右上角的关闭按钮，可能太多了，好像Word死掉了，后来终止进程才解决。

可能与系统配置不太好有关。呵呵！。

二、bat只保留某文件夹下某类型的第n个文件（如果可让文件自动按时间

@echo offsetlocal EnableDelayedExpansionmd ctl_temp >nul 2>nulfor /f %%i in ('dir /od /b *.ctl') do set newfile=%%ifor /f %%j in ('dir /od /b *.ctl') do (if !newfile! NEQ %%j (move %%j ctl_temp\)）代码如上，为了数据安全，把你想删除的文件，移动到了 ctl_temp 文件夹中，如果想直接删除的话，把 move %%j ctl_temp\ 改成 del /f /q %%j ，删除有风险，有备才无患！把这段代码存成bat到该文件夹下，运行即可！备注：里面的 /od 是按文件的时间顺序排列的，不可省略。

三、求个WORD批量处理宏要求：将一个文件夹里的所有WORD文件（当

这个其实非常简单，编几行代码便可瞬间完成，根本不用一个文件一个文件地来，全部批量自动化操作并保存关闭。

以Word2003为例。Word2007类似。

首先你可以用Word打开所有的DOC文档，然后菜单“工具---宏”，输入宏名：全部文档小五号，在“宏的位置”选择“Norma t（共用模板），再点“创建”，把以下代码复制粘贴到里面就可以了。 不论你是打开20还是50个文档，可以说是瞬间完成。

本方法是通过一个循环遍历所有打开的文档进行操作。 将变量doc定义为一个文档类型document，而Documents代表所有打开的文档，然后通过For Each循环遍历所有打开的文档，全选每一个文档并将字体设为9号字（即小五号）。

为了以后方便使用，你可以选择菜单“工具---自定义”，点“命令”选项卡，在左边的“类别”中找到“宏”，将右边的这个宏命令拖放到工具栏，以后点一下工具栏这个按钮就可以了，还可以点击这个窗口下边的“键盘”按钮，找的方法同上，给这个宏命令设定一个快捷方式。 以后想用时绝对超级方便快捷。

是否保存或既保存并关闭由你自己决定（修改代码即可），如果某个文档是新建的文档且从未保存过文件名，则弹出“另存为”对话框，如果全部是打开的文档，则自动保存并全部关闭。 Sub 全部文档小五号（） On Error Resume Next Dim doc As Document For Each doc In Documents With doc 。

Activate 。Application。

Selection。WholeStory '全选 。

Application。Selection。

Font。Size = 9 '字体大小设为9号（即小五号） 。

Save '保存文档 。Close '关闭文档 End With Next doc End Sub 。

转载请注明出处51数据库 » 批处理保存word文件