对于这个问题,乍一看,也许对很多人而言是再普通不过的了,不就是另存为的简单操作吗?当然,文件很少的情况下,是可以的,也相当简单。不过,如果文件很多的情况下,是否也能很快完成互转呢?我相信,不是那么高效吧!既然是大量文件,涉及到的就是个批量处理问题。很显然,各位还是期待高效率的互转技巧、技术。
既然我们是Office高级办公,那就多数情况下少不了VBA后台的代码应用支持。今天,我们就以Excel文档为例来为大家详尽分享,其他的Office文档和此方法完全类似。下面,我们先来作一番实现这个问题的简单的知识储备和技术思路分析。
为了交互的友好性,我们得调用Windows的文件对话框的API函数实现文件的选取。我们可以选取A(Filters,FilterIndex,Title,ButtonText,MultiSelect)或者Application .FileDialog(msoFileDialogOpen)或者Application .FileDialog(msoFileDialogFilePicker)实现。这三个函数其实很简单,大家可以去网上查阅,因为它不是我们本次作品的重点。
那也许各位粉丝朋友会问,那重点是什么呢?问得非常好,我们本次作品分享如何互转才是重点也是硬核技术。该方法就是Office文档对象的SaveAs方法。具体如下。
说明:将旧版本的Excel文档另存为高版本的Excel文档,其中的“xlExcel12”就是2007及以上的Excel文档。
说明:源工作簿文档不保存的关闭,其False标志就是这个意思。
四、用一个动态字符串数组获取选择文件打开对话框中选择的一个或多个文件的全路径文件名
说明:将打开文件对话框中选择的文件名集合传给动态数组f_fullpathname,如果选择了取消,则f_fullpathname的值为False。
说明:该结构可以用于高低版本的Excel文档互转,重要的是注意.SaveAs中的“FileFormat:=”的取值,就没什么问题了。
(一)低版本的Excel文档转启用宏的高版本的Excel文档
2、点击该对话框的<取消>或者标题栏的
3、否则,在上面的对话框中选择多个低版本的Excel文档。如下图所示
(二)启用宏的高版本的Excel文档转低版本的Excel文档
2、点击该对话框的<取消>或者标题栏的
3、否则,在上面的对话框中选择多个低版本的Excel文档。如下图所示
从上面,给各位粉丝朋友完整呈现了带宏Office文档和2003及以下文档轻松批量互转的操作问题,是不是很强大呢?我们如何在VBA后台实现的呢?下面,我们就来给各位看看它们的功能实现的代码截图吧。
好了,整个操作及功能实现代码都分享给大家了,有心动的感觉吗?那就收藏吧,如果要实现启用宏高版本的Word文档和低版本97-2003的Word文档互转,或者启用宏高版本的PowerPoint文档和低版本97-2003的PowerPoint文档互转,方法和前面分享的几乎完全类似,不同的是要查阅相关的文档类型参数而已。
最后,还是那句老话,非常感谢各位粉丝朋友的长期关注(头条号:跟我学Office高级办公)、推广和对作品的点评!疫情快过去了,加之天气越来越热了,大家还是要多多注意身体健康哦,谢谢!