1 To Sheets.Count

Evelynetfrancois

XLDnaute Impliqué
bonjour a tous , voir bonne nuit !!

Est il possible d avoir l additem dans l autre sens (inversé)


Private Sub UserForm_Initialize()
Dim i As Byte
For i = 1 To Sheets.Count
If Sheets(i).Name <> "MDL" Then Me.ListBox1.AddItem Sheets(i).Name
Next
End Submerci d avance pour tout
E et F
 

Discussions similaires