Tri listbox avec bouton option

Bonjour le forum.

Je cherche le moyen dans le fichier joint, de trier ma listbox en fonction des bouton d'option.

Je click sur le bouton consultation, je rentre un tata ( ou un autre nom ) dans le textbox j'appuie sur enter, j'alimente un listbox. Ensuite je bute sur le code des boutons d'options. je souhaiterai que lorsque je click sur le bouton d'option a b e , la listbox se mette à jour en m'indiquant tous les tata avec en colonne 3 ceux qui contiennent a b et e. et si il n'y en a pas, il remonte un message catégorie inexistante pour ce nom.

En espérant trouver réponse, je continue de chercher.

Merci d'avance

Bonjour

un essai, si j'ai tout compris (?), pour l'OptionButton "a b e" :

Private Sub OpbEnCours_Click()
Dim i As Long, Compteur As Long, Test, Total As Long
With ListBox1
If OpbEnCours Then
    Total = .ListCount
    For i = .ListCount - 1 To 0 Step -1
        Test = Me.ListBox1.List(i, 2)
        If Test <> "a" And Test <> "b" And Test <> "e" Then
            Compteur = Compteur + 1
            ListBox1.RemoveItem (i)
        End If
    Next
    If Compteur = Total Then MsgBox "catégorie inexistante"
End If
End With
End Sub

à adapter pour les 2 autres OptionButton.

A+