Replace your .SAVEAS command with mine.

A tip - I recommend not using "reserved words" for user names. Even sub MySaveAs() is better, although an even more descriptive name could be used.

If you're going to work with code I would suggest getting real good with the Immediate window (debug window) in the VBA interface, and F8 and shift-F8 to step through code, and shift-F9 to inspect or watch variables. Then you can follow the code line by line and observe what it does.