OVH Cloud OVH Cloud

Impression

3 réponses
Avatar
Paul Laurnic
Peut-on emp=EAcher dans Excel l'impression par exemple de la
Feuil1 ou d'une autre feuille.
Lorsque je clique sur l'ic=F4ne imprimer de la barre d'outils
et que je ne suis pas dans la bonne feuille, j'aimeari
qu'un message d'erreur s'affiche.
Si c'est possible ?
A+
Paul

3 réponses

Avatar
Philippe.R
Bonjour Paul,
Cette procédure, à placer dans le module Thisworkbook du classeur interdit l'impression de toute autre
feuille que celle nommée Mafeuille

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'MPFE 04/10/2003
'n'autorise que l'impressionde la feuille nommée Mafeuille
If ActiveSheet.Name <> "Mafeuille" Then
MsgBox "Vous ne pouvez pas imprimer cette feuille", _
vbExclamation, "Opération interdite"
Cancel = True
End If
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Paul Laurnic" a écrit dans le message de
news:00d901c38a88$c98d93b0$
Peut-on empêcher dans Excel l'impression par exemple de la
Feuil1 ou d'une autre feuille.
Lorsque je clique sur l'icône imprimer de la barre d'outils
et que je ne suis pas dans la bonne feuille, j'aimeari
qu'un message d'erreur s'affiche.
Si c'est possible ?
A+
Paul
Avatar
Paul Laurnic
Impeccable, merci
A+
-----Message d'origine-----
Bonjour Paul,
Cette procédure, à placer dans le module Thisworkbook du
classeur interdit l'impression de toute autre

feuille que celle nommée Mafeuille

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'MPFE 04/10/2003
'n'autorise que l'impressionde la feuille nommée Mafeuille
If ActiveSheet.Name <> "Mafeuille" Then
MsgBox "Vous ne pouvez pas imprimer cette feuille", _
vbExclamation, "Opération interdite"
Cancel = True
End If
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Paul Laurnic" a écrit dans le message de
news:00d901c38a88$c98d93b0$
Peut-on empêcher dans Excel l'impression par exemple de la
Feuil1 ou d'une autre feuille.
Lorsque je clique sur l'icône imprimer de la barre d'outils
et que je ne suis pas dans la bonne feuille, j'aimeari
qu'un message d'erreur s'affiche.
Si c'est possible ?
A+
Paul


.



Avatar
Philippe.R
C'était avec plaisir Paul !
--
Amicales Salutations

Retirer A_S_ pour répondre.

"Paul Laurnic" a écrit dans le message de
news:11d301c38b69$b3f1c8a0$
Impeccable, merci
A+
-----Message d'origine-----
Bonjour Paul,
Cette procédure, à placer dans le module Thisworkbook du
classeur interdit l'impression de toute autre

feuille que celle nommée Mafeuille

Private Sub Workbook_BeforePrint(Cancel As Boolean)
'MPFE 04/10/2003
'n'autorise que l'impressionde la feuille nommée Mafeuille
If ActiveSheet.Name <> "Mafeuille" Then
MsgBox "Vous ne pouvez pas imprimer cette feuille", _
vbExclamation, "Opération interdite"
Cancel = True
End If
End Sub

--
Amicales Salutations

Retirer A_S_ pour répondre.
XL97 / XL2002
Pour suivre le forum :
news://msnews.microsoft.com/microsoft.public.fr.excel
(Voulez-vous vous abonner ? -> Oui)

"Paul Laurnic" a écrit dans le message de
news:00d901c38a88$c98d93b0$
Peut-on empêcher dans Excel l'impression par exemple de la
Feuil1 ou d'une autre feuille.
Lorsque je clique sur l'icône imprimer de la barre d'outils
et que je ne suis pas dans la bonne feuille, j'aimeari
qu'un message d'erreur s'affiche.
Si c'est possible ?
A+
Paul


.