Liason entre ListBox VBA
Résolu
A voir également:
- Liason entre ListBox VBA
- Excel compter cellule couleur sans vba - Guide
- Mkdir vba ✓ - Forum VB / VBA
- Autofill vba ✓ - Forum Excel
- L'indice n'appartient pas à la sélection vba ✓ - Forum Programmation
- Incompatibilité de type vba ✓ - Forum VB / VBA
5 réponses
Salut
Soit List1 la liste où tu choisis et List2 celle auto
[code]
.....
List2.ListIndex = List1.ListIndex
.....
[\code]
Bonne journée
Soit List1 la liste où tu choisis et List2 celle auto
[code]
.....
List2.ListIndex = List1.ListIndex
.....
[\code]
Bonne journée
Salut, merci pour ta réponse,
je vien d'essayer et il me met "erreur d'execution 424" objet requis".
Dois-je mettre le code dans un private sub pour que sa fonctionne ?
ou faire un petit Dim liste1 As (je sais pas quoi) puis set list1=Listbox1.tabindex....?
je vien d'essayer et il me met "erreur d'execution 424" objet requis".
Dois-je mettre le code dans un private sub pour que sa fonctionne ?
ou faire un petit Dim liste1 As (je sais pas quoi) puis set list1=Listbox1.tabindex....?
Salut
Moi pour faire un test rapide, j'ai construit une forme avec deux listbox list1 & List2 puis j'ai rempli les listes puis
[code]
private sub List1_click()
List2.Listindex = List1.ListIndex
end sub
[\code]
Et voilà !
Moi pour faire un test rapide, j'ai construit une forme avec deux listbox list1 & List2 puis j'ai rempli les listes puis
[code]
private sub List1_click()
List2.Listindex = List1.ListIndex
end sub
[\code]
Et voilà !
Vous n’avez pas trouvé la réponse que vous recherchez ?
Posez votre question
Merci pour ton aide, j'ai trouver une sollution en mellangeant ton bou de code et le mien.
En tout cas tout marche, jpeu continuer now.
merci
ps :au lieu de Topindex : listindex
If ActiveControl = ListBox1 Then ListBox2.ListIndex = ListBox1.ListIndex
If ActiveControl = ListBox2 Then ListBox1.ListIndex = ListBox2.ListIndex
En tout cas tout marche, jpeu continuer now.
merci
ps :au lieu de Topindex : listindex
If ActiveControl = ListBox1 Then ListBox2.ListIndex = ListBox1.ListIndex
If ActiveControl = ListBox2 Then ListBox1.ListIndex = ListBox2.ListIndex