PrintArea variable

[Xtian (du Québec)]

Salut le forum,
J'aimerais savoir comment utiliser une zone d'impression variable. J'ai un code qui produit, selon le choix effectué, un tableau qui montre après chaque exécution les données se rapportant à une personne en particulier. Le résultat du code donne rarement le même nombre de ligne pour chaque personne donc la zone d'impression doit être variable selon le nombre de ligne de chaque résultat.

J'utilise les codes suivants pour sélectionner les cellules concernées:

Range(Selection, Selection.End(xlDown)).select
Range(Selection, Selection.End(xlToRight)).select

J'aimerais que cette sélection devienne ma zone d'impression.

Je suis certain que la réponse sera facile pour quelques uns d'entre vous.

Merci beaucoup

Xtian (du Québec)

 

[wape]

Bonjour Xtian (du Québec) et le forum,

Il suffit d'ajouter, à la suite des deux lignes mentionnées :

ActiveSheet.PageSetup.PrintArea = Selection.Address


@+
wape

 

[Xtian (du Québec)]

Merci beaucoup wape...c'est exactement ce que je cherchais.

@+

Xtian (du Québec)