Impression conditionnelle

[gst_]

Tout d'abord bonjour !

Je suis nouveau sur ce forum et en parcourant les messages j'ai découvert la complexité d'excel. Complexité qui me dépasse lorsque il s'agit de créer des fonctions avancées.

Voilà mon problème, j'ai une feuille "récapitulative" où j'ai indiqué dans une colonne le nom d'autres feuilles qui se trouvent dans le même classeur. Mon objectif est de créer un bouton imprimer sur la feuille récapitulative qui imprimerait automatiquement les feuilles présentes dans cette colonne, sachant que je n'ai pas besoin d'imprimer toutes les feuilles du classeur.

Voilà, j'espère que je me suis exprimer clairement. Cî-joint un fichier exemple.

Regarde la pièce jointe impression_conditionnelle.xls

 

[Eric 45]

Re : Impression conditionnelle

Bonjour le Forum
Bonjour gst

Essaie ce code. Je n'ai pas pu le faire car je suis en panne d'imprimante


Dim nomfeuille As String

Sub imprime()
Sheets("récap").Range("a2").Select
For i = 0 To Range("a65536").End(xlUp).Row - 2
nomfeuille = ActiveCell.Offset(i, 0).Text
ActiveWindow.Sheets(nomfeuille).PrintOut Copies:=1, Collate:=True
Next i
End Sub

A+

 

[gst_]

Re : Impression conditionnelle

Merci pour ta réponse Eric 45, j'ai essayé la macro mais j'ai une erreur
438 : "Vous avez spécifié une méthode ou une propriété n'existant pas pour cet objet Automation. ".

J'ai essayé de changer la formule mais sans résultat.

Regarde la pièce jointe essai_impression.xls

 

[Evelynetfrancois]

Re : Impression conditionnelle

bonjour Eric 45 et gst_

je me permets, pour t'avancer, d intervenir sur la macro d' ERIC qui ne vient pas .............

Sheets(nomfeuille).PrintOut Copies:=1, Collate:=True
à la place de
ActiveWindow.Sheets(nomfeuille).PrintOut Copies:=1, Collate:=True

E et F

 

[gst_]

Re : Impression conditionnelle

Ca marche ce coup là, merci beaucoup pour vos interventions rapides.
Par contre comment faire pour n'imprimer qu'une seule fois une page si elle est indiquée deux fois dans la liste ?