🚀大家好！今天我要和大家分享一个非常实用的小技巧——如何利用Excel宏功能将xlsx格式文件批量转换为xls格式文件。这在日常工作中非常有用，尤其是在需要兼容旧版Excel时。让我们一起来看看具体步骤吧！

🔍首先，打开你的Excel软件，点击“开发工具”选项卡。如果你找不到这个选项，可以通过Excel的“文件”>“选项”>“自定义功能区”来开启它。

🛠️接下来，你需要创建一个新的宏。点击“Visual Basic”按钮，然后在弹出的窗口中选择“插入”>“模块”。这里我们将编写一些简单的VBA代码来实现我们的目标。

📝在新模块中，输入以下代码：

```

Sub ConvertXLSXtoXLS()

Dim myPath As String, myFile As String

myPath = Application.ActiveWorkbook.Path & "\"

myFile = Dir(myPath & ".xlsx")

Do While myFile <> ""

Workbooks.Open Filename:=myPath & myFile

ActiveWorkbook.SaveAs Filename:=Replace(myPath & myFile, ".xlsx", ".xls"), FileFormat:=xlWorkbookNormal

ActiveWorkbook.Close SaveChanges:=False

myFile = Dir()

Loop

End Sub

```

🎉保存并关闭编辑器，返回Excel，运行这个宏。现在你就可以坐等所有xlsx文件被批量转换为xls格式了！

👏希望这个小技巧对你有帮助。记得在操作前备份你的文件哦，以防万一。如果你有任何问题或建议，欢迎留言交流！

ExcelTips VBA 文件转换