[VBA-E]ComboBox + RowSource ne concerne que les lignes ?

Version imprimable

10/04/2006, 11h41
ouskel'n'or

[VBA-E]ComboBox + RowSource ne concerne que les lignes ?
Je fais ça (VBA97)
Code:

1 2 3 Dim Plage Plage = "A1:" & Cells(1, Cells(1, 1).End(xlToRight).Column).Address(False, False) TypeRecherche.RowSource = Plage
La plage est bien désignée : "A1:N1"
Or la combo n'affiche que la cellule A1.
Est-ce que RowSource, comme son nom l'indique, ne va chercher que dans les lignes ?
Existe-t-il une syntaxe que j'aurais oubliée ? :wink:

Merci de votre réponse

A+
10/04/2006, 12h04
Megaxel

Au risque de passer pour un blaireau (sans vexer les blaireaux qui trainent sur ce site, ouvert à tout type d'animaux, à poils, à écailles et à plumes)... C'est quoi, "TYpeRecherche" ?
10/04/2006, 12h35
AlainTech

Juste pour apporter de l'eau au moulin:

Code:

TypeRecherche.List = Plage

Ca marche pas???

:arrow: Je pars me lisser la fourure.
10/04/2006, 13h09
AlainTech

Je pense avoir vu où est ton blème.

La combo va afficher "comme" sur la feuille.

Les colonnes en colonnes et les lignes...

Si tu lui dis "une ligne sur 14 colonnes" et qu'il n'y a qu'une colonne dans la combo...

Tu me sens venir?
10/04/2006, 13h26
ouskel'n'or

Ok, Alain, j'ai compris. Je vais voir avec trois colonnes et je réponds.

Citation:

TypeRecherche.List = Plage

n'avait pas "l'air" de fonctionner mais je vais tout de même vérifier... P't'être bien que j'ai mis TypeRecherche.List = Range(Plage)... :cry: (Je ne suis pas au boulot, je vérifie dans un moment) mais je doute.

Merci de ta réponse.

A+

PS - Hello Mega, je te trouve bien silencieux, je t'ai froissé ? :lefou:
10/04/2006, 13h41
AlainTech

Citation:

Envoyé par AlainTech

Juste pour apporter de l'eau au moulin:

Code:

TypeRecherche.List = Plage

Ca marche pas???

:arrow: Je pars me lisser la fourure.

Je viens de tester et je confirme:

Ca marche!

Et hop, je m'ébroue un coup.
10/04/2006, 14h05
jmfmarques

Attends !
Moi je n'ai pas de VBA moderne, mais ...
Quid d'une boucle sur tes cellules pour alimenter celles de la combo ? (c'est idiot ?) :?:
10/04/2006, 14h13
AlainTech

Citation:

Envoyé par ouskel'n'or

Hélas, TypeRecherche.List = Plage ne fonctionne pas (j't'ai dit.. VBA97...)

Mon essai était fait sur Excel 97 aussi!

Sauf que j'ai assigné le range à la liste sans passer par une variable et que je n'ai pas oublié de mentionner la feuille contenant le range.
10/04/2006, 14h15
AlainTech

Je me dis donc que pour récupérer un range dans une variable, vu qu'un range est un objet, il faut probalement faire un

Code:

Set Plage = TonRange
10/04/2006, 14h16
ouskel'n'or
Citation:

Envoyé par jmf

Quid d'une boucle sur tes cellules pour alimenter celles de la combo ? (c'est idiot ?)

C'est ce que j'ai fait mais comme j'ai l'habitude d'utiliser list avec les listbox, je ne vois pas pourquoi je n'ai pas la même chose pour les combos :evil:
(NB - J'ai indiqué l'utilisation de AddItem en bas de mon deuxième message :wink: )

Alain, tu avais raison, j'ai mes 5 entêtes de colonnes si je fais ça :cry:
Code:

1 2 3 4 Plage = "A1:" & Cells(1, Cells(1, 1).End(xlToRight).Column).Address(False, False) Set Combo = GrilleDeSaisie.Controls("DemandeRecherche") Combo.ColumnCount = 5 Combo.RowSource = Plage
J'en suis là et je suis très faché :evil:

A+
10/04/2006, 14h26
Megaxel

Bon, je n'ai rien à ajouter à votre discussion, mais je voulais juste rassurer Ousk : pas de problème, je ne suis pas vexé...
:D
10/04/2006, 14h29
AlainTech

Ben, j'avais qu'une ligne, moi...

Code:

ComboBox1.List = Sheets("Sheet1").Range([A1], [D10])