Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint
pour n'imprimer que la zone que je veux imprimer. Cependant je présente à
l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une
nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que
je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il
n'est pas accessible comme un bouton de barre d'outils?
Merci pour votre aide!
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
JB
Bonsoir,
Public impressionAutorisée Sub Imprime() Range("A1:B4").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$B$4" impressionAutorisée = True ActiveWindow.SelectedSheets.PrintPreview impressionAutorisée = False End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean) If Not impressionAutorisée Then MsgBox "Non!" Cancel = Not impressionAutorisée End If End Sub
http://cjoint.com/?lbuACXIbI5
JB
On 1 nov, 19:37, "Woody" wrote:
Bonsoir,
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement Be forePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relan cer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!
Woody
Bonsoir,
Public impressionAutorisée
Sub Imprime()
Range("A1:B4").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$B$4"
impressionAutorisée = True
ActiveWindow.SelectedSheets.PrintPreview
impressionAutorisée = False
End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean)
If Not impressionAutorisée Then
MsgBox "Non!"
Cancel = Not impressionAutorisée
End If
End Sub
http://cjoint.com/?lbuACXIbI5
JB
On 1 nov, 19:37, "Woody" <Wo...@blackwood.net.invalid> wrote:
Bonsoir,
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement Be forePrint
pour n'imprimer que la zone que je veux imprimer. Cependant je présente à
l'opérateur un aperçu avant impression. Là l'opérateur peut relan cer une
nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que
je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il
n'est pas accessible comme un bouton de barre d'outils?
Merci pour votre aide!
Public impressionAutorisée Sub Imprime() Range("A1:B4").Select ActiveSheet.PageSetup.PrintArea = "$A$1:$B$4" impressionAutorisée = True ActiveWindow.SelectedSheets.PrintPreview impressionAutorisée = False End Sub
Private Sub Workbook_BeforePrint(Cancel As Boolean) If Not impressionAutorisée Then MsgBox "Non!" Cancel = Not impressionAutorisée End If End Sub
http://cjoint.com/?lbuACXIbI5
JB
On 1 nov, 19:37, "Woody" wrote:
Bonsoir,
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement Be forePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relan cer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!
Woody
anonymousA
Bonjour,
en // de ce que t'indique JB, voici une autre approche due à Alain CROS.
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!
Woody
Bonjour,
en // de ce que t'indique JB, voici une autre approche due à Alain CROS.
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint
pour n'imprimer que la zone que je veux imprimer. Cependant je présente à
l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une
nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que
je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il
n'est pas accessible comme un bouton de barre d'outils?
Merci pour votre aide!
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!
Woody
Woody
Bonjour,
Merci beaucoup à tous les deux. Je vais tester tout ça et je vous tiens au courant.
Cordialement.
Woody.
"anonymousA" a écrit dans le message de news: 472a338e$0$21150$
Bonjour,
en // de ce que t'indique JB, voici une autre approche due à Alain CROS.
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!
Woody
Bonjour,
Merci beaucoup à tous les deux. Je vais tester tout ça et je vous tiens au
courant.
Cordialement.
Woody.
"anonymousA" <anonymousa@wanadoo.fr> a écrit dans le message de news:
472a338e$0$21150$7a628cd7@news.club-internet.fr...
Bonjour,
en // de ce que t'indique JB, voici une autre approche due à Alain CROS.
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement
BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant
je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut
relancer une nouvelle impression en cliquant sur le bouton Imprimer de
l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer
(dans l'aperçu) : il n'est pas accessible comme un bouton de barre
d'outils?
Merci pour votre aide!
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!
Woody
Woody
Bonsoir !
Je suis vraiment désolée pour cet énome retard mais j'ai été absorbée par un tout autre boulot ce qui fait que j'ai laissé mon formulaire de côté pendant quelques jours... J'ai regardé ce que vous me proposiez mais je ne vois pas bien comment l'intégrer dans la macro BeforePrint que j'avais déjà concoctée... J'aurais du être plus précise quand j'ai posé ma question.
Voilà :
Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True Application.EnableEvents = False
Cette macro fonctionne très bien en ce sens que seule la feuille "DTimpr" apparaît à l'aperçu ou s'imprime. Mais lorsqu'on est dans l'aperçu si on clique sur le bouton imprimer, la boîte de dialoge apparaît, ce que je ne souhaite pas. Je voudrais, soit que l'impression se lance directement sans ouverture de la boîte de dialoge, soit désactiver le bouton imprimer pour obliger l'utilisateur à fermer l'aperçu ce qui déclenche le message "...voulez-vous imprimer ?"
Par ailleurs, peut-on "poser" un msgbox par dessus l'aperçu avant impression ?
J'espère avoir été assez claire cette fois-ci :-s
Merci encore mille fois pour votre aide.
Cordialement.
Woody.
"Woody" a écrit dans le message de news: %
Bonjour,
Merci beaucoup à tous les deux. Je vais tester tout ça et je vous tiens au courant.
Cordialement.
Woody.
"anonymousA" a écrit dans le message de news: 472a338e$0$21150$
Bonjour,
en // de ce que t'indique JB, voici une autre approche due à Alain CROS.
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!
Woody
Bonsoir !
Je suis vraiment désolée pour cet énome retard mais j'ai été absorbée par un
tout autre boulot ce qui fait que j'ai laissé mon formulaire de côté pendant
quelques jours...
J'ai regardé ce que vous me proposiez mais je ne vois pas bien comment
l'intégrer dans la macro BeforePrint que j'avais déjà concoctée... J'aurais
du être plus précise quand j'ai posé ma question.
Voilà :
Private Sub Workbook_BeforePrint(Cancel As Boolean)
Cancel = True
Application.EnableEvents = False
Cette macro fonctionne très bien en ce sens que seule la feuille "DTimpr"
apparaît à l'aperçu ou s'imprime. Mais lorsqu'on est dans l'aperçu si on
clique sur le bouton imprimer, la boîte de dialoge apparaît, ce que je ne
souhaite pas. Je voudrais, soit que l'impression se lance directement sans
ouverture de la boîte de dialoge, soit désactiver le bouton imprimer pour
obliger l'utilisateur à fermer l'aperçu ce qui déclenche le message
"...voulez-vous imprimer ?"
Par ailleurs, peut-on "poser" un msgbox par dessus l'aperçu avant impression
?
J'espère avoir été assez claire cette fois-ci :-s
Merci encore mille fois pour votre aide.
Cordialement.
Woody.
"Woody" <Woody@blackwood.net.invalid> a écrit dans le message de news:
%23IAEFShHIHA.748@TK2MSFTNGP04.phx.gbl...
Bonjour,
Merci beaucoup à tous les deux. Je vais tester tout ça et je vous tiens au
courant.
Cordialement.
Woody.
"anonymousA" <anonymousa@wanadoo.fr> a écrit dans le message de news:
472a338e$0$21150$7a628cd7@news.club-internet.fr...
Bonjour,
en // de ce que t'indique JB, voici une autre approche due à Alain CROS.
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement
BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant
je présente à l'opérateur un aperçu avant impression. Là l'opérateur
peut relancer une nouvelle impression en cliquant sur le bouton Imprimer
de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton
Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de
barre d'outils?
Merci pour votre aide!
Je suis vraiment désolée pour cet énome retard mais j'ai été absorbée par un tout autre boulot ce qui fait que j'ai laissé mon formulaire de côté pendant quelques jours... J'ai regardé ce que vous me proposiez mais je ne vois pas bien comment l'intégrer dans la macro BeforePrint que j'avais déjà concoctée... J'aurais du être plus précise quand j'ai posé ma question.
Voilà :
Private Sub Workbook_BeforePrint(Cancel As Boolean) Cancel = True Application.EnableEvents = False
Cette macro fonctionne très bien en ce sens que seule la feuille "DTimpr" apparaît à l'aperçu ou s'imprime. Mais lorsqu'on est dans l'aperçu si on clique sur le bouton imprimer, la boîte de dialoge apparaît, ce que je ne souhaite pas. Je voudrais, soit que l'impression se lance directement sans ouverture de la boîte de dialoge, soit désactiver le bouton imprimer pour obliger l'utilisateur à fermer l'aperçu ce qui déclenche le message "...voulez-vous imprimer ?"
Par ailleurs, peut-on "poser" un msgbox par dessus l'aperçu avant impression ?
J'espère avoir été assez claire cette fois-ci :-s
Merci encore mille fois pour votre aide.
Cordialement.
Woody.
"Woody" a écrit dans le message de news: %
Bonjour,
Merci beaucoup à tous les deux. Je vais tester tout ça et je vous tiens au courant.
Cordialement.
Woody.
"anonymousA" a écrit dans le message de news: 472a338e$0$21150$
Bonjour,
en // de ce que t'indique JB, voici une autre approche due à Alain CROS.
Avec l'aide reçue sur ce newsgroup (Merci!) je capte l'événement BeforePrint pour n'imprimer que la zone que je veux imprimer. Cependant je présente à l'opérateur un aperçu avant impression. Là l'opérateur peut relancer une nouvelle impression en cliquant sur le bouton Imprimer de l'aperçu, ce que je ne veux pas! Comment désactiver ce bouton Imprimer (dans l'aperçu) : il n'est pas accessible comme un bouton de barre d'outils? Merci pour votre aide!