实现Excel文件xls与xlsx格式批量互相转换

python实现方法

将文件夹中的所有xls或xlsx文件转换为xlsx或xls文件

import win32com.client as win32  # 需安装pywin32
import os.path
import globexcel = win32.gencache.EnsureDispatch('Excel.Application')#简易使用方法
#filename = r'E:\xlsx\1.xls'
#wb = excel.Workbooks.Open(filename)
#wb.SaveAs(filename+'x', FileFormat=51)  #FileFormat=51 是 .xlsx 的扩展
#wb.Close()                              #FileFormat=56 是 .xls 的扩展
#excel.Application.Quit()def xls2xlsx(xls_path, xlsx_path):# xls_path参数为待转换的xls文件所在文件夹# xlsx_path参数为转换完成的xlsx文件保存文件夹# 当xlsx保存文件夹存在同名原xls时，会弹窗提示是否替换，建议保存至空文件夹path_list = glob.glob(xls_path + '\\*.xls')  # 获取文件夹下所有xlsfor file in path_list:filename = os.path.basename(file).replace('.xls', '.xlsx')  # 获取文件名wb = excel.Workbooks.Open(file)wb.SaveAs(xlsx_path + '\\' + filename, FileFormat=51)  # xlsx为51wb.Close()excel.Application.Quit()print('xls2xlsx转换完成')def xlsx2xls(xlsx_path, xls_path):# xlsx_path参数为待转换的xlsx文件所在文件夹# xls_path参数为转换完成的xls文件保存文件夹# 当xls保存文件夹存在同名原xlsx时，会弹窗提示是否替换，建议保存至空文件夹path_list = glob.glob(xlsx_path + '\\*.xlsx')  # 获取文件夹下所有xlsxfor file in path_list:filename = os.path.basename(file).replace('.xlsx', '.xls')  # 获取文件名wb = excel.Workbooks.Open(file)wb.SaveAs(xls_path + '\\' + filename, FileFormat=56)  # xls为56wb.Close()excel.Application.Quit()print('xlsx2xls转换完成')if __name__ == '__main__':xls_path = r'E:\xlsx\xls'xlsx_path = r'E:\xlsx\xlsx'xls2xlsx(xls_path, xlsx_path)#xlsx2xls(xlsx_path, xls_path)

VBA实现方法

将文件夹中的所有xls或xlsx文件转换为xlsx或xls文件；保存时如果存在同名文件，则会覆盖

Function xls2xlsx(xls_path$, save_path$)'将xls_path文件夹中所有xls文件转为xlsx格式，保存至save_path文件夹；注意同名覆盖Dim fso As Object, wb As Workbook, save_file$Application.ScreenUpdating = False  '关闭屏幕更新，加快程序运行Application.DisplayAlerts = False   '不显示警告信息Set fso = CreateObject("Scripting.FileSystemObject")If Not fso.FolderExists(save_path) Then fso.CreateFolder (save_path)  '创建文件夹For Each f In fso.GetFolder(xls_path).Files  '遍历文件夹里文件If fso.GetExtensionName(f.Name) = "xls" Thensave_file = save_path & "\" & f.Name & "x"  '保存文件全名（文件路径、文件名、扩展名）Set wb = Workbooks.Open(f)wb.SaveAs filename:=save_file, FileFormat:=xlOpenXMLWorkbookwb.Close (False)End IfNextApplication.ScreenUpdating = TrueApplication.DisplayAlerts = True
End FunctionFunction xlsx2xls(xlsx_path$, save_path$)'将xlsx_path文件夹中所有xlsx文件转为xls格式，保存至save_path文件夹；注意同名覆盖Dim fso As Object, wb As Workbook, save_file$Application.ScreenUpdating = False  '关闭屏幕更新，加快程序运行Application.DisplayAlerts = False   '不显示警告信息Set fso = CreateObject("Scripting.FileSystemObject")If Not fso.FolderExists(save_path) Then fso.CreateFolder (save_path)  '创建文件夹For Each f In fso.GetFolder(xlsx_path).Files  '遍历文件夹里文件If fso.GetExtensionName(f.Name) = "xlsx" Thensave_file = save_path & "\" & fso.GetBaseName(f.Name) & ".xls"  '保存文件全名（文件路径、文件名、扩展名）Set wb = Workbooks.Open(f)wb.SaveAs filename:=save_file, FileFormat:=xlExcel8wb.Close (False)End IfNextApplication.ScreenUpdating = TrueApplication.DisplayAlerts = True
End FunctionPrivate Sub xls和xlsx转换测试()Dim file_path$, save_path$file_path = "E:\测试\xls"save_path = "E:\测试\xlsx"a = xls2xlsx(file_path, save_path)  '2种调用方式
'    Call xlsx2xls(save_path, file_path)
End Sub

