Bonjour le forum
SVP Existe-t-il un code pour imprimer le contenu de cette listbox ?
Un autre question je souhaite la colonne 7 sous la forme 0.00 ?
Merci bcp
Il faut récupérer le contenu de la listbox dans une feuille puis imprimer cette feuille.
Code:
Private Sub B_résultat_Click()
Set f2 = Sheets("résultat")
f2.Cells.ClearContents
a = Me.ListBox1.List
f2.[A2].Resize(UBound(a) + 1, UBound(a, 2) + 1) = a
f2.Cells.EntireColumn.AutoFit
End Sub