BASSDINGUE
XLDnaute Occasionnel
bonjour le forum,
j'ai trouver ce bout de code sur le site pour imprimer le contenu d'une listbox mais il me demande de definir la variable "feuille" ( que j'ai mis en rouge), jai essayer worksheet et stringmais c'est pas bon et je seche, si vous savez n'hesitez pas
merci
With Application
.ScreenUpdating = False
.DisplayAlerts = False
Set feuille = Sheets.Add
feuille.Range("a1").Resize(LBD1.ListCount, LBD1.ColumnCount) = LBD1.List
feuille.PrintOut
feuille.Delete
.ScreenUpdating = True
.DisplayAlerts = True
End With
j'ai trouver ce bout de code sur le site pour imprimer le contenu d'une listbox mais il me demande de definir la variable "feuille" ( que j'ai mis en rouge), jai essayer worksheet et stringmais c'est pas bon et je seche, si vous savez n'hesitez pas
merci
With Application
.ScreenUpdating = False
.DisplayAlerts = False
Set feuille = Sheets.Add
feuille.Range("a1").Resize(LBD1.ListCount, LBD1.ColumnCount) = LBD1.List
feuille.PrintOut
feuille.Delete
.ScreenUpdating = True
.DisplayAlerts = True
End With