Comment affecter une liste de valeur à une combobox dans un formulaire ?

[fb62840]

Bonjour à toutes et à tous,

Dans un formulaire je place plusieurs Combobox permettant à l'utilisateur :
- de renseigner le nom d'une ville
- de renseigner le code postal de la ville
- de renseigner une année
- de renseigner un niveau
- de renseigner un nom de métier

J'ai placé sur une feuille nommée Sources:
un tableau avec l'ensemble des noms de ville en France et leurs codes postal
un tableau avec les nivaux
Un tableau avec les métiers

Pourriez-vous m'expliquer comment affecter les valeurs aux différentes combobox ?

J'aimerais également, ci cela était possible afficher un bouton d'aide à côté de la CBniveau afin que l'utilisateur en cliquant dessus puisse obtenir l'affichage de la Précision associée au niveau sélectionné.

Merci

 

[PascalXLD]

Re : Comment affecter une liste de valeur à une combobox dans un formulaire ?

Bonjour

Pour remplir ta combo tu trouveras je pense tout le nécessaire ici

https://www.excel-downloads.com/threads/vba-alimentation-dune-combobox-ou-dune-listbox.81037/

Bonne lecture

 

[fb62840]

Re : Comment affecter une liste de valeur à une combobox dans un formulaire ?

Bonjour Pascal,

Merci pour cette piste.
Il est apparemment possible d'alimenter les combobox avec des listes existantes dans le classeur mais le lien n'explique pas la démarche.

Bonne journée

 

[PascalXLD]

Re : Comment affecter une liste de valeur à une combobox dans un formulaire ?

Re

Si il y a même trois méthodes d'expliquer

J'ai utiliser par exemple al méthode additem dans ton fichier pour remplir les métiers

Par contre pour tes listes de bases je te conseille de ne pas les mettre les unes en dessous des autres mais les unes à côté des autres
Si tu as besoin de rajouter des choses à une liste tu te trouves pas coincé

 

[PascalXLD]

Re : Comment affecter une liste de valeur à une combobox dans un formulaire ?

Re

voici ton fichier
Je l'ai modifié en fonction de ma remarque et j'ai utilisé texto la méthode du lien (j'ai juste changé le nom du combo et de la feuille)
Je ne l'ai toujours fait que pour les metiers

 

[fb62840]

Re : Comment affecter une liste de valeur à une combobox dans un formulaire ?

Merci Pascal,

En effet, je me suis trompé, en fait les codes modifient la propriété Row.
Merci pour les explications.

J'ai toutefois un problème en essayant d'allimenter les autres champs:

Private Sub UserForm_Initialize()
i = Sheets("Sources").Range("F65536").End(xlUp).Row
For x = 2 To i
    With CBmetier
        .AddItem Sheets("Sources").Range("F" & x)
    End With
Next x
End Sub

La rédaction suivante est incorrecte

For x = 2 To i
    With CBmetier
        .AddItem Sheets("Sources").Range("F" & x)
    End With
    With CBville
        .AddItem Sheets("Sources").Range("A" & x)
    End With
    With CBcodepostal
        .AddItem Sheets("Sources").Range("B" & x)
    End With
    With CBniveau
        .AddItem Sheets("Sources").Range("C" & x)
    End With
    With CBville
        .AddItem Sheets("Sources").Range("E" & x)
    End With
Next x
End Sub

Merci pour votre aide