Je cherche à "empêcher l'impression" d'un document.
J'ai trouvé ceci pour Excel mais ce ne fonctionne pas pour word.
Private Sub Workbook_BeforePrint(Cancel As
Boolean)
Cancel = True
End Sub
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Anacoluthe
Bonjour !
"Martin" nous a écrit ...
Je cherche à "empêcher l'impression" d'un document. J'ai trouvé ceci pour Excel mais ce ne fonctionne pas pour word. Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True End Sub Pourriez vous m'aider SVP
Excel : Workbook Word : Document donc:
Public WithEvents appWord As Word.Application
Private Sub appWord_DocumentBeforePrint _ (ByVal Doc As Document, Cancel As Boolean) MsgBox "Impression interdite !" Cancel = True End Sub
à placer dans un module de classe du document interdit d'impression.
Anacoluthe « Il est interdit dinterdire. » - slogan mai 68
Bonjour !
"Martin" nous a écrit ...
Je cherche à "empêcher l'impression" d'un document.
J'ai trouvé ceci pour Excel mais ce ne fonctionne pas pour word.
Private Sub Workbook_BeforePrint(Cancel As
Boolean)
Cancel = True
End Sub
Pourriez vous m'aider SVP
Excel : Workbook
Word : Document
donc:
Public WithEvents appWord As Word.Application
Private Sub appWord_DocumentBeforePrint _
(ByVal Doc As Document, Cancel As Boolean)
MsgBox "Impression interdite !"
Cancel = True
End Sub
à placer dans un module de classe du document interdit d'impression.
Anacoluthe
« Il est interdit dinterdire. »
- slogan mai 68
Je cherche à "empêcher l'impression" d'un document. J'ai trouvé ceci pour Excel mais ce ne fonctionne pas pour word. Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True End Sub Pourriez vous m'aider SVP
Excel : Workbook Word : Document donc:
Public WithEvents appWord As Word.Application
Private Sub appWord_DocumentBeforePrint _ (ByVal Doc As Document, Cancel As Boolean) MsgBox "Impression interdite !" Cancel = True End Sub
à placer dans un module de classe du document interdit d'impression.
Anacoluthe « Il est interdit dinterdire. » - slogan mai 68
Martin
Merci Beaucoup
"Anacoluthe" a écrit dans le message de news:
Bonjour !
"Martin" nous a écrit ...
Je cherche à "empêcher l'impression" d'un document. J'ai trouvé ceci pour Excel mais ce ne fonctionne pas pour word. Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True End Sub Pourriez vous m'aider SVP
Excel : Workbook Word : Document donc:
Public WithEvents appWord As Word.Application
Private Sub appWord_DocumentBeforePrint _ (ByVal Doc As Document, Cancel As Boolean) MsgBox "Impression interdite !" Cancel = True End Sub
à placer dans un module de classe du document interdit d'impression.
Anacoluthe « Il est interdit dinterdire. » - slogan mai 68
Merci Beaucoup
"Anacoluthe" <nopub_anacoluthe@wanadoo.fr> a écrit dans le message de
news:3F929FF2.6000108@wanadoo.fr...
Bonjour !
"Martin" nous a écrit ...
Je cherche à "empêcher l'impression" d'un document.
J'ai trouvé ceci pour Excel mais ce ne fonctionne pas pour word.
Private Sub Workbook_BeforePrint(Cancel As
Boolean)
Cancel = True
End Sub
Pourriez vous m'aider SVP
Excel : Workbook
Word : Document
donc:
Public WithEvents appWord As Word.Application
Private Sub appWord_DocumentBeforePrint _
(ByVal Doc As Document, Cancel As Boolean)
MsgBox "Impression interdite !"
Cancel = True
End Sub
à placer dans un module de classe du document interdit d'impression.
Anacoluthe
« Il est interdit dinterdire. »
- slogan mai 68
Je cherche à "empêcher l'impression" d'un document. J'ai trouvé ceci pour Excel mais ce ne fonctionne pas pour word. Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True End Sub Pourriez vous m'aider SVP
Excel : Workbook Word : Document donc:
Public WithEvents appWord As Word.Application
Private Sub appWord_DocumentBeforePrint _ (ByVal Doc As Document, Cancel As Boolean) MsgBox "Impression interdite !" Cancel = True End Sub
à placer dans un module de classe du document interdit d'impression.
Anacoluthe « Il est interdit dinterdire. » - slogan mai 68
