另存为xlsx文件

最新推荐文章于 2024-06-28 16:12:31 发布
最新推荐文章于 2024-06-28 16:12:31 发布
阅读量1.5k 收藏 2
点赞数
分类专栏： VBA
版权声明：本文为博主原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。
本文链接：https://blog.csdn.net/seven_21/article/details/52671384
版权

工具对于大量报告的生成，可以使用工具打开模板文件，添加数据、图片的信息后，另存为新的报告，然后关闭并不保存模板。


’打开模板时，将打开动作设为隐藏

'ActiveWorkbook.viseble = False '隐藏打开文件的动作


’添加具体操作。。。



'1.另存为文件夹名称对应的报告，51代表文件类型为.xlsx，例:"Site Design Report_B00459.xlsx"
ActiveWorkbook.SaveAs ThisWorkbook.Path & "\Site Design Report_" & mfolder.Name, 51


'2.这种saveas后的.xlsx副本不能打开，暂弃用
'ActiveWorkbook.SaveAs Filename:=ThisWorkbook.Path & "\Site Design Report_" & mfolder.Name & ".xlsx", _
FileFormat:=xlNormal, Password:="", WriteResPassword:="", _
ReadOnlyRecommended:=False, CreateBackup:=False


'ActiveWorkbook.viseble = True  '显示文件，恢复原设置
ActiveWorkbook.Close False  '不保存关闭模板，，True表示保存关闭

