impression en vba

[paul]

Bonsoir à tous,

qq'un a t'il une idee de comment je peut faire pour imprimer les lignes pour laquelle la colone B est renseigne avec la lettre x, quand on clique sur le bouton 'Imprimer'

merci d'avance

Paul

Je vous joints un p'tit fichier

merci encore [file name=impression.zip size=4359]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/impression.zip[/file]

 

[Gael]

Bonjour Paul,

Je ne suis pas assez bon en VBA pour te donner un code complet mais je pense qu'il est possible de boucler sur la colonne B et de masquer toutes les lignes sans 'X'.

Rows('15').Select
Selection.EntireRow.Hidden = True


Après, il suffit de faire une impression, les lignes masquées ne seront pas imprimées.

ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

Puis à la fin, sélectionner tout et afficher

Cells.Select
Selection.EntireRow.Hidden = False

@+

Gael

 

[ThomasR]

Bonsoir paul, Gael,

Bien vu Gael, en piece joint la boucle qui masque les lignes à la facon de Gael, dans ton cas il ne te reste plus qu'a y ajouter le code d'impression et surtout apres le code qui te permetra de rendre visible les lignes (cf. msg precedent)

@+
Thomas®

PS : dans le code j'ai fait une boucle sur 60 ligne tu peux mettre 65000 [file name=impression_20050608223331.zip size=7475]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/impression_20050608223331.zip[/file]