Deux filtres sur userform VBA

Bonjour,

Je vous sollicite suite à un petit problème.

Dans mon fichier ( le deuxième userform "Trackinglist2)) permet d'afficher les données du premier userform grâce au numéro de réfèrence.

Je souhaitais savoir si c'était possible de mettre deux filtres : type sélection de la personne en charge + sélection du numéro de réference .

C'est pour eviter en gros d'avoir 100 numéros de réferences en menu déroulant .

Merci d'avance de votre aide ( j'ai essayé des codes mais cela ne m'affiche pas les numéros de référence selon la personne que j'ai choisi ).

Divya

Tout est possible mais ta demande ne me semble pas claire.

Je vais esssayer d'être plus explicite :

J'aimerai que deux combobox soient lier ( cmbsales et Comboxref ) pour que quand je sélectionne le cmbsales , celui de Reférence m'affiche uniquement les numéros liés au cmbsales ( et pas tous les numéros de références)

J'espère que c'est plus claire.

Merci

Divya

A mettre dans un module

Public Sub addifunique(CB As MSForms.ComboBox, value As String)
If CB.ListCount = 0 Then GoTo doadd
    Dim i As Integer
    For i = 0 To CB.ListCount - 1
        If CB.List(i) = value Then Exit Sub
    Next
doadd:
CB.AddItem value
End Sub

Le code de ton cmbsales

Private Sub cmbsales_Change()
Application.EnableEvents = False
Me.ComboBoxRef.Clear
With Sheets("TRACKING LIST ")
    For i = 2 To .Range("H" & .Rows.Count).End(xlUp).Row
        If Me.cmbsales = .Range("H" & i) Then
            addifunique Me.ComboBoxRef, .Range("I" & i).value
        End If
    Next i
End With
Application.EnableEvents = True
End Sub

Refait la même chose pour cbref

N'oublie pas de remplir les deux à l'initialisation

cmbsales.List = .Range("H2:H" & .Range("H" & Rows.Count).End(xlUp).Row).value

Merci bcp

C'est exactement cela