Macro nombre d'impression de plusieurs zones suivant cellules

Signaler
Messages postés
2
Date d'inscription
jeudi 18 janvier 2018
Statut
Membre
Dernière intervention
18 janvier 2018
-
Messages postés
8536
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
8 mai 2021
-
Bonjour à tous,

J'ai créé un bouton "Impression" qui dépend d'une macro. Jusque la tout va bien. Sur la même feuille, le bouton impression me permet d'imprimer plusieurs zones sur des feuilles indépendantes. J'aimerais que le nombre d'impression de chaque zone soit régit par une cellule différente pour chaque zone.

Voici la macro que j'ai actuellement:

Sub Impression()
ActiveSheet.PageSetup.PrintArea = "$A$3:$F$13,$A$18:$F$28,$A$32:$F$42,$A$46:$F$56,$A$60:$F$70,$A$74:$F$84,$A$88:$F$98,$A$102:$F$112,$A$116:$F$126,$A$130:$F$140,$A$144:$F$154,$A$158:$F$168,$A$172:$F$182,$A$186:$F$196,$A$200:$F$210,$A$214:$F$224,$A$228:$F$238"
ActiveWindow.SelectedSheets.PrintOut
With ActiveSheet.PageSetup
.FitToPagesWide = 1
.FitToPagesTall = 1
.CenterHorizontally = True
.CenterVertically = True
.PaperSize = xlPaperA4
.Zoom = False
End With
ActiveWindow.SelectedSheets.PrintPreview
End Sub

Je sais que pour que le nombre d'impression soit dépendant d'une cellule on utilise:

Copies:=Range("...") cela dit comment je peux lier ça a chaque zone?
Voici mes cellules avec le nombre d'impression de chaque zone.
Copies:=Range("C1,C16,C30,C44,C58,C72,C86,C100,C114,C128,C142,C156,C170,C184,C198,C212,C226")

Je débute en VBA, d'avance merci pour votre aide !

1 réponse

Messages postés
8536
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
8 mai 2021
21
Bonjour,

Tu ne peux pas faire une impression "multi zones" avec un nombre de copies différent pour chaque zone, il faut que tu fasses une impression par zone.

Cordialement
Patrice
Messages postés
2
Date d'inscription
jeudi 18 janvier 2018
Statut
Membre
Dernière intervention
18 janvier 2018

Ok, dommage.
Je vais donc créer un bouton par zone.

Merci beaucoup !
Messages postés
8536
Date d'inscription
dimanche 13 juin 2010
Statut
Membre
Dernière intervention
8 mai 2021
21
Tu peux le faire avec une seule macro, il suffit de redéfinir séquentiellement la zone d'impression et le nombre d'ex. pour chacune des zones.