ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   Application.EnableEvents = False not working (https://www.excelbanter.com/excel-programming/430421-application-enableevents-%3D-false-not-working.html)

modo8

Application.EnableEvents = False not working
 

Hello-

I have some macro language that deletes a sheet which will always have data
on it. I don't want to have to confirm the popup message "Data may
exist...", so I put in the Application.EnableEvents = False language. Thing
is, the prompt still comes up! Any ideas? I'm using Excel 2002 if that
makes a difference. Language below. Thanks a bunch!

Windows(FileName).Activate
Sheets(DeleteSheet).Select
Application.EnableEvents = False
ActiveWindow.SelectedSheets.Delete
Application.EnableEvents = True

Otto Moehrbach[_2_]

Application.EnableEvents = False not working
 

You want:
Application.DisplayAlerts = False
HTH Otto
"modo8" wrote in message
...
Hello-

I have some macro language that deletes a sheet which will always have
data
on it. I don't want to have to confirm the popup message "Data may
exist...", so I put in the Application.EnableEvents = False language.
Thing
is, the prompt still comes up! Any ideas? I'm using Excel 2002 if that
makes a difference. Language below. Thanks a bunch!

Windows(FileName).Activate
Sheets(DeleteSheet).Select
Application.EnableEvents = False
ActiveWindow.SelectedSheets.Delete
Application.EnableEvents = True




JLGWhiz[_2_]

Application.EnableEvents = False not working
 

I think you want

Application.DisplayAlerts = False

'The code

Application.DisplayAlerts = True



"modo8" wrote in message
...
Hello-

I have some macro language that deletes a sheet which will always have
data
on it. I don't want to have to confirm the popup message "Data may
exist...", so I put in the Application.EnableEvents = False language.
Thing
is, the prompt still comes up! Any ideas? I'm using Excel 2002 if that
makes a difference. Language below. Thanks a bunch!

Windows(FileName).Activate
Sheets(DeleteSheet).Select
Application.EnableEvents = False
ActiveWindow.SelectedSheets.Delete
Application.EnableEvents = True





All times are GMT +1. The time now is 03:58 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com