当前位置：首页 > 技巧 > 正文内容

利用word宏命令 批量实现html文件转word

4个月前 (01-27)技巧61
用word宏命令批量实现html文件转word
打开Word
菜单“视图”-“宏”-“查看宏”-“创建”
粘贴以下代码运行即可
注意
需转换的html文件路径为D:\My Documents\2019\
转换后的word文件也在该目录下
具体文件路径根据情况自行更改
Sub HtmltoWord()
    Dim MyFile As String
    Dim Arr(1000) As String    '一次处理最大的文件数量，根据需要修改数字1000改为需要处理的数量
    Dim count As Integer
    MyFile = Dir("D:\My Documents\2019\" & "*.html")
    count = count + 1
    Arr(count) = MyFile
    Do While MyFile <> ""
       MyFile = Dir
       If MyFile = "" Then
           Exit Do
       End If
       count = count + 1
       Arr(count) = MyFile        '将文件的名字存在数组中
    Loop
    For i = 1 To count
       Documents.Open FileName:="D:\My Documents\2019\" & Arr(i), ConfirmConversions:=False, ReadOnly:= _
       False, AddToRecentFiles:=False, PasswordDocument:="", PasswordTemplate:= _
       "", Revert:=False, WritePasswordDocument:="", WritePasswordTemplate:="", _
       Format:=wdOpenFormatAuto, XMLTransform:=""
       ActiveDocument.SaveAs FileName:="D:\My Documents\2019\" & Replace(Arr(i), ".html", ".doc"), FileFormat:=wdFormatDocument, _
       LockComments:=False, Password:="", AddToRecentFiles:=True, WritePassword _
       :="", ReadOnlyRecommended:=False, EmbedTrueTypeFonts:=False, _
       SaveNativePictureFormat:=False, SaveFormsData:=False, SaveAsAOCELetter:= _
       False
       ActiveDocument.Close
    Next
End Sub

扫描二维码推送至手机访问。

版权声明：本文由悦活筆录发布，如需转载请注明出处。

本文链接：http://aaghb.com/?id=370

分享给朋友：
返回列表

上一篇：批量提取多个WORD文档的文件名

下一篇：win11彻底卸载onedrive详细步骤

“利用word宏命令 批量实现html文件转word” 的相关文章

Win11换回Win7照片查看器

1、在桌面空白的地方，点击【右键】，打开的右键菜单项中，选择【新建 - 文本文档】。2、新建 文本文档 - 记事本窗口，输入以下命令。Windows Registry Editor Version 5...

批量提取多个WORD文档的文件名

1. 首先打开电脑，找到想要提取文件名的WORD文档，将它们放在同一文件夹下面。2. 然后在空白处，右键，在打开的菜单中，选择“新建”---“文本文档”选项。3. 将新建的文本文档打开，输入下方的代码...

win11彻底卸载onedrive详细步骤

Win11彻底删除微软onedrive的具体步骤是：1、在电脑桌面点击Windows图标 然后在弹出的菜单中点击设置图标。2、在设置中点击“应用”。3、在应用中点击“应用和功能”。4、在应用列表下的搜...

一行代码将txt文档批量转为word文档（doc）

一、需要转换为doc/docx文档的TXT全部放在一个文件夹内。二、同时在该文件夹下新建一个记事本文件（名称不限或者默认），写入如下代码：rename *.txt *.doc（转换...

ZBLOG PHP管理后台入口地址及后台无法登录解决方法

zblog后台网站设置--全局设置里面有个“关闭网站”功能，这个功能是给一些有临时关站的用户使用的。ZBLOG PHP管理后台地址后台：/zb_system/login.phpSelect CodeC...

发表评论

访客

◎欢迎参与讨论，请在这里发表您的看法和观点。

E-mail:ghbt@foxmail.com  微信:aaaaGHB

Powered By Z-BlogPHP. Theme by TOYEAN.