Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Choix de page en impression

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

degap05

XLDnaute Impliqué
Bonjour à tous et à toutes,

Voici le code qui me permet d'imprimer un imprimé. Celui-ci contient trois feuilles Excel.

Pensez-vous qu'il soit possible de pouvoir choisir l'impression de la première feuille seulement, ou des pages 1 et 2, ou 1,2 et 3.
Là ou j'en suis les 3 feuilles sont imprimées systématiquement, ce que je ne souhaite pas.

'Imprimer l'imprimé de mise en dotation
Sub ImpressionDotation_Click()
Application.ScreenUpdating = False
Sheets("Dotation").Visible = True
Worksheets("Dotation").Select
Sheets("Dotation").Unprotect
If Application.Dialogs(xlDialogPrinterSetup).Show = True Then ActiveSheet.PrintOut
Sheets("Dotation").Protect
Application.ScreenUpdating = True
Sheets("Dotation").Visible = False
End Sub

Merci de votre aide.
 
Re : Choix de page en impression

Hello.
Tu peux modiffier ton code ainsi:

A++
Lio
 
Re : Choix de page en impression

Bonjour,

D'une manière ou d'une autre (InputBox, Range), définissez les variables p1 et p2 et écrivez :

Code:
If Application.Dialogs(xlDialogPrinterSetup).Show = True Then ActiveSheet.PrintOut From:=p1, To:=p2

Edit : salut TheLio 🙂

A+
 
Re : Choix de page en impression

Merci à TheLio et à job75,
Vos solutions fonctionnent, mais je ne sais pas faire:
"D'une manière ou d'une autre (InputBox, Range), définissez les variables p1 et p2"

C'est surement la que réside la solution puisque j'aimerais pouvoir choisir.

Encore un peu d'aide SVP.
 
Re : Choix de page en impression

Re,

En fait, je n'avais pas bien regardé. Au lieu de votre boîte de dialogue (qui choisit l'imprimante), affichez la boîte "Imprimer" qui permet de faire tout ce qu'on veut, donc de choisir l'imprimante, les pages, et d'imprimer :

Code:
Application.Dialogs([COLOR="Red"]xlDialogPrint[/COLOR]).Show

Edit : on peut toujours imprimer une feuille protégée, inutile donc d'ôter la protection. Et puis, masquer la feuille et afficher la page de départ avant la mise à jour de l'écran...

A+
 
Dernière édition:
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD

Discussions similaires

Réponses
7
Affichages
286
Réponses
10
Affichages
655
Réponses
12
Affichages
750
Réponses
3
Affichages
800
Réponses
7
Affichages
759
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…