Impression d'une feuille

[Lo]

Bonjour à tous,

Je viens de créer un classeur avec à l'intérieur une bonne vingtaine de feuilles.
Sur la première feuille que j'ai appelé Général, j'ai crée une liste reprenant le titre de chacune des feuilles avec 2 cases à cocher à droite de chaque titre (Imprimer, Ne pas imprimer).

Au bas de cette feuille, j'ai inséré un bouton pour lancer l'impression.

Mon problème : je n'arrive pas à créer une ligne de code jointe au bouton et me permettant d'imprimer uniquement les feuilles pour lesquelles j'ai coché le choix Imprimer.

J'espère avoir été clair....

:ermm:

J'espère que quelqu'un pourra me répondre rapidement. C'est pour le boulot et ca devient vraiment urgent......

En tout cas, merci par avance.

 

[Pierre]

Bonjour Lo,


J'ai été confronté au même problème, il y a quelque temps. Je l'avais résolu via un UserForm où un ListBox affichait l'ensemble des feuilles pouvant être imprimées. Derrière ce UserForm se cachait le code suivant:

Private Sub UserForm_Activate()
For Each ws In Worksheets
If ws.Name = 'Matrice' Or ws.Name = 'Accueil' Or ws.Name = 'Calcul' Or ws.Name = 'Codes' Or ws.Name = 'Tableau' Then
Else
ListBox1.AddItem ws.Name
ListBox1.MultiSelect = fmMultiSelectMulti
End If
Next ws
End Sub

Qui affiche toutes le feuilles sauf celles reprisent dans le If.

Cela peut-il t'aider?


Pierre

Message édité par: Pierre, à: 30/03/2005 09:30