Macro excel pour restreindre l'impression

Résolu/Fermé

bitbit - 20 juin 2015 à 08:54
bitbit - 24 juin 2015 à 20:47

Dans mon projet il y 4 feuil. Une macro imprimes certes la page indiquée. Je voudrais bloquer l'impression par l'icône de l'imprimante tout en autorisant l'impression de la macro.
j'ai utiliser l'événement 'BeforPrint' ça pas marché

A l'aide SVP

A voir également:

Macro excel pour restreindre l'impression
Spouleur d'impression - Guide
Restreindre instagram - Guide
Telecharger macro convertir chiffre en lettre excel - Télécharger - Tableur
Liste déroulante excel - Guide
Formule excel pour additionner plusieurs cellules - Guide

3 réponses

Réponse 1 / 3

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 248
20 juin 2015 à 09:43

Bonjour,

dans ThisWorkbook :

Private Sub Workbook_BeforePrint(Cancel As Boolean)
    If Not printOK Then Cancel = True
End Sub

au début d'un module Standard, hors procédure :

Public printOK As Boolean

dans ton code où tu veux imprimer :

printOK = True
ActiveWindow.SelectedSheets.PrintOut
printOK = False

eric

Réponse 2 / 3

bitbit
20 juin 2015 à 10:17

Cher eric J'ai essayé ça pas marché
Je ne sais pas pourquoi mais l'évenement BeforPrint avec cancel=true n'arrive pas à bloquer l'impression.

Réponse 3 / 3

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 248
20 juin 2015 à 14:36

Sûrement que tu oublies qq chose.
Regarde cet exemple. Tu as du code dans les modules Feuil1, ThisWorkbook et Module1 :
https://www.cjoint.com/c/EFumIQCy0Gl

eric

bitbit
Modifié par bitbit le 23/06/2015 à 21:33

eric Bonsoir
Je viens de télécharger la pièce jointe. Je vs tiendrai info. M6 et à bientôt

eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024 7 248
23 juin 2015 à 21:32

Bonjour,

Tu as excel 2003 je suppose.
Essaie cette version : https://www.cjoint.com/c/EFxtGNlFCjF

eric

bitbit > eriiic Messages postés 24603 Date d'inscription mardi 11 septembre 2007 Statut Contributeur Dernière intervention 15 décembre 2024
24 juin 2015 à 20:47

Je ne dirai pas que ça marche + tôt que ça marche très Bien. Merci

Discussions similaires

Restreindre quelqu'un sur messenger

Restriction Messenger