comparaison listbox multicolonnes

[Cyril]

Bonsoir le Forum,
J'ai pu progresser grâce à cet espace mais peut être est ce la fatigue mais je n'arrive pas à trouver une information dans la base, alors si vous permettez je vous livre mon propblème:

If Me.Listbox1.ListIndex=-1 and Me.Listbox2.ListIndex=-1 or _ Me.Listbox1.Column(1,Me.Listbox1.ListIndex) _
=Me.Listbox1.Column(8,Me.Listbox2.ListIndex) then
macrox
Ce que je veux dire en littéral:
si les 2 listbox n'on aucun element sélectionné ou si la valeur de la 2ème colonne de la ligne sélectionnée dans la listbox1 est la même que l'élément de la 9ème colonne de la ligne sélectionnée dans la listbox2 alors la macrox s'exécute.
Mais j'ai une erreur 381 (impossibilité de lire la propriétéColumn.Index dela table de propriétés non valide)
Merci de votre aide

 

[myDearFriend!]

Bonsoir Cyril, le Forum,

Ci-dessous, une façon de faire :

Dim V1 As Variant, V2 As Variant
      With ListBox1
            V1 = .ListIndex
            If V1 > -1 Then V1 = .List(.ListIndex, 1)
      End With
      With ListBox2
            V2 = .ListIndex
            If V2 > -1 Then V2 = .List(.ListIndex, 8)
      End With
      If V1 = V2 Then MsgBox 'Lancement de la macroX'

Cordialement,

 

[Cyril]

Bonsoir MdF, le Forum
Je te remercie de ton efficacité, c'est exactement le fonctionnement attendu.
Bonne fin de soirée et bonne nuit à tous.