Discussion :

[nrdz83]

Bonjour à tous , je cherche par le biais d'un usf et d'optionbutton l'impression de zone définies dans une feuille excel.

j'utilise ces macros pour l'impression des zones:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub imprimerZone1()
Sheets("Feuil1").PageSetup.PrintArea = Sheets("Feuil1").Range("zone1").Address
ActiveSheet.PrintPreview
Sheets("Feuil1").PrintOut
End Sub
 
Sub imprimerZone2()
Sheets("Feuil1").PageSetup.PrintArea = Sheets("Feuil1").Range("zone2").Address
ActiveSheet.PrintPreview
Sheets("Feuil1").PrintOut
End Sub
 
Sub imprimerZone3()
Sheets("Feuil1").PageSetup.PrintArea = Sheets("Feuil1").Range("zone3").Address
ActiveSheet.PrintPreview
Sheets("Feuil1").PrintOut
End Sub
Sub imprimerZone4()
Sheets("Feuil1").PageSetup.PrintArea = Sheets("Feuil1").Range("zone4").Address
ActiveSheet.PrintPreview
Sheets("Feuil1").PrintOut
End Sub

Je n'arrive pas à faire le code de mon usf pour l'impression avec le choix d ela zone à imprimer.

Je joint un condensé de ce que je cherche à réaliser.

Par avance merci à tous , mes amitiés