Ne pas afficher la boite d'alerte Impression sur excution macro

Bonjour,

Je vous expose mon problème.

J'ai un tableau en Feuil1 ou une MsgBox s'affiche via :

Private Sub Worksheet_Activate()
Range("B16").Select
If Range("C1").Value = 2 Then Exit Sub
MsgBox ("........")
End Sub

Particularité : La feuil1 est masqué du classeur par défaut, et s'affiche sous condition.

Enfin J'ai une commande macro en "module 12" d'impression sélective.

Sub Impression()
If Range("G4").Value = "" Then Exit Sub
ThisWorkbook.Unprotect Password:="******"
With Worksheets("Feuil1")
.Visible = True
With .PageSetup
.PrintArea = "$B$12:$Y$311"
.PrintTitleRows = ""
.Orientation = xlPortrait
.FitToPagesWide = 1
.FitToPagesTall = 5
End With
.PrintOut
.Visible = False
End With
ThisWorkbook.Protect Password:="******"
End Sub

Question : est-il possible de lancer la macro d'impression sans tenir compte de la MsgBox où l'utilisateur doit confirmer par Ok. Il doit y avoir moyen de neutraliser la MsgBox

J'ai essayé d'introduire dans la macro :
Application.DisplayAlerts = False
(....)
Application.DisplayAlerts = True

Mais rien à faire. Ca ne marche pas.
Merci d'avance de votre aide et astuce.
Cdt