Varier le contenu d'une ComboBox en fonction du contenu d'une autre ComboBo

Bonjour,

Je rencontre un problème sur VBA : dans un UserForm, j'ai deux ComboBox, dans la première on rentre une catégorie de personne, et dans la seconde j'aimerai qu'en fonction de la catégorie de personne choisie, il y ai la liste de prénoms appartenant à cette catégorie qui soit proposé mais je n'y parviens pas. Je mets un morceau de mon code :

If Me.ComboBoxCategorie.Value = "Categorie1" Then
Do Until IsEmpty(Worksheets("Divers").Range("E" & i))
Call Me.ComboBoxPrenom.AddItem(Worksheets("Divers").Range("E" & i).Value)
i = i + 1
Loop

ElseIf Me.ComboBoxCategorie.Value = "Catégorie2" Then
Do Until IsEmpty(Worksheets("Divers").Range("F" & j))
Call Me.ComboBoxPrenom.AddItem(Worksheets("Divers").Range("F" & j).Value)
j = j + 1
Loop

Else
Do Until IsEmpty(Worksheets("Divers").Range("G" & k))
Call Me.ComboBoxPrenom.AddItem(Worksheets("Divers").Range("G" & k).Value)
k = k + 1
Loop

End If

Merci d'avance pour votre aide !

Bonjour et bienvenue sur le forum

Tu devrais joindre ton fichier...

Bye !