Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

Impression conditionnelle

gst_

XLDnaute Nouveau
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

XLDnaute Occasionnel
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+
 

Evelynetfrancois

XLDnaute Impliqué
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_

XLDnaute Nouveau
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 ?
 

Discussions similaires

Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…