chajmi
XLDnaute Occasionnel
Bonjour
Dans un classeur je lance l’impression d’un bordereau à l’aide d’un bouton et d’une macro, laquelle réalise un certain nombre d’autres opérations (incrémentation d’un numéro, duplication et changement de nom de la feuille, création d’un pdf, effacement des données pour un nouveau bordereau vierge …)
Je veux que les opérateurs ne puissent imprimer que par le bouton (pour ne pas contourner le reste des opérations réalisées par la macro)
On ne peut pas bloquer le menu « imprimer », mais on peux lancer une macro qui agit avant d’imprimer.
Voilà ce que j’ai trouvé sur le sujet :
A mettre dans un module normal :
Public Flag As Boolean
A mettre dans ThisWorkbook
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Flag = False Then Cancel = True
End Sub
Par contre il faut que je modifie ma macro Sub CreationBordereauCouture() dans le module 1 de mon classeur joint.
Qui peut m’aider à faire fonctionner l’ensemble ?
Merci d’avance
Dans un classeur je lance l’impression d’un bordereau à l’aide d’un bouton et d’une macro, laquelle réalise un certain nombre d’autres opérations (incrémentation d’un numéro, duplication et changement de nom de la feuille, création d’un pdf, effacement des données pour un nouveau bordereau vierge …)
Je veux que les opérateurs ne puissent imprimer que par le bouton (pour ne pas contourner le reste des opérations réalisées par la macro)
On ne peut pas bloquer le menu « imprimer », mais on peux lancer une macro qui agit avant d’imprimer.
Voilà ce que j’ai trouvé sur le sujet :
A mettre dans un module normal :
Public Flag As Boolean
A mettre dans ThisWorkbook
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Flag = False Then Cancel = True
End Sub
Par contre il faut que je modifie ma macro Sub CreationBordereauCouture() dans le module 1 de mon classeur joint.
Qui peut m’aider à faire fonctionner l’ensemble ?
Merci d’avance