Zone d impression

[Bruce68]

Bonsoir à tous

Quand je clic sur matin ( au départ) j'ai bien la zone d'impression matin défine .
Ensuite si je clic sur midi j'ai toujours la zone matin définie si je clic sur soir toujours matin défini.
La macro garde toujours en mémoire la première zone d impression définie.
Que cloche t'il dans mes macros ?
Je vous remercie pour l'aide



Sub matin()
Range("$Q$2:$AC$37").Select
ActiveSheet.PageSetup.PrintArea = "$Q$2:$AC$37"
End Sub
Sub midi()
Range("$AG$2:$AS$37").Select
ActiveSheet.PageSetup.PrintArea = "$AG$2:$AS$37"
End Sub
Sub Soir()
Range("AW2:BI37").Select
ActiveSheet.PageSetup.PrintArea = "$AW$2:$BI$37"
End Sub

 

[jecherche]

Bonjour,

À tester ...
Au début de chacune des macros, insère : ActiveSheet.PageSetup.PrintArea = ""



Jecherche

 

[Bruce68]

bonsoir jecherche
merci pour cette réponse, ce que tu proposes existe déjà dans la macro, en supprimant le range ce n'est pas mieux,
je vous remercie de votre aide.

 

[jecherche]

Bonjour,

C'est bien un ActiveSheet.PageSetup.PrintArea ="" ... vide que je propose, avant d'en déterminer un nouveau.
Comme ceci :

Sub matin()
ActiveSheet.PageSetup.PrintArea =""
Range("$Q$2:$AC$37").Select
ActiveSheet.PageSetup.PrintArea = "$Q$2:$AC$37"
End Sub

Jecherche

 

[Bruce68]

bonsoir jecherche
merci pour cette réponse, ce que tu proposes existe déjà dans la macro, en supprimant le range ce n'est pas mieux,
je vous remercie de votre aide.

 

[Bruce68]

Merci jecherche

J'avais mal interprété avec ta modif cela fonctionne.
Bonne soirée et encore merci