Microsoft 365 Activer désactiver Workbook_BeforePrint(Cancel As Boolean)

[pat66]

Bonsoir le forum,

est t'il possible de désactiver et réactiver cet évènement juste le temps d'exécution d'une macro qui imprime en pdf :

Private Sub Workbook_BeforePrint(Cancel As Boolean)
MsgBox "Pour imprimer cette étude, veuillez vous adresser au back office, pour sauvegarder une copie voir les boutons à cet effet, merci", vbCritical + vbInformation, "CONFIANCE INVEST"
Cancel = True
End Sub

merci beaucoup pour votre aide

bonne soirée

 

[sylvanu]

Bonsoir Pat,
Une solution parmi d'autres :
1- Vous déclarez une variable public par exemple NoPrint as boolean
2- Dans Workbook_BeforePrint, vous comencez par :
If NoPrint=1 then exit sub.
3- Dans votre macros, vous commencez par NoPrint=1 et vous terminez par NoPrint=0.
De cette façon, pendant cette macro la macro Workbook_BeforePrint sera inhibée.