如何快速將工作簿保存到 Excel 中的多個位置？

在 Excel 中，我們可以根據需要將工作簿保存到特定的位置，但是，您有想過同時將一個工作簿保存到多個文件夾嗎？本文中，通過 VBA 代碼，您可以快速將一個工作簿一次性保存到多個位置。

使用 VBA 將工作簿保存到多個位置

使用 VBA 將工作簿保存到多個位置

要將工作簿保存到多個位置，您只需應用一個宏代碼即可。

1. 按 Alt + F11 鍵打開 Microsoft Visual Basic for Applications 視窗背景色。

2. 點擊 插入 > 模組，並將以下代碼粘貼到模組腳本中。參見截圖：

VBA：將工作簿保存到多個位置

Sub SaveToLocations()
'UpdateByExtendoffice20160623
    ActiveWorkbook.SaveCopyAs "C:\Users\DT168\Documents\" + ActiveWorkbook.Name
    ActiveWorkbook.SaveCopyAs "C:\Users\DT168\" + ActiveWorkbook.Name
    ActiveWorkbook.Save
End Sub

提示：在宏代碼中，您可以根據需要更改保存路徑。

3. 按 F5 鍵運行代碼，當前工作簿就會被保存到代碼中指定的位置。