Combobox

Bonjour le forum!

J'ai crée un Userform à l'aide duquel l'utilisateur doit saisir une date de début et de fin de réalisation de projet. Ainsi, j'ai placé plusieurs Combobox afin de limiter au maximun les saisies. Le problème est qu'ayant 6 combobox différentes, j'aimerais éviter de saisir pour chacune d'elle : combobox1.additem "Janvier", etc......

Je me suis donc crée une feuille "paramètre"sur laquelle j'ai inscrit les douze mois et je voudrais que la combobox l'uitlise. Est ce possible ou doit passer par un autre moyen?

Merci d'avance à tous!

Bonsoir,

voici une macro à metre dans --> Private Sub UserForm_Initialize()

On suppose que les mois sont encodés dans la colonne A à partir de la ligne 2.

Dim I As Integer, x As Integer
For I = 2 To Sheets("Paramètres").Range("A65536").End(xlUp).Row
    With ComboBox1
        .AddItem Sheets("Paramètres").Range("A" & I)
    End With
Next I
End Sub

A te lire

dan

Merci beaucoup je vais essayer ca.

C'est bon je viens de tester et ca marche!!!!!!!

Merci!

Rechercher des sujets similaires à "combobox"