作者:乔山办公网日期:
返回目录:excel表格制作
如下:度
Sub 宏1()
ChDir "E:\File" '当前保问存路径答
ActiveWorkbook.SaveAs Filename:="E:\File\902.xlsm", FileFormat:= _
xlOpenXMLWorkbookMacroEnabled, CreateBackup:=False '保存当前文版件权
ChDir "C:\Users\nhking" '另存路径
ActiveWorkbook.SaveAs Filename:="C:\Users\nhking\902.csv", _
FileFormat:=xlCSV, CreateBackup:=False '另存文件路径\文件名与类型
End Sub
1、被隐藏了。打开方法如下:
2、选中任意一个sheet,单击右键,点击取消隐藏。
3、选取要取消隐藏的sheet,点击确定。既可。
下面的一个语句就百可以了:度
ActiveWorkbook.SaveAs Filename:="C:\A\" * range("a1") & ".csv", FileFormat:=xlCSV
你的单元格aa&bb我不明白问是什么意思,我例子答语版句使用的a1,你自行修改即可权。
那你一定是没有仔细阅读zhidaoexcel提示内容:
如果是已经保存了csv的,就只有活动工作表的内容(就是另存的时候显示的专工作表),其他工作表内容会丢失。
现在属只能找回之前的EXCEL文件,然后再分别将其他sheet保存为csv文件。