Written by Allen Wyatt (last updated November 21, 2020)
This tip applies to Excel 97, 2000, 2002, and 2003
You may have a need to routinely copy a workbook to multiple locations on your system. For instance, the open workbook may need to be copied to a local hard drive and to several mapped drives that are actually on your office network.
Excel doesn't have a built-in capability to do this, but if the various locations are well defined, you can create a macro that will do the saving for you. The following macro is an example of such a tool:
Sub SaveToLocations() Dim OrigName As String OrigName = ActiveWorkbook.FullName ActiveWorkbook.SaveAs "G:\" + ActiveWorkbook.Name ActiveWorkbook.SaveAs "L:\" + ActiveWorkbook.Name ActiveWorkbook.SaveAs "K:\" + ActiveWorkbook.Name ActiveWorkbook.SaveAs "S:\" + ActiveWorkbook.Name ActiveWorkbook.SaveAs OrigName End Sub
The particular example of the macro saves the active workbook to five different locations, all using the same workbook name. The macro determines the current location of the workbook so that it can save to the current location last. The reason this is done is so that you can continue to use the regular Save tool and get the expected results.
If you want to use this macro on your own system, all you need to do is to make sure that you change the drive letters of where each workbook will be saved. If one of the drives you specify is for a location that uses removable media, and there is no media in the drive, then the macro will generate an error and stop. You'll then have to figure out where the workbook was originally saved so you can manually resave it there (using Save As).
Another peculiarity of the macro is that since it uses the SaveAs method, if there is already a workbook at each of the destinations with the same name as the current workbook, Excel will ask if you want the existing version of the workbook overwritten. This will always be the case with the last save, into the original location.
Note:
ExcelTips is your source for cost-effective Microsoft Excel training. This tip (2774) applies to Microsoft Excel 97, 2000, 2002, and 2003. You can find a version of this tip for the ribbon interface of Excel (Excel 2007 and later) here: Saving in Multiple Locations.
Save Time and Supercharge Excel! Automate virtually any routine task and save yourself hours, days, maybe even weeks. Then, learn how to make Excel do things you thought were simply impossible! Mastering advanced Excel macros has never been easier. Check out Excel 2010 VBA and Macros today!
When you save your workbooks, Excel can also save a preview image (thumbnail) that can be displayed in the Open dialog ...
Discover MoreWouldn't it be great if you could look at the files in the MRU list and see the full path and file names? Excel condenses ...
Discover MoreWouldn't it be nice to have a single command that would save each of you open workbooks, all at once? It's easy to do ...
Discover MoreFREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
2021-05-28 04:11:11
Liran
Hi,
I have an add-on for Microsoft Office which does exactly that. It’s called SOS Click for Microsoft Office and is compatible with Word, Excel and PowerPoint. It saves to several places with one click and offers other features like auto-save and etc. More information is available at https://www.sos-click.com with screenshots and FAQ.
Hope this helps.
Got a version of Excel that uses the menu interface (Excel 97, Excel 2000, Excel 2002, or Excel 2003)? This site is for you! If you use a later version of Excel, visit our ExcelTips site focusing on the ribbon interface.
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
Copyright © 2025 Sharon Parq Associates, Inc.
Comments