Nommer une zone d'impression

[nrdz83]

Bonjour à tous une question est-il possible de nommer une zone dans une feuille (zone 1) par exemple.

Et de faire une macro pour n'imprimer que la zone 1, en sachant que dans la même feuille il y aura jusqu'a quatre zones d'impression.

Une macro de ce genre :

Sub imprimerZone1()
Sheets("feuil1").Range("zone1").printOut
End Sub

Par avance merci à tous et bon dimanche , amitiés🙄

 

[Staple1600]

Re : Nommer une zone d'impression

Re


Crée un nouveau fichier plus léger (avec tes zones), ton userform, une seule feuille et zippe le

 

[nrdz83]

Re : Nommer une zone d'impression

re bonsoir voici mon fichier


merci encore pour tout, amitiés

 

[nrdz83]

Re : Nommer une zone d'impression

Bonjour à tous , voila j'ai essayer d'adapter les codes et conseils de staple 1600, mais je n'arrive pas à faire fonctionner cette macro.

Je joint un classeur de ce que je souhaite réaliser.

Par avance merci à tous, et faut il que je continue sur le code simplifier de staple?

Ou me rediriger vers mes quatres codes d'impressions de zones?

merci, amitiés

 

[nrdz83]

Re : Nommer une zone d'impression

re bonjour,
dois je partir avec un code du style

If optionbutton=true then
call sub imprimerzone1
a=1
enf if

par avance merci amitiés

 

[nrdz83]

Re : Nommer une zone d'impression

🙄Re bonsoir à tous pour vous dire que j'ai trouvé grace a une aide d'un autre site mais je vous laisse la solution si ça peut aider quelqu'un mes amitiés et encore merci.

Private Sub CommandButton2_Click()
If OptionButton1 = True Then
imprimerZone1
ElseIf OptionButton2 = True Then
imprimerZone2
ElseIf OptionButton3 = True Then
imprimerZone3
ElseIf OptionButton4 = True Then
imprimerZone4
End If
End Sub

Sub imprimerZone1()
Sheets("Feuil1").PageSetup.PrintArea = Sheets("Feuil1").Range("zone1").Address
Unload USF_Printzones
ActiveSheet.PrintPreview
Sheets("Feuil1").PrintOut
End Sub

🙂

 

[Staple1600]

Re : Nommer une zone d'impression

Bonsoir


Donc n'avoir qu'une macro ne t'intéresse finalement pas ?

Tu préfères répéter 4 fois le code d'impression ?

 

[nrdz83]

Re : Nommer une zone d'impression

bonsoir staple 1600, sisi tous m'interesse, mais la je comprend tous le code et j el'adapte egalement à d'autres solutions mais je garde en meemoire tout de même ta macro.

Ce code t'appartiens aussi chapeau bas pour ton travail, l'essentiel pour moi c'est que ça fonctionne, car je m'aperçois qu'il y a tellement de façons d'arriver au résultat que des fois c'est bluffant.
encore merci pour tout amitiés😎

 

[Staple1600]

Re : Nommer une zone d'impression

Bonsoir


Ce code ne m'appartient pas (il est l'enfant d'Excel et de VBA)

Je posterai d'ici peu ta pj "à ma sauce"

EDITION: voici la pj

 

[nrdz83]

Re : Nommer une zone d'impression

re chapeau ta sauce me convient je la mets de coté dans mes documents et vais certainement l'adapter si ce n'est a ce classeur il sera a d'autres, amitiés et encore bravo.