Imprimer feuilles de classeur à partir d'un USF

Bonjour à tous,

Au vue qu'il est possible d'imprimer via une macro sous excel, j'aurai souhaité avoir une liste de choix via un USF avec des chekbox ou autres afin d'imprimer que certaines feuilles de mon classeur.

Merci de l'aide que vous pourrez m'apporter.

Salut ldr33

Voici un exemple de ce que l'on peut faire

Bonjour,

Merci beaucoup Bruno, fonctionne nickel.

bonjour à tous,

Je reviens vers vous afin de savoir comment je pourrais faire à partir d'un userform pour imprimer que certaines feuilles de mon classeur sans pour autant que ça affiche tous les onglets, dans l'idée que les autres utilisateurs n'est pas accès aux autres données du classeur.

Merci de l'aide que vous pourrez m'apporter.

Salut Ldr33

Voici le code du début de l'USF

Option Explicit
Dim FlgVisible As Boolean

Private Sub Cbn_Imprimer_Click()
  Dim LigLv As Long
  ' Avec l'objet conteneur ListView1
  With Me.ListView1
    ' Pour chaque ligne
    For LigLv = 1 To .ListItems.Count
      ' Si la ligne est cochée
      If .ListItems(LigLv).Checked = True Then
        ' Empècher la mise à jour de l'écran
        Application.ScreenUpdating = False
        ' On imprime la feuille correspondante
        With Sheets(.ListItems(LigLv).Text)
          ' Récupérer le FLAG de la visibilité de la feuille
          FlgVisible = .Visible
          ' Si le FLAG est faux, afficher la feuille
          If FlgVisible = False Then .Visible = True
          ' Imprimer la feuille
          .PrintOut
          ' Si le FLAG était faux, masquer la feuille après impression
          If FlgVisible = False Then .Visible = False
        End With
        ' Autoriser la mise à jour de l'écran
        Application.ScreenUpdating = True
      End If
    Next LigLv
  End With
End Sub

A+

Bonsoir à tous,

Je ne maîtrise pas tout le code, est-ce qu'avec l'exemple ci joint on pourrait cacher la feuil2? Ce serait plus parlant pour moi.

Merci à vous pour votre aide.

Bonsoir à tous,

J'ai trouvé une parade à mon problème j''imprime à partir de commandbutton dans un UsF les feuilles souhaitées .

Bonne soirée à vous.