Discussion :

[Flaguette]

Bonjour,

Au travail, je dois noter le temps que je passe sur chaque projet. Comme il arrive qu'on me demande par la suite qui m'a demandé ce travail, ce que je ne peux pas noter dans le logiciel de facturation du temps, je me suis créé un fichier Excel où je note le temps passé sur chaque projet. Un petit tableau croisé dynamique et hop! Il ne me reste qu'à transcrire...

Mais voilà, il m'arrive souvent d'imprimer cette feuille de données. J'aimerais créer une macro qui empêcherait son impression afin de ne pas gaspiller de papier. Pour le moment, j'ai réduit le nombre de feuilles imprimées par mégarde un demandant que les données tiennent sur une page! Ça fait de l'écriture totalement illisible mais ça prend quand même du papier.

Je suis certaine qu'il y a un truc! Merci de votre aide!

[GuyXL]

Bonjour Flaguette,

A tester (dans le module ThisWorkbook) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
Private Sub Workbook_BeforePrint(Cancel As Boolean)
    Sheets("nom de la feuille à ne pas imprimer").Visible = False
End Sub
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
    Sheets("nom de la feuille à ne pas imprimer").Visible = True
End Sub

Cordialement

R

[SfJ5Rpw8]

bonjour,

tu peu t'inspirer de ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Workbook_BeforePrint(Cancel As Boolean)
  MsgBox "Impression Interdite", vbCritical
  Cancel = True
End Sub

à placer dans le code associé au classeur ThisWorkBook

[kiki29]

Salut,installe qqch comme PDFCreator ou autre Acrobat Distiller comme imprimante par défaut

[GuyXL]

bonjour,

tu peu t'inspirer de ce code :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
Private Sub Workbook_BeforePrint(Cancel As Boolean)
  MsgBox "Impression Interdite", vbCritical
  Cancel = True
End Sub

Bonjour à tous,

Je suppose que les impressions malencontreuses de Flaguette sont quand elle imprime tout le classeur à partir de n'importe quelle feuille active. J'imagine mal imprimer par erreur de façon répétée seulement la feuille en question. Ce code ne va-t-il pas bloquer toutes les impressions ? Cordialement

R

[Flaguette]

Merci pour toutes vos réponses... Je manque un peu de temps pour tout regarder.

Je voudrais empêcher l'impression d'une feuille en particulier de ce classeur car j'ai tendance à l'imprimer par erreur... Je travaille sur des dossiers en plusieurs documents et je ne lance l'impression que lorsque j'ai fini de tous les traiter afin de n'avoir à me rendre à l'imprimante qu'une fois et d'éviter que quelqu'un d'autre ne parte avec mes pages ou, pire encore, me les mêle. Je note alors mon temps dans mon fichier Excel... et je l'imprime Donc, un pdf comme imprimante par défaut serait plus "gossant" que pratique.

Je vous en redonne des nouvelles!