DisplayAlerts

[peterbata]

Hello and thank you for taking my inquiry.

I am learning about VBA code and am wondering why when stepping through these lines of code I am not presented with a warning prompt. It executes successfully but no warning. The sheet is deleted.

Sub DeleteSpecificSheets()


Application.DisplayAlerts = False
Worksheets("sheet8").Delete
Application.DisplayAlerts = True


End Sub

 

[Fishboy]

Thanks for chiming in Fishboy. Really appreciate it. Did exactly what you suggested in a new worksheet. Exact same result. I see no pop-up alert at all. The sheet is deleted outright.

My bad, DisplayAlerts is what I had meant.

Sub TurnAlertsOn()
Application.DisplayAlerts = True
End Sub

 

[peterbata]

That didn't wotk either. So, I logged into a clients machine remotely and tried what I had been doing originally. It worked like a charm. Popup alert and all. They are running Excel 2013. Back to the drawing board!

Sub DeleteSpecificSheets()
Worksheets("sheet3").Delete
End Sub

 

[peterbata]

Update. An complete online repair of my Office 2016 suite resolved my alerts issue. I thank everyone who generously gave of their time and expertise to assist me. I consider this thread closed. Peter

 

[jeffreybrown]

Hi Peter,

So glad the situation is solved for you and thanks for providing the feedback.