Bonjour à tous,
j'aimerais arriver a faire ça
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
 
'laform est une userform
laform = "Form_achats"
 
For Each ct In laform.Controls
    If ct.Name Like "ListBox*" Then
    ct.Clear
    End If
Next
VBA.UserForms.Add(laform).Repaint
j'ai cherché et trouvé ça mais ça ne fonctionne pas
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
 
For Each ct In VBA.UserForms.Add(laform).Controls
et aussi avec Callbyname mai c'est encore un échec!

si quelqu'un a une solution, et ben c'est cool?