Excel VBA使用SaveAs文件名时，文件扩展名会发生什么奇怪的事情？

Question

这是我的代码中的一行： ActiveWorkbook.SaveAs文件名：= curPath＆amp; cell.Value＆amp;格式（现在，“dmmmyyyy”＆amp;“。xlsx”），FileFormat：= xlOpenXMLWorkbook，CreateBackup：= False

这是几个文件的扩展名： .xl47x .xl35x

我尝试使用“.xlsm”，我得到了： .xl78 .xl22

我可以强制更改名称，然后文件将打开 - 但为什么要更改扩展名？有人知道发生了什么吗？我从来没有见过这个。谢谢！

Answer 1

代码中的文件扩展名必须在Format函数之外。请参阅下面的建议方法。

ActiveWorkbook.SaveAs Filename:=curPath & cell.Value & Format(Now, "dmmmyyyy") & ".xlsx", FileFormat:=xlOpenXMLWorkbook, CreateBackup:=False