Alimentation d'une combobox et erreur 70

Bonjour à tous

je rencontre des soucis avec l'alimentation de mes combobox.

En effet, bien qu'ayant réussi à faire apparaitre les items de ma liste déroulante, un message d'erreur apparait lorsque je teste mes macros.

comme macro, j'ai saisi entre autre ComboBox1.List = Worksheets("Listes").Range("Participants").Value

J'ai alors un message d'erreur qui apparait "erreur 70: Permission refusée".

Pourquoi?

Comment puis-je m'en débarasser?

Puis-je me contenter de compléter les propriétés de la combobox et suopprimer la macro?

En PJ, un fichier édulcoré car cel concerne mon travail et débutante , j'ai peur d'être virée

Dans l'attente et cordialement, Siga

Bonsoir siga2fadial, le forum,

A tester....

Private Sub UserForm1_Initialize()

Set Sh = Sheets("Listes")

   With ComboBox1
      .Clear
      .List = Sh.Range("D4:D" & Sh.Range("D" & Rows.Count).End(xlUp).Row).Value
   End With

   With ComboBox3
      .Clear
      .List = Sh.Range("F4:F" & Sh.Range("F" & Rows.Count).End(xlUp).Row).Value
   End With

   With ComboBox9
      .Clear
      .List = Sh.Range("B4:B" & Sh.Range("B" & Rows.Count).End(xlUp).Row).Value
   End With

End Sub

Cordialement,

Re,

Ton fichier corrigé:

Private Sub UserForm1_Initialize()

ComboBox1.List = Worksheets("Listes").Range("Tableau7[Participants]").Value
ComboBox3.List = Worksheets("Listes").Range("Tableau6[t_équ]").Value
ComboBox9.List = Worksheets("Listes").Range("Tableau8[Fréquences]").Value

End Sub

Bonne soirée

Bonjour

si tu donne des nom aux combobox ses plus dur affaire évoluer

voila un modèle en vba

A+

Maurice

Je vous remercie beaucoup . Je vais essayer demain et je reviens vers vous .

Bonjour à tous,

cela fonctionnait assez bien j'ai retenu la macro avec Set Sh=Sheets ("Listes")

pas de souci pour copier la formule dans le 1er formulaire de mon fichier de travail..Quel soulagement

puis j'ai mis ma macro dans le second formulaire en repérant bien mes combobox et affectant à chacune la bonne source.

Un nouveau bug survient:

"Erreur de compilation

instruction incorrecte à l'exterieur d'une procédure"

Il me semble que cela vient du fait que certaines de mes combobox ne sont pas dans déclarées dans la page "général " avec mes "déclarations" mais semblent autonomes.

Ainsi quand je vais dans propriétés, elles n'apparaissent pas à la suite de la liste mais dans une seconde liste autrement dit

toutes mes combobox ne semble pas être répertoriées au bon endroit

J'espère être claire...

avez-vous une idée pour pallier cet écueil?

Petite précision supplémentaire certaines de mes combobox sont à l'intérieur de "frame" cad de cadres , cela at-il une importance?

Merci d'avance

Encore merci à Xorsankukaï , tu m'as sauvé

J'ai même compris d'où vener mon second problème

Je n'avais pas déclaré les userform

d'où le second message d'erreur.

Pour info, (on ne sait jamais ...) j'ai cliquer dans mon userform et il m'est apparu la macro userform_click()

puis j'ai appelé _Initialize dans mon éditeur dans le menu déroulant le plus à droite et il m'est apparu la macro userform_Initialize()

J'ai collé la réponse de Xorkukaï et j'ai pu soufflé après avoir complété mes 7 formulaires.

Cool ce forum