靠谱青年菜头
关注
专栏目录
【EXCEL自动化08】将xls文件批量另存为xlsx文件
Turbo学习笔记
04-13 617
可以使用Python的pandas库来实现批量将xls文件另存为xlsx文件的功能。运行代码将遍历文件夹中的所有xls文件，然后另存为xlsx文件到另一个文件夹中。想保持原格式不动可以直接修改文件的后缀，方法见下一篇。除了pandas库还需要安装 xlrd 库。的文件夹路径，将 '
使用python的win32com模块另存excel文件，如xls另存为xlsx、xlsm另存为xlsx、csv另存为xlsx
jieru_liu的博客
03-26 3747
import win32com.client as win32 # 1、创建 excel 程序 app = win32.Dispatch("excel.application") # 2、打开要转换的文件 wb = app.Workbooks.Open(r"C:\Users\admin\Documents\测试.xls") # 3、另存为 wb.SaveAs("test.xlsx", FileFormat=51) # 4、关闭工作簿 wb.Close() # 5、退出 Excel程序 ap
vsto 打开的xls后缀文件另存为xlsx文件
nbspzs的专栏
03-07 179
请注意，上述代码使用了 Microsoft.Office.Interop.Excel 库，该库需要在项目中引用。确保你的项目引用了正确的 COM 组件。此外，由于使用了 COM 对象，确保在适当的时候释放这些对象，以避免潜在的内存泄漏。在 VSTO (Visual Studio Tools for Office) 中，你可以使用以下代码将打开的 `.xls` 文件另存为 `.xlsx` 文件。在实际使用中，你可能需要根据具体情况进行适当的错误处理和资源管理。
导出xlsx
qq_51389137的博客
04-13 358
exportFunc(e) { // 从表生成工作簿对象 const wb = XLSX.utils.table_to_book(document.getElementById('out-table')); // 得到二进制字符串作为输出 const wbout = XLSX.write(wb, { bookType: 'xlsx', type: 'binary', }); FileSaver....
一段VBA代码将xls转换为xlsx文件
最新发布
weixin_45211480的博客
06-28 144
【代码】一段VBA代码将xls转换为xlsx文件。
vba 2007 ActiveWorkbook.SaveAs problem
贾亮的专栏
08-28 2423
vba 2007 ActiveWorkbook.SaveAs problem 在使用vba保存生成的excel文件后，然后在打开总是提示格式不对，不管提示，进入后格式时对的，数据也可以显示。 最后google之，原来在2003之后使用ActiveWorkbook.SaveAs时必须指定文件类型。 51 = xlOpenXMLWorkbook (without macro's in 2007,
VBA通过一定规律匹配后另存为文件
liuxiaoddd的专栏
10-27 717
下载下来80多个文件只有中文机构名，通过机构对照表匹配对应的机构号，然后用机构号来另存文件。 运行前： 运行后： 机构表： 代码附上： Sub GetAll() Dim MyPath$, MyName$, NewName$, orgname$, orgno$ Dim N%, POS%, a% Dim MyFile Dim count! N = 1 POS = 0 a = 1 ActiveWorkbook.Sheets(1).Columns(1).Clear Activ..
python xls 另存为xlsx
07-29
可以使用Python的第三方库openpyxl来实现将xls文件另存为xlsx文件的功能。下面是一个简单的示例代码： ```python import openpyxl from openpyxl import load_workbook # 打开xls文件 xls_file = "input.xls" ...
java xls另存为xlsx
07-08
你需要将`input.xls`替换为你要转换的XLS文件的路径，将`output.xlsx`替换为你想要保存的XLSX文件的路径。 请确保在运行代码之前添加Apache POI库的依赖。可以通过在`pom.xml`文件中添加以下依赖来实现： ```xml ...
VBA程序xlsm文件另存xlsx不能保存的问题
热门推荐
wenjianzhiqin的博客
09-26 1万+
表达式.SaveAs(FileName, FileFormat, Password, WriteResPassword, ReadOnlyRecommended, CreateBackup, AccessMode, ConflictResolution, AddToMru, TextCodepage, TextVisualLayout, Local) 1.首先看看FileFormat可选Va
ExcelConverter xls、xlsx 文件格式转换
08-27
ExcelConverter 软件名称： ExcelConverter 软件大小： 8.54 MB（8959488 字节） 软件类别： 文件格式转换 运行环境： Win7 32位、Win10 64位下测试可用 授权方式： 免费版（原创） 软件语言： 中文版 软件说明： ExcelConverter 是一款将 Excel 文件（*.xls、*.xlsx）转换为其他格式（*.xls、*.xlsx、*.html、*.mht、*.xml、*.pdf、*.ods、*.csv、*.txt、*.xps、*.svg、*.bmp、*.jpg、*.png）的软件，需要 .NET Framework 2.0 运行库。 本软件引用了 Aspose.Cells 组件，ExcelConverter.exe 是源码编译后，用 ILMerge.exe 将两者合并而成，方便使用，如杀毒软件拦截，可以用自行编译，Aspose.Cells 组件放在同一文件夹下即可。 MD5: E2618A6D10DC17B251D9E81E2A33ECB8 SHA1: 818D23E9E93E29F382C25A7CF57E0172B7497C15 CRC32: 6A57408A
C# 对Excel文件进行读取，显示，另存为
05-10
C#读取Excel文件，显示到ListView上，保存Excel文件
QT创建一个excel文件（通过save as 方法）
venice0708的博客
06-15 5825
QString filepath = QFileDialog::getSaveFileName(this, QString::fromLocal8Bit("导出表格"), ".", tr("Microsoft Office(*.xlsx)"));//获取保存路径 if (!filepath.isEmpty()) { QAxObject *excel = new QStr...
VBA将一个表格拆分成多个新表格
mostermoonsky的博客
04-21 4042
背景：业务给了一个大表格，里面几十万条数据，要拆分成成百上千个小表格，思来想去，vba做这件事是效率最高的。 样表数据源： 请按照这个表头在excel中制作样表(最好将样表放在一个空文件夹里面) 然后调出VB编辑器，输入如下代码运行 Sub 按A列区分内容并拆分到新表格() Dim i% arr = Sheets(1).[a1].CurrentRegion Set d = CreateObject("scripting.dictionary") For i = 2 To UBound(arr)
python怎么保存xlsx不损坏,用Python将结果保存为xlsx的方法
weixin_36091052的博客
03-26 1826
如下所示：#!/usr/bin/python# -*- coding:utf8 -*-import xlwtimport osworkbook=xlwt.Workbook(encoding='utf-8')booksheet=workbook.add_sheet('Sheet 1', cell_overwrite_ok=True)DATA=(('学号','姓名','年龄','性别','成绩'),(...
python xlwt生成Excel
日常博客
03-28 1145
代码示例 # -*- coding: UTF-8 -*- import xlwt def write_excel(): # 创建excel对象 f = xlwt.Workbook() # 添加sheet页 sheet1 = f.add_sheet(u'sheet1', cell_overwrite_ok=True) # 定义标题单元格格式 style_title = xlwt.XFStyle() # 设置单元格内容自动换行 style.
评论
添加红包

请填写红包祝福语或标题

个

红包个数最小为10个

元

红包金额最低5元

当前余额3.43元 前往充值 >
需支付：10.00元
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付元
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明：

1.余额是钱包充值的虚拟货币，按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载，可以购买VIP、付费专栏及课程。

余额充值