Hi jsollman,
You can try:
ActiveWorkbook.SaveCopyAs ("s:\shared machining\backup\S-Bay FinishPaint.xls")
MP

"jsollman " a écrit dans le message de
...
I have a user form that pops up to ask the user if they want to back up
their file after seven days. Everything works great except the form
pops up twice no matter if they chose yes, no, or cancel.
here is the "yes" code.

Private Sub CommandButton1_Click()
Unload Me
Application.DisplayAlerts = False

ActiveWorkbook.Save
ActiveWorkbook.SaveAs ("s:\shared machining\backup\S-Bay Finish
Paint.xls")
Application.DisplayAlerts = True

ActiveWorkbook.Close
End Sub

thanks for the help
--Jeffery


---
Message posted from http://www.ExcelForum.com/