Zone d'impression

[ugeme]

Comment puis-je définir une zone d'impression dynamique en VBA à partir d'une sélection de cellule ,


ActiveSheet.PageSetup.PrintArea = ???

Merci d'avance

 

[Myta]

Bonsoir ugeme

Cet exemple montre comment affecter à la zone d'impression les cellules A1:C5 de la feuille Sheet1.

Worksheets("Sheet1").PageSetup.PrintArea = "$A$1:$C$5"

Tu as deja tout d'expliqué dans l'aide (F1) sur le mot PrintArea

Mytå

 

[Didou]

Bonjour à tous,

J'ai utilisé dans un classeur une procédure qui donne un aperçu avt impression dynamique:



Sub Apercu_avt_impr()
'dans mon classeur la zone s'étend jusqu'a la colonne "F"
dercell = Range("F1").End(xlDown).Address
Range("A1:" & dercell).Select
ActiveWindow.Selection.PrintPreview
Range("A1").Select
End Sub


A+ Didou