vba - 如何在 Excel 宏中将只读文件另存为不同的文件扩展名？

Question

我有一个宏设置来自动打开/保存我从网上打开的文件。Web 格式是#csv.gz 格式。我的代码目前只是将文件保存在默认位置（我已更改为 c:\files）。我想编写一个宏来保留文件的文件名，但将扩展名更改为 file.xlsm。有没有办法用 VBA/excel 做到这一点？我需要更改扩展名的原因是它目前不适用于我的公式。我刚刚将文件保存为#csv.txt 的默认保存代码。

这可能吗？

Answer 1

将此代码集成到您自己的代码中：

Sub SaveIt()

Dim wkb As Workbook

Set wkb = ActiveWorkbook 'change to your workbook reference

wkb.SaveAs Replace(wkb.Name, ".txt", ""), 52 'change ".txt" to ".csv" if need be

End Sub

有关 52 的更多信息，请参阅Excel 文件类型枚举。