Alimentation combobox à partir d'1 colonne

bsoir à tous

débutant VBA excel, j'ai du mal à remplir un combobox à partir de la colonne d'une feuille en utilisant rowsource, list et additem

merci d'avance voilà l'exemple sur lequel je travaille

merci d'avance

Bonsoir,

Voici votre code, indenté :

Private Sub UserForm_Initialize()
    Dim i As Long
     Dim k As Long
     With usf_rens.Cb_civilité
        .List = Array("Monsieur", "Madame", "Mademoiselle")
     End With
     cb_sexe.List = Array("M", "F")
     With Sheets("bd2")
        i = .Range("A" & Rows.Count).End(xlDown).Row
        For k = 2 To i
            cb_spécialité.AddItem .Range("A" & k).Value
        Next k
    End With
End Sub

remplacez : i = .Range("A" & Rows.Count).End(xlDown).Row

par i = .Range("A" & Rows.Count).End(xlUp).Row

Cela devrait être mieux...

Merci de votre prompt réaction; çà marche

encore un petit dérangement comment dans le combobox date de naissance faire en sorte que l'utilisateur l'entre au format dd/jj/aaaa

ex 22/06/2001?

bonjour

peux être plus simple

Private Sub UserForm_Initialize()
 Cb_civilité.List = Array("Monsieur", "Madame", "Mademoiselle")
 cb_sexe.List = Array("M", "F")
   With Sheets("bd2")
      cb_spécialité.List = .Range("A2:A" & .Range("A" & Rows.Count).End(xlUp).Row).Value
   End With
End Sub

A+

Maurice

Merci de votre soutien çà marche;