Bonjour à tous. Je voudrais créer une interface qui me permettrait, à partir d'une liste déroulante, de choisir le nom de famille d'une personne. Chaque nom de famille est lié à un métier différent (il existe seulement 3 métiers pour une centaine de famille).
Ainsi dans le code de mon userform pour la partie nom j'ai écris le code suivant malheureusement il me trouve une erreur de compilation : séparateur d eliste ou ) attendu pour le NBVAL. Voici le code de cette partie :
Pour ce qui concerne la partie métier je voudrais là aussi créer une liste déroulante par contre vu qu'il n'y a que 3 métiers il va y avoir des redondances c'est pourquoi je voudrais connaître la solution pour supprimer les doublons. Je vous remercie pour votre aide comme d'habitude et vous souhaite une excellente journée.
Ainsi dans le code de mon userform pour la partie nom j'ai écris le code suivant malheureusement il me trouve une erreur de compilation : séparateur d eliste ou ) attendu pour le NBVAL. Voici le code de cette partie :
Code:
Sub UserForm_Initialize()
'Initialisation de l'User Form Societe
'Index des valeurs
Dim I
Dim J As Integer
<couleur nom="rouge">J = NBVAL(E2:E200</couleur>)
For I = 2 To J
nom.AddItem Sheets("Feuil1").Cells(I, 5)
Next
End Sub
Pour ce qui concerne la partie métier je voudrais là aussi créer une liste déroulante par contre vu qu'il n'y a que 3 métiers il va y avoir des redondances c'est pourquoi je voudrais connaître la solution pour supprimer les doublons. Je vous remercie pour votre aide comme d'habitude et vous souhaite une excellente journée.