Activating a sheet other than the warning sheet will give them something different to look at.
Private Sub ShowAllSheets()
'Show all worksheets except the macro welcome page
Dim ws As Worksheet
For Each ws In ThisWorkbook.Worksheets
'If Not ws.Name = WelcomePage Then ws.Visible = xlSheetVisible
ws.Visible = xlSheetVisible
.Parent.Worksheets(1).Activate: Rem NEW line
Application.ScreenUpdating = False ' added MOVED line
Next ws
Worksheets(WelcomePage).Visible = xlSheetVeryHidden
Application.ScreenUpdating = True ' added
End Sub
In the code, is WelcomePage a public string, declared elsewhere?