【WORD】批量将doc转为docx

具体步骤进行:

  1. 打开Word文档,按下Alt+F11快捷键,打开VBA编辑器。
  2. 在VBA编辑器中,左侧的"项目资源管理器"窗口会显示当前打开的Word文档相关项目。找到您要添加代码的文档项目(通常以文档名称命名),右键单击该项目。
  3. 在弹出的菜单中,选择"插入",然后在子菜单中点击"模块"。此时会创建一个新的模块,并打开它的代码编辑窗口。
vbnet 复制代码
Sub ConvertDocToDocx()
    Dim myDialog As FileDialog
    Dim oFile As Variant
    Set myDialog = Application.FileDialog(msoFileDialogFilePicker)
    With myDialog
       .Filters.Clear '清除所有文件筛选器中的项目
       .Filters.Add "所有WORD97 - 2003文件", "*.doc", 1 '增加筛选器的项目为所有WORD97 - 2003文件
       .AllowMultiSelect = True '允许多项选择
       If.Show = -1 Then '确定
          For Each oFile In.SelectedItems '在所有选取项目中循环
             With Documents.Open(oFile)
                .SaveAs FileName:=Replace(oFile, "doc", "docx"), FileFormat:=12
                .Close
             End With
          Next
       End If
    End With
End Sub
  1. 将之前编写好的转换代码复制并粘贴到新模块的代码编辑窗口中。
  2. 检查代码是否有语法错误等问题,确保代码准确无误。

完成以上步骤,代码就添加到VBA编译环境中了。您可以在VBA编辑器中对代码进行调试、运行等操作。若要运行代码,可点击VBA编辑器中的运行按钮(绿色三角形图标),或按下F5键。

相关推荐
19H2 小时前
Flink-Source算子状态恢复分析
c#·linq
weixin_472339464 小时前
高效处理大体积Excel文件的Java技术方案解析
java·开发语言·excel
枯萎穿心攻击4 小时前
响应式编程入门教程第二节:构建 ObservableProperty<T> — 封装 ReactiveProperty 的高级用法
开发语言·unity·c#·游戏引擎
Eiceblue6 小时前
【免费.NET方案】CSV到PDF与DataTable的快速转换
开发语言·pdf·c#·.net
m0_555762906 小时前
Matlab 频谱分析 (Spectral Analysis)
开发语言·matlab
浪裡遊7 小时前
React Hooks全面解析:从基础到高级的实用指南
开发语言·前端·javascript·react.js·node.js·ecmascript·php
lzb_kkk8 小时前
【C++】C++四种类型转换操作符详解
开发语言·c++·windows·1024程序员节
好开心啊没烦恼8 小时前
Python 数据分析:numpy,说人话,说说数组维度。听故事学知识点怎么这么容易?
开发语言·人工智能·python·数据挖掘·数据分析·numpy
简佐义的博客9 小时前
破解非模式物种GO/KEGG注释难题
开发语言·数据库·后端·oracle·golang