在 VBA 中更改保存文件格式

在 VBA 中更改保存文件格式

我读过这个问题:我可以根据 Excel 2007 中的列将电子表格拆分为多个文件吗?

我对“以与原始工作簿相同的格式保存”有疑问,希望您能帮助我。

我正在将宏与 CSV 文件一起使用,但我想获得像 XLS 这样的最终文件。

如何更改宏以保存这种格式(不同于原始格式)?

答案1

以下是一个典型示例:

Sub Sample_Cvs_To_Xlsx()
    ChDir "C:\TestFolder"
    Workbooks.Open Filename:="C:\TestFolder\WhatEver.csv"
    '
    ' perform processing
    '
    ActiveWorkbook.SaveAs Filename:="C:\TestFolder\WhatEver.xlsx", FileFormat:= _
        xlOpenXMLWorkbook, CreateBackup:=False
    ActiveWorkbook.Close
End Sub

相关内容