Bouton Désactive/Active "Imprimer"

[chaelie2015]

Bonjour Forum
Je cherche un code d'un bouton qui désactive / Active"le bouton Imprimer" du fichier excel.
Salutations

 

[sylvanu]

Bonjour Chaelie,
Quelsues pistes peut être :

Excel: empêcher l'impression des Feuilles ou du Classeur entier

Explications comment empêcher l'impression d'une partie ou de l'entièreté d'un Classeur Excel par les utilisateurs. Code VBA prêt à l'emploi!

excel-malin.com

 

[chaelie2015]

Bonjour Chaelie,
Quelsues pistes peut être :

Excel: empêcher l'impression des Feuilles ou du Classeur entier

Explications comment empêcher l'impression d'une partie ou de l'entièreté d'un Classeur Excel par les utilisateurs. Code VBA prêt à l'emploi!

excel-malin.com

Bonjour sylvanu
Merci pour les liens et désolé pour ce retard.
si tu permet je m'explique plus
je souhaite désactiver l'impression pour le menu de l'excel et faire imprimer la feuille que par un bouton qui est dans la feuille.
Merci

 

[job75]

Bonjour chaelie2015, sylvanu,

Fichier joint avec dans ThisWorkbook :

Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = Not flag
End Sub

et le code du Module1 avec la macro affectée au bouton "Imprimer" :

Public flag As Boolean 'mémorise la variable

Sub Imprimer()
flag = True
ActiveSheet.PrintPreview 'pour tester
'ActiveSheet.PrintOut 'pour imprimer ôter l'apostrophe
flag = False
End Sub

A+

 

[chaelie2015]

Bonjour Job ,sylvanu
Merci pour les réponses.
A+

 

[Staple1600]

Bonjour le fil, et ses intervenants

=>chaelie2015
[Pour infos]
Résolu mais ...
1) Depuis l'explorateur Windows, clic-droit sur le classeur, choisir=> Imprimer
(NB: sur mon PC, l'imprimante par défaut est: Microsoft Print To PDF)
2) Excel s'ouvre et me propose de créer un PDF
3) Je peux donc imprimer le PDF
PS: Faire le test sur un PC, où c'est une vraie imprimante qui est installée par défaut.
(je ne peux pas le faire: je n'ai pas d'imprimante)