Bonjour à tous,
Voilà mon problème, j'ai plusieurs listBoxes qui s'alimentent en cascade.
- lstPere
- lstFils
J'ai le code suivant
Mais voilà, les objet lstObjSource et lstObjCible indique NULL, c'est trop nul !!!
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10 Private Sub lstPere_Click() Call displayListBox(Me.lstPere, Me.lstFils) End Sub Function displayListBox(ByRef lstObjSource As ListBox, ByRef lstObjCible As ListBox) sSQL = "" lstObjCible.RowSource = sSQL lstObjCible.SetFocus lstObjCible.Selected(0) = True End Function
Quelqu'un a une idée du pourquoi?
Merci à tous![]()
Partager