impression d'une listbox

jammy17

XLDnaute Occasionnel
Bonsoir le forum


je cherche desesperement le code VBA sous excel pour pouvoir imprimer le contenu d'une listbox..

quelqu'un aurait il la soluce?

d'avance merci!
 

myDearFriend!

XLDnaute Barbatruc
Bonsoir jammy17, MichelXld,

Presque la même chose avec une petite variante :

Private Sub btnImprListe_Click()
      Application.ScreenUpdating = False
      ThisWorkbook.Sheets.Add
      With ActiveSheet
            .Range(.Cells(1, 1), .Cells(ListBox1.ListCount, _
                        ListBox1.ColumnCount)).Value = ListBox1.List
            .PrintOut
            Application.DisplayAlerts = False
            .Delete
            Application.DisplayAlerts = True
      End With
      Application.ScreenUpdating = True
End Sub
Cordialement,
 

Discussions similaires

Réponses
9
Affichages
666
Réponses
25
Affichages
683

Statistiques des forums

Discussions
312 347
Messages
2 087 504
Membres
103 565
dernier inscrit
Fabien78