Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
MsgBox "Vous n’avez pas le droit d’imprimer ce fichier"
End Sub
Trouvé dans l'OI N°152
Pour empêcher l'impression.
Renversant non ? Bruno
voila déja un exemple pour enlever juste l'icone d'impression ds le menu et dans la barre d'outil.
pour le faire Lance la macro1 ( outil->macro->macro )
a toi d'adapter si tu veux empécher pour d'autre bouton.