Rechercher : dans
Par :

Zone d'impression variable et aperçu

Dernière réponse le 4 avr 2009 à 07:51:19 Argentomaouss, le 3 avr 2009 à 23:31:15 
 Signaler ce message aux modérateurs

Bonjour,

Soit un tableau avec un nombre de lignes variables.

Je voudrais, avant d'imprimer mon tableau que l' utilisateur ait un aperçu avant impression.

J'ai donc la macro suivante, dans laquelle je cherche par quoi remplacer les ?????? afin d'imprimer la sélection effectuée par la première ligne de ma macro.

Range("A8").CurrentRegion.Select
ActiveSheet.PageSetup.PrintArea = "??????????????"
ActiveWindow.SelectedSheets.PrintPreview

Jusqu'à maintenant quoique j'aie essayé de mettre à la place, j'ai toujours eu un message d'erreur d'exécution : "Impossible de définir la propriété de PrintArea dans la classe PageSetup"

Ca doit certainement être tout con pour un pro des macros, mais après de multiples recherches je sèche....

Alors, merci d'avance pour votre aide

Configuration: Windows XP
Firefox 2.0.0.12

1

lermite222, le 4 avr 2009 à 07:10:16

Bonjour,
ActiveSheet.PageSetup.PrintArea = Selection.Address
ou,
ActiveSheet.PageSetup.PrintArea = Range("A8").CurrentRegion.Address

A+ L'expérience instruit plus sûrement que le conseil. (André Gide)  
Si tu te cogne à un pot et que ça sonne creux, c'est pas forcément le pot qui est vide. ;-)(Confucius)

Répondre à lermite222

2

 Argentomaouss, le 4 avr 2009 à 07:51:19

OK, ça marche.

J'avais essayé avec Address mais en n'y mettant qu'un seul "D" comme c'était noté sur un autre forum...

Quoiqu'il en soit, merci beaucoup à toi.

Répondre à Argentomaouss
Collection CommentÇaMarche.net