Bonjour,
Dans un UserForm, il y a des listbox et des boutons de commande. Je ne
voudrais faire une action que sur les listbox. En parcourant tous les
contrôles du userform (For Each Ctrl in UserForm1.Controls), comment peut-on
déterminer que le contrôle scruté est une listbox ?
Merci pour votre aide
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Nicolas B.
Salut,
Avec Typename :
Dim Ctrl As Control For Each Ctrl In UserForm1.Controls If TypeName(Ctrl) = "ListBox" Then MsgBox Ctrl.Name End If Next
A+ Nicolas B.
Bonjour, Dans un UserForm, il y a des listbox et des boutons de commande. Je ne voudrais faire une action que sur les listbox. En parcourant tous les contrôles du userform (For Each Ctrl in UserForm1.Controls), comment peut-on déterminer que le contrôle scruté est une listbox ? Merci pour votre aide
Salut,
Avec Typename :
Dim Ctrl As Control
For Each Ctrl In UserForm1.Controls
If TypeName(Ctrl) = "ListBox" Then
MsgBox Ctrl.Name
End If
Next
A+
Nicolas B.
Bonjour,
Dans un UserForm, il y a des listbox et des boutons de commande. Je ne
voudrais faire une action que sur les listbox. En parcourant tous les
contrôles du userform (For Each Ctrl in UserForm1.Controls), comment peut-on
déterminer que le contrôle scruté est une listbox ?
Merci pour votre aide
Dim Ctrl As Control For Each Ctrl In UserForm1.Controls If TypeName(Ctrl) = "ListBox" Then MsgBox Ctrl.Name End If Next
A+ Nicolas B.
Bonjour, Dans un UserForm, il y a des listbox et des boutons de commande. Je ne voudrais faire une action que sur les listbox. En parcourant tous les contrôles du userform (For Each Ctrl in UserForm1.Controls), comment peut-on déterminer que le contrôle scruté est une listbox ? Merci pour votre aide
isabelle
bonjour philip,
Dim ctr As Control For Each ctrl In UserForm1.Controls If TypeName(ctrl) Like "ListBox" Then
isabelle
Bonjour, Dans un UserForm, il y a des listbox et des boutons de commande. Je ne voudrais faire une action que sur les listbox. En parcourant tous les contrôles du userform (For Each Ctrl in UserForm1.Controls), comment peut-on déterminer que le contrôle scruté est une listbox ? Merci pour votre aide
bonjour philip,
Dim ctr As Control
For Each ctrl In UserForm1.Controls
If TypeName(ctrl) Like "ListBox" Then
isabelle
Bonjour,
Dans un UserForm, il y a des listbox et des boutons de commande. Je ne
voudrais faire une action que sur les listbox. En parcourant tous les
contrôles du userform (For Each Ctrl in UserForm1.Controls), comment peut-on
déterminer que le contrôle scruté est une listbox ?
Merci pour votre aide
Dim ctr As Control For Each ctrl In UserForm1.Controls If TypeName(ctrl) Like "ListBox" Then
isabelle
Bonjour, Dans un UserForm, il y a des listbox et des boutons de commande. Je ne voudrais faire une action que sur les listbox. En parcourant tous les contrôles du userform (For Each Ctrl in UserForm1.Controls), comment peut-on déterminer que le contrôle scruté est une listbox ? Merci pour votre aide