Problème avec boucle pour impression

Bonsoir le forum

Je mets en pièces jointe un fichier dans lequel j'ai adapté un premier "Userform" afin d'envoyer dans une feuille nouvellement créée un choix de plusieurs tableaux. Puis avec un second qui s'ouvre à la suite, je cherche à faire un choix pour impression, et la j'ai un beug "référence incorrecte ou non qualifié" je ne comprends pas ce message d'erreur.

Si quelqu'un pouvait regarder et me dire ce qui ne va pas, le bouton de commande se trouve dans l'onglet "Photo situation PB"

d'avance, je vous remercie pour votre aide et pour le temps que vous m'accordez

25pa-33039-0039v.xlsm (209.55 Ko)

Bonjour

Modifie la macro

Private Sub CommandButton1_Click()

Application.EnableEvents = False 'désactive l'action des évènements
  'For o = 0 To Me.ListCount - 1
 For o = 0 To Me.ListBox2.ListCount - 1
    If Me.ListBox2.Selected(o) Then Sheets(Me.ListBox2.List(o)).PrintOut Copies:=2 'Preview:=True
  Next
  Application.EnableEvents = True

End Sub

Bonsoir Banzai64

Merci pour ton aide

Impec ça fonctionne nickel

Sujet clos

Rechercher des sujets similaires à "probleme boucle impression"