Discussion :

[BOU59000]

Bonjour à toutes et à tous,

Je viens à vous avec un problème de combobox !
J’aimerai alimenter ma liste verticale combobox avec des données provenant d’une seule et même ligne Excel (donc plusieurs cases/ plusieurs colonnes).
J’ai utilisé la transposition de ce fait… mais il y a un bug quelque part et je suis un peu perdu…
Voila la ligne en question :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

Me.ComboBox3.List = Application.Transpose((Sheets("Centre_Gestion").Range([W & compteur], [Y & compteur].End(xlToLeft))))

Les données sont en case/ colonne W X et Y.
La ligne varie suivant sélection d’où mon compteur.

Merci d’avance pour votre aide 

[patricktoulon]

bonsoir
je n'en suis pas sur mais il me semble que tu utilise 3 colonnes si je ne me trompe pas

pour les transposer je suis pas sur que l'on puisse le faire avec la fonction transpose mais encore une fois je n'en suis pas sur

bien que dans ton range il y a un truc qui me dérange

revois la façon déjà pour déterminer ta plage

au plaisir

[BOU59000]

Bonjour,

Je découvre la transposition. Je m’arrangeais toujours pour compléter ma combobox avec des informations provenant d’une seule et même colonne.
Cette fois ci.. Je ne peux pas. Les informations viennent d’un tableau déjà en place, non modifiable car il alimente déjà de nombreux systèmes. Je peux seulement ajouter des colonnes. D’où ma recherche pour une transposition.
J’ai découvert sur le net un cas similaire où une réponse avait été apportée. Elle est de ce type :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Me.ComboBox3.List = Application.Transpose(Range([W5], [IV5].End(xlToLeft)))

La première donnée apporte la colonne de départ, la seconde la dernière colonne complétée.
Le Hic, la combobox peut être appelée depuis toutes les pages du classeur et comme on ne précise pas sur quelle page prendre les données.. On retrouvait des choses un peu folklo..
A partir de cette ligne de base, je devais donc rajouter la page d’où provenaient les données. En l’occurrence "Centre_Gestion".
Après cela, il me fallait intégrer un compteur, en effet la ligne d’où proviennent les données sur cette page "Centre_Gestion" varie en fonction d’une première combobox. (Il y a sans doute d’autre façon de procéder, je suis au niveau compteur ! Au niveau Matrix, j’aurai sans doute fait autrement !)
J’ai donc effectué de nombreuses tentatives en modifiant à volonté cette ligne. La dernière tentative a donné cela

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

 Me.ComboBox3.List = Application.Transpose((Sheets("Centre_Gestion").Range([W & compteur], [Y & compteur].End(xlToLeft))))

Vous connaissez toute l’histoire !

[BOU59000]

Je suis parti sur un tableau vba qui alimente ma combobox.
Mon soucis est réglé.

Je laisse ouvert le topic pour la transposition car j'aimerai bien en apprendre plus sur la transposition!

Merci d'avance pour vos réponses