project_man
New Member
- Joined
- May 5, 2002
- Messages
- 12
I have some code that deletes a sheet and saves and closes a file, but I always get the "are you sure you want to delete this sheet..." and "Are you sure you wnat to replace this file..." messages. How can I stop these irritating messages from showing up? Here is the code I have:
ActiveWorkbook.SaveAs Filename:= _
"C:Documents and SettingsAll UsersDocumentsPainintheass.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Sheets("Frustrated").Select
ActiveWindow.SelectedSheets.Delete
ActiveWorkbook.SaveAs Filename:= _
"C:Documents and SettingsAll UsersDocumentsPainintheass.xls", FileFormat:= _
xlNormal, Password:="", WriteResPassword:="", ReadOnlyRecommended:=False _
, CreateBackup:=False
Sheets("Frustrated").Select
ActiveWindow.SelectedSheets.Delete