Please Note: This article is written for users of the following Microsoft Excel versions: 97, 2000, 2002, and 2003. If you are using a later version (Excel 2007 or later), this tip may not work for you. For a version of this tip written specifically for later versions of Excel, click here: Saving in Multiple Locations.
by Allen Wyatt
(last updated January 30, 2018)
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.
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.
Professional Development Guidance! Four world-class developers offer start-to-finish guidance for building powerful, robust, and secure applications with Excel. The authors show how to consistently make the right design decisions and make the most of Excel's powerful features. Check out Professional Excel Development today!
Open a workbook that someone else is working on, and you won't be able to save your changes back into the same file. ...Discover More
Keeping tabs on the size of a workbook can be important when using Excel. You have a couple of options that will allow ...Discover More
Want to easily control which records get imported from a text file into Excel? It's easy to do when you write the macro ...Discover More
FREE SERVICE: Get tips like this every week in ExcelTips, a free productivity newsletter. Enter your address and click "Subscribe."
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.