liste dans combobox

[f69815]

bonsoir tout le monde,
dans un formulaire j'utilise deux combox pour afficher des données issues des deux premièeres lignes
j'ai commencé à écrire ceci:
Private Sub UserForm_Activate()

ActiveWorkbook.Names.Add Name:="noms", RefersToR1C1:= _
Sheets("feuil2").Range("A1", Range("A1").End(xlDown))
ActiveWorkbook.Names.Add Name:="ecg", RefersToR1C1:= _
Sheets("feuil2").Range("B1", Range("B1").End(xlDown))

' Remplissage des 2 listes déroulantes (Nom agent et type d'ecg)
Me.ComboBox1.RowSource = "feuil2!noms"
Me.ComboBox2.RowSource = "feuil2!ecg"
' Activer le premier enregistrement de chaque liste déroulante
Me.ComboBox1.ListIndex = 0
Me.ComboBox2.ListIndex = 0
' Définir la date affichée par défaut dans chaque contrôle DTPicker
Me.DTPicker1.Value = Now

End Sub

tant que je travaillais tout fonctionnait bien, j'ai fermé le fichier, j'ai ouvert le fichier pour vérifier que tout allait bien et j'ai une erreur 1004 sur la ligne :
ActiveWorkbook.Names.Add Name:="noms", RefersToR1C1:= _
Sheets("feuil2").Range("A1", Range("A1").End(xlDown)).

pourquoi ?, je joins le fichier

 

[f69815]

Re : liste dans combobox

bonjour,
tout d'abord je tiens à m'excuser d'avoir oublier la formule de politesse de mon 1er post.

j'ai trouvé :
j'avais oublié de mettre cette ligne :
Worksheets("Feuil2").Select, puisque c'est à partir de cette feuille que je crée ma liste.

tout fonctionne.

merci au forum pour l'aide qu'il apporte.

à bientôt