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
719
Réponses
25
Affichages
838

Statistiques des forums

Discussions
312 775
Messages
2 092 003
Membres
105 145
dernier inscrit
juliendauba1