实现Excel文件xls与xlsx格式批量互相转换相关推荐

java xlsx怎么转换成excel格式_python小工具 | Excel的xls和xlsx格式文件转换
众所周知Excel文件格式转换可以通过"另存为"的方式转换格式,可以说是简单方便,但是对于大量文件转换或者经常重复进行转换操作时,这种方法就很不方便. 显然利用程序对xls和xls ...
python win32选取文件夹_python小工具 | Excel的xls和xlsx格式文件转换
众所周知Excel文件格式转换可以通过"另存为"的方式转换格式,可以说是简单方便,但是对于大量文件转换或者经常重复进行转换操作时,这种方法就很不方便. 显然利用程序对xls和xls ...
c#读取生成excel表格文件xls、xlsx格式文件
全栈工程师开发手册 (作者:栾鹏) c#教程全解 c#存储生成excel表格格式xls.xlsx格式的文件需要电脑安装对应版本的office,并且在项目中引用excel 测试代码 static vo ...
java 使用 jacob 实现将 freemarker 导出的 XML 格式的 excel 转 xls、xlsx 格式
最近项目上有一个导出复杂excel的需求,发现无论是使用 poi 还是使用阿里巴巴的 easyexcel ,实际上都是编程式的方式,实现起来代码比较复杂而且不便于维护,于是决定采用 freemarke ...
Python读取excel文件可读取xlsx格式和xls格式可直接读取超链接，读出为字典格式（列表套字典），处理合并单元格的问题
直接上代码:(代码有注释,代码下方有解释) 1.可读取excel中的xlsx格式文件 2.可读取excel中的xls格式文件 3.可直接读取网页上的excel的超链接 4.解决有列合并的情况以及行合并 ...
python不能处理excel文件-python处理excel文件(xls和xlsx)
一.xlrd和xlwt 使用之前需要先安装,windows上如果直接在cmd中运行python则需要先执行pip3 install xlrd和pip3 install xlwt,如果使用pycharm ...
python处理excel文件(xls和xlsx)
一.xlrd和xlwt 使用之前需要需要先安装,windows上如果直接在cmd中运行python则需要先执行pip3 install xlrd和pip3 install xlwt,如果使用pycha ...
r语言导出文件为xlxs_R语言学习——R读取txt、csv、xls和xlsx格式文件
最近项目中运用到了R读取文件数据,所以把相关好用的.经过验证的方法总结了一下,有效避免下次入坑. 1. R读取txt文件使用R读取txt文件直接使用read.table()方法进行读取即可,不需要加 ...
java poi对excel xls和xlsx格式文件导入导出
一)poi简介 Apache POI项目是用于基于Microsoft的OLE 2复合文档格式开发文件格式的纯Java端口的主项目. 官网POI API地址:https://poi.apache.org ...

实现Excel文件xls与xlsx格式批量互相转换

目录

python实现方法

VBA实现方法

实现Excel文件xls与xlsx格式批量互相转换相关推荐

最新文章

热门文章