Selection dans un ListBox a partir autre ListBox

[Balinox]

Bonjour à tous,

J'ai 2 listbox dans un userform nomé SICAD :

listbox_ref et listbox_type.

Quand je clique sur une valeur de mon listbox_ref , j'aimerai que cela sélectionne la valeur qui a le même indice (listindex) qui est dans la lsitbox_type.

J'ai essayé le code suivant et bien d'autres mais sans succès 😕 .

Private Sub listbox_ref_Click()

Dim x As Long
x = SICAD.listbox_ref.ListIndex
            
SICAD.listbox_type.ListIndex(x).Select
    
End Sub

Aurriez-vous une idée sur la question ?

 

[Guest]

Re : Selection dans un ListBox a partir autre ListBox

bonjour Balinox,

Private Sub listbox_ref_Click(),
 
Dim x As Long
x = SICAD.LB_dn_listedevis_ref.ListIndex
if x>-1 then  SICAD.listbox_type.ListIndex = x    
End Sub

Ou pour faire plus cours

iF listbox_ref.ListIndex>-1 [B]then[/B]  SICAD.listbox_type.ListIndex = listbox_ref.ListIndex

le iF listbox_ref.ListIndex>-1 then n'est pas forcément nécessaire, il indique qu'un choix a été fait. A toi de voir

A+

 

[Balinox]

Re : Selection dans un ListBox a partir autre ListBox

Ah ok, c'est en donnant une valeur à l'index qu'on le sélectionne...🙄

Merci Hasco.