Zone d'impression multiple

Fchris

XLDnaute Occasionnel

• 14 Mai 2007

• #2

Re : Zone d'impression multiple

Bonjour Manu62,
Bonjour le forum,

Je ne suis pas un as de la macro, mais voici ce que je peux te proposer si jamais ça peut t'aider 😉 .

@+
Fchris

 

Pièces jointes

• Test Zone impression.xls

  29.5 KB · Affichages: 117
• Test Zone impression.xls

  29.5 KB · Affichages: 133
• Test Zone impression.xls

  29.5 KB · Affichages: 137

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 14 Mai 2007

• #3

Re : Zone d'impression multiple

salut Fchris, le forum

En dessous des la ligne, peux ton dire d'imprimer en même temps.

Manu

 

Vote positif 0 Vote négatif

Fchris

XLDnaute Occasionnel

• 14 Mai 2007

• #4

Re : Zone d'impression multiple

Fichier modifié ci-joint

@+

 

Pièces jointes

• Test Zone impression.xls

  27.5 KB · Affichages: 141
• Test Zone impression.xls

  27.5 KB · Affichages: 154
• Test Zone impression.xls

  27.5 KB · Affichages: 143

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 14 Mai 2007

• #5

Re : Zone d'impression multiple

Fchris, le forum,

Cool mais comment je dis que c'est la feuille 1, 2

J'ai pas dit, mais j'ai une page consacrée à l'impression.

est ce que cela est pour toi correct :

ActiveSheet.PageSetuo.PrintArea = "Feuille1! $A$1:$A$16"

?

Manu

 

Vote positif 0 Vote négatif

Fchris

XLDnaute Occasionnel

• 14 Mai 2007

• #6

Re : Zone d'impression multiple

Pour une sélection de feuille, j'ajouterai plutôt comme ceci :

Code:

Sheets("Feuil1").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$A$3"

Avec le nom de la feuille concerné par chaque bouton à la place de "Feuil1".

A voir si ça répond à ton attente...😉

FChris

 

Vote positif 0 Vote négatif

Manu62

XLDnaute Impliqué

• 14 Mai 2007

• #7

Re : Zone d'impression multiple

Merci Bien

A+

Manu

 

Vote positif 0 Vote négatif