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

Nombre de pages à imprimer

erwanhavre

XLDnaute Occasionnel
Bonjour à tous j'aimerais un bout de code qui me permetrai d'imprimer un nombre de feuilles en fonction de la valeur d'une cellule pour mon cas la valeur en c10

Merci beaucoup
 

Staple1600

XLDnaute Barbatruc
Bonsoir à tous

erwanhavre
1) Tu as essayé l'enregistreur de macros?*
2) Tu as fais des recherches dans les archives du forum ?

* Moi oui
Macro1= résultat de l'enregistreur de macros
Code:
Sub Macro1()
ActiveSheet.PrintOut Copies:=3, Collate:=True, IgnorePrintAreas:=False
End Sub
D’où je déduis facilement que la modification est simple à faire
VB:
Sub Macro2()
Dim Exemplaires
Exemplaires = Sheets(1).Range("C10").Value
ActiveSheet.PrintOut Copies:=Exemplaires, Collate:=True, IgnorePrintAreas:=False
End Sub

EDITION: Sauf que j'ai mal lu la question
Comment sait-on quelle feuilles il faut imprimer ?
Si ton classeur contient 10 feuilles et qu'en C10, on a la valeur 3
Il faut imprimer les 3 premières ou les 3 dernières ?
ou bien sont-ce les feuilles 1, 7 et 9 ?
Comment savoir ?
 
Dernière édition:

erwanhavre

XLDnaute Occasionnel


J'utilise souvent l'enregistreur de macro pour créer le bout de code mais là c'est vrai que je n'ai pas pensé à le faire comme ça je teste et je vous redis merci
 

Discussions similaires

  • Question
Microsoft 365 Recherche V
Réponses
6
Affichages
680
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…