remplir un combobox dans une nouvelle page

[francois91]

Bonjours,
Mon probleme est surement tres simple, je n'arrive plus a remplire mes combobox dans VBA depuis que j ai changé le nom de mes pages.
ma page s'appelle à présent "Page données" et je veux écrire les chose suivantes dans un userform.

code = code & " Controls(""Combobox"" & i).RowSource = ""Page_données!B2:B8""" & vbCr

Autant toutes les autre commandes fonction autant cette commande ne fontionne pas
j ai essayé

code = code & " Controls(""Combobox"" & i).RowSource = ""Page données!B2:B8""" & vbCr
mais sans résultats

Si quelqu'un pouvait m'aider

 

[skoobi]

Re : remplir un combobox dans une nouvelle page

Bonjour,

il y a trop de guillemets dans le code:

code = code & Controls("Combobox" & i).RowSource = "Page_données!B2:B8" & vbCr

 

[francois91]

Re : remplir un combobox dans une nouvelle page

Je sais pas pourquoi ca marche pas!!!!
pourtant il est bien écrit:
Controls("ComboBox" & i).RowSource = "Page_données!B2:B8"
dans mon userform mais le message d'erreur 330 dit "impossible de définir la propriété rowsource. valeur de propriété non valide

 

[skoobi]

Re : remplir un combobox dans une nouvelle page

Re bonjour,

essaye en ajoutant des parenthèses comme ceci:

 code = code & [B]([/B]Controls("Combobox" & i).RowSource = "[COLOR=Red]Page_données[/COLOR]!B2:B8"[B])[/B] & vbCr

La variable code est de quel type?

 

[francois91]

Re : remplir un combobox dans une nouvelle page

Bonjour,
j suis pas sur de savoir de savoir c quoi la variable code mais dans mon combobox c'est une liste de noms que je veux mettre.
D'ailleur cette commande marchait trés bien avant que je change le nom de ma page.
sinon je crée mes combobox juste au dessu si tu connaissait une maniére de créer la liste en mm temps que je définis leurs caratéritiques

 

[skoobi]

Re : remplir un combobox dans une nouvelle page

Re bonjour,

sinon je crée mes combobox juste au dessu

Je dois changer de lunette....

De toute façon, on tourne en rond, ce serait bien que tu envoies un bout de fichier.

 

[Dull]

Re : remplir un combobox dans une nouvelle page

Salut Francois, Skoobi 🙂, le Forum

Je ne suis pas sur non plus mais essaye d'enlever l'espace juste avant Controls regardes le 😀

code = code & "😀 Controls(""Combobox"" & i).RowSource = ""Page_données!B2:B8""" & vbCr

Skoobi les doubles Guillemets sont nécessaires car apparement c'est un code qui écrit une ligne de code dans un module si j'ai bien compris

Bonne Journée

 

[francois91]

Re : remplir un combobox dans une nouvelle page

Merci pour votre aide à tous les deux mais ca marche pas non plus j'ai juste modifié le titre de ma page en enlevant l'espace, du coup ma page s'appelle "Pagedonnées"... (ca donne un peu moins bien)
Faut croire que finalement c t " l'espace " qui n'acceptait pas d'être remplacé par " _ " 😕

 

[bqtr]

Re : remplir un combobox dans une nouvelle page

Bonjour tous le monde,

Si tu as un espace dans le nom de la feuille, il faut qu'il soit encadré par une apostrophe dans les formules.
Ce qui pourrait donner ceci, à tester

code = code & " Controls(""Combobox"" & i).RowSource = ""[B][COLOR=Blue][SIZE=3]'[/SIZE][/COLOR][/B][COLOR=Red]Page données[/COLOR][COLOR=Blue][SIZE=3][B]'[/B][/SIZE][/COLOR]!B2:B8""" & vbCr

A+

 

[francois91]

Re : remplir un combobox dans une nouvelle page

Youpi!!!!
Ca fonctionne merci à tous,
en effet la solution des 'nom de la feuille' pour une feuille contenant un espace dans son titre fonctionne trés bien avec le rowsource!