好的，以下是一个简单的VBA宏，可以将所有工作表保存为文件：
```
Sub SaveAllSheets()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.SaveAs ws.Name & ".xlsx"
Next ws
End Sub
```
这个宏会遍历当前活动工作簿中的所有工作表，并将每个工作表保存为一个单独的xlsx文件。你可以将宏代码复制并粘贴到VBA编辑器中，然后运行它。
如果你需要更多的信息，比如如何在Excel中打开VBA编辑器、如何创建和运行宏等，请告诉我，我可以提供更详细的说明。
本网转载内容版权归原作者和授权发表网站所有，仅供学习交流之用，如有涉及版权问题，请通知我们尽快处理。