Impression par macro

[Hélène]

Bonsoir le forum

Me revoici avec un nouveau soucis
Dans la colonne A j'ai une formule qui s'acrémente à chaque saisie
Or lors de l'impression via la macro
faite par l'éditeur de macro il me propose 44 pages bien que je n'ai que 4 pages de saisie
comment faire ?
Je voudrais une impression avec les titres A1:E6
et uniquement les pages affichées à l'écran soit dans ce cas précis jusqu'à la ligne 170 et non jusqu'à la ligne 2154 dernière recopie de ma formule
Merci pour votre aide très précieuse
Hélène [file name=IMPRESSION.zip size=33312]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/IMPRESSION.zip[/file]

 

[Davidc57]

Bonsoir Hélène,

Tu dois déterminer la dernière ligne de la facon suivante :

ndl = sheets('Feuil1').Range('C6').end(xldown).row

Ensuite ....

sheets('Feuil1').Range('A1:G'& ndl).printout

A+

David

 

[Hélène]

Bonjour le forum

Merci beaucoup David
Cela fonctionne à merveille

Bonne journée
Hélène