乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > excel 中,怎么利用vba把文件另存为另一个文件名?-excel宏另存为,excel如何使用宏

excel 中,怎么利用vba把文件另存为另一个文件名?-excel宏另存为,excel如何使用宏

作者:乔山办公网日期:

返回目录:excel表格制作


下面的一个语句就可以了:
ActiveWorkbook.SaveAs Filename:="C:\A\" * range("a1") & ".csv", FileFormat:=xlCSV

你的单元格aa&bb我不明白是什么意思,我例子语句使用的a1,你自行修改即可。

实现的方法和详细的操作步骤如下:

1、首先,在桌面第一章中,每个工作簿的名称都放在工作表中,如下图所示,然后进入下一步。

2、其次,完成上述步骤后,创建一个新的工作簿,将其命名为“第一章目录”,然后按“alt  + f11”组合键打开“宏”界面,如下图所示,然后进入下一步。

3、接着,完成上述步骤后,在VBA中,单击“插入”按钮,然后选择“模块”选项以创建新模块,如下图所示,然后进入下一步。

4、然后,完成上述步骤后,输入如下红框中的代码,如下图所示,然后进入下一步。

5、随后,完成上述步骤后,返回到名为“第一章目录”的工作簿,然后按“alt  + f8”组合键调出“宏”对话框,如下图所示,然后进入下一步。

6、最后,完成上述步骤后,单击“宏”对话框中的“执行”按钮,“宏”对话框自动关闭,代码自动执行,即第一页中的每个文件夹名称都显示在sheet1中,可以根据需要调整格式,如下图所示。这样,问题就解决了。


文件的扩展名不是随便可以改的,一般都是软件保存文件的时候自动copy生成的,关系到文件默认打开的软件。
如后缀名为XLSM的文件就是带有宏的EXCEL文件,.XLS和.XLSX分别是2003版以前和2007版以上的EXCEL文件格式,不是说文件的扩展名改一下就变成了XLSM文件了。而是要在文件中增加宏并另存为带有宏的EXCEL文件,就自动会在磁盘上的文件夹里面保存一个后缀名为XLSM的文件了

Dim sht As Worksheet
Application.ScreenUpdating = False
ipath = ThisWorkbook.Path & "\"
For Each sht In Sheets
sht.Copy
ActiveWorkbook.SaveAs ipath & sht.Name & ".csv" '(工作表名为文件名
ActiveWorkbook.Close
Next
Application.ScreenUpdating = True
End Sub

相关阅读

关键词不能为空
极力推荐

ppt怎么做_excel表格制作_office365_word文档_365办公网