RTF 批量转换为 DOCX 文件

  RTF是多信息文本格式,可用于多设备、系统。最近在做一个小的数据批量处理程序时遇到了RTF格式的数据文件,这种格式虽然跨设备跨系统,但是发现解析此格式的库比较少(至少Python比较少)而且功能不全,不能实现自己获取数据文件里面的表格的需求。而对于DOCX格式的文件,其解析库就相对成熟一些!所以我需要将RTF文件转换为DOCX文件。单个文件的话,直接用word打开,然后另存为docx即可,多个文件的时候就可以使用如下步骤进行批量处理:

1.新建一个空白 word,并双击打开:

2.Alt + F11 组合键打开宏运行环境。注意,如果该组合按键没有效果,可以试试 Alt + Fn + F11.

3.点击菜单栏的 插入 子菜单,选择 模块,插入一个代码模块:

4.将以下代码段复制到刚才打开的空白窗体中:

Option Explicit
Sub doc2docx()
Dim sEveryFile As String
Dim sSourcePath As String
Dim sNewSavePath As String
Dim CurDoc As Object
sSourcePath = "C:\Users\yxiao\Documents\workspace\医疗检测\数据\"
sEveryFile = Dir(sSourcePath & "*.Rtf")
Do While sEveryFile <> ""Set CurDoc = Documents.Open(sSourcePath & sEveryFile, , , , , , , , , , , msoFalse)sNewSavePath = VBA.Strings.Replace(sSourcePath & "DOCX文件\" & sEveryFile, ".Rtf", ".docx")CurDoc.SaveAs2 sNewSavePath, wdFormatDocumentDefaultCurDoc.Close SaveChanges:=FalsesEveryFile = Dir
Loop
Set CurDoc = Nothing
End Sub

5.修改代码中 rtf 文件所在的目录,以及转换后的 docx 结果文件存放的文件夹名,默认是在 rtf文件所在的当前目录下新建一个名为 DOCX文件 的文件夹:

RTF文件目录和DOCX文件目录如下图所示:

6.按下 F5 按键或者点击如图绿色三角标执行代码,然后等待代码执行完毕。需要转换的RTF文件数量越多,等待代码执行完毕的时间越长,一般50个RTF文件转换执行所需时间为15秒左右:

7.转换结果如下图所示:

RTF 批量转换为 DOCX 文件相关推荐

  1. 将DWG文件批量转换为JPG文件

    我们在工作上需要将DWG文件转换为JPG文件,在公司里有很多的DWG文件图纸转换JPG文件,我们不可能一个一个的转换,这时候我们为了提高工作效率需要将DWG文件批量转换为JPG文件,DWG文件批量转换 ...

  2. .doc文件转换为.docx文件

    .doc文件转换为.docx文件的python程序 #此程序调用wps来工作,如果只安装有word,则需要适当调整程序. #此程序将在待处理文件夹下新建一个名为'new'的目录,将转换后的.docx放 ...

  3. python docx 批量修改docx文件内容和选择位置添加内容

    #-*- encoding:utf_8 -*- from docx import Document from docx.shared import Inches from log import log ...

  4. C#:将blibli缓存文件批量转换为MP4文件

     C#:将blibli缓存文件批量转换为MP4文件 一.概述:我们主要处理哔哩哔哩缓存文件夹每一集中的audio.m4s和video.m4s以及entry.json文件,audio.m4s内容是每一集 ...

  5. 如何在Excel中将多个Excel文件批量转换为CSV文件?

    在Excel中,我们可以使用"另存为"功能将工作簿转换为CSV文件,但是您知道如何将多个Excel文件批量转换为单独的CSV文件吗? 在本文中,我介绍了一个VBA代码,用于将文件夹 ...

  6. latex 箭头_Pandoc上手以及如何使得latex文件转换为Docx文件(MAC)

    本文适合像我这种懒人.我的经验帖完全来自于https://pandoc.org/getting-started.html(官方指南) 致敬造物 . 安装的问题就不说了,非常的简单易得. 第一部分:*p ...

  7. php 把ppt转pdf文件大小,ppt转换成pdf 怎么将ppt文件批量转换为pdf文件?ppt高质量转换pdf的方法...

    在工作上,有时候要处理多个文件,并且会涉及到各种资料文档的格式转换问题.前两天就有狸友跟小编说工作中需要将大量资料文件ppt转换成pdf格式再传输给他人.如果一个个将ppt转化为pdf的话工作量也是很 ...

  8. Python—docx 批量生成 docx 文件

    文章目录 一.文档结构 二.方法 三.表格批量写入数据 四.批量修改表格文字字体大小颜色 一.文档结构 二.方法 from docx import Document from docx.shared ...

  9. python实现dat文件批量转换为 excel文件 关键词 批量格式转换 dat文件 excel读写 诺祺 可发表知乎ed csdn ed

    python实现批量dat转excel.pyimport os,time,xlwt def single(filepath):'''参数:txt文件路径,功能将其转换成excel文件'''print( ...

最新文章

  1. 深度图像分割 -- Fully Convolutional Networks for Semantic Segmentation
  2. GDCM:gdcm::FileDerivation的测试程序
  3. ERROR: Could not find a version that satisfies the requirement requests (from v ersions: none)
  4. SQL Server时间粒度系列----第6节基于当前日的小时数和分钟数与mysql unix_timestamp和from_unixtime的mssql实现...
  5. 【机器学习】集成学习之stacking
  6. BSP hidden form in generated html source code
  7. 二分查找找下标或者值
  8. python变量定义问题_python 定义n个变量方法 (变量声明自动化)
  9. Jmeter BeanShell采样器提取接口响应写入csv文件(四)
  10. php 字符串中 数组变量,PHP返回变量或数组的字符串表示:var_export()
  11. 小伙用微信小程序的Canvas手撸了一个娃娃机
  12. NPM ---- 安装yarn
  13. 2020届高考冲刺提分技巧;圆锥曲线系统秒杀技巧
  14. NVIDIA CUDA 高度并行处理器编程(九):并行模式:稀疏矩阵-向量乘法
  15. html json是什么文件,JSON是什么?
  16. bilibili视频爬取报错
  17. 进制转换(十进制转二进制)
  18. 单片机c语言字符串比较,代码对比
  19. 闲人闲谈PS之二十一——SAP自定义程序增加附件上传下载功能
  20. hbase-default.xml file seems to be for an older version of HBase ,this version is 1.2.0

热门文章

  1. 实现摄像头在内网、外网、GB28181实现“视频监控/直播”的常用几种方式
  2. 天旦发布DevOps实践应用指南,助力数字化转型
  3. Linux——扩展和缩减、删除逻辑卷
  4. 航天金税金税盘批量导入项目开发
  5. 1.C标准库——stdlib.h
  6. Chrome浏览器键盘快捷键
  7. 小米生态链战地学习笔记
  8. 报表工具对比选型系列——图形
  9. 快速安装黑苹果(MacOs)的一种方法
  10. 七大行星排列图片_七大行星大小排列顺序