Discussion :

[ESVBA]

bonsoir à tous,

je souhaite remplir une zone de liste à deux colonnes en utilisant la propriété ".List" de la ZdL et le nom des colonnes format XL2007 ex : "TabAdresse[[CP]]" et "TabAdresse[[Ville]]"

Cela fonctionne bien pour une colonne :

Code :

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

1
2
TabArray = Range("TabAdresse[[CP]]")
ZdL.List = TabArray

Mais impossible de spécifier correctement la seconde colonne. La virgule entre les adresses dans "Range" ne fonctionne pas.

Quelle est la synthaxe ?

Merci.

ESVBA

[Didier Gonard]

Bonjour,

Pas sûr de comprendre, mais si tu veux remplir une variable tableau avec une référence directe à un range, il va te créer un tableau à 2 dimensions automatiquement.

Mais pour ce faire, il faut que tu lui fournisses un range "continu" et non pas une Union de range.

Si tes colonnes sont accolées, tu lui donne direct les 2 extrémités, si elles ne sont pas accolées, tu ne pourra pas faire une assignation directe.

A tester, le plus rapide peut être de créer 2 variables tableaux distinctes et de créer une variable tableau finale en réunissant les deux... ou de copier la feuille, de supprimer les colonnes non voulues et d'affecter une variable tableau avec le reste.

Reste selon le contexte et la volonté d'optimisation de construire la variable tableau avec une boucle.

vois ici si besoin : http://didier-gonard.developpez.com/...vba/#LVIII-B-2

cordialement,

Didier

[ESVBA]

que tu lui fournisses un range "continu" et [...]
Si tes colonnes sont accolées, tu lui donne direct les 2 extrémités

justement mon problème est la manière de lui écrire un range continu avec les appelations utilisées avec les références tableaux Excel 2007 (pas de problème d'ajout, pas de plage nommée supplémentaire, pas de référence, pas de gestion de cellules et d'emplacement, l'idéal).

Je souhaitais une affectation directe sans passer par une boucle pour un code rapide, simple et propre (un peu à la Access).
Puisqu'il y a des nouveautés dans Excel 2007...
Nouveautés mais limitées à l'usage !

Enfin s'il y a une solution...

ESVBA

[mercatog]

ne piste pour la lecture ici

[ESVBA]

Merci à toi Ormonth mais on reste dans la déclaration de plages nommées et ses inconvénients.

Je ne comprends pas comment mettre deux colonnes (contigües) d'un tableau excel 2007 dans une ListBox à deux colonnes (placée sur une UserForm).

C'est un problème d'affectation à la "ListBox".

J'ai résolu le problème par le code ci-dessous mais j'espérais qu'il y ait un moyen sans boucle et simplement en déclarant seulement le tableau (entêtes fixes).

Code :

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

1
2
3
4
5
6
7
8
 
Cpte = 0
For Each v in Range("TabVille").
     LstAJout.Additem
     LstAjout.List(Cpte, 0) = v.Offset(0,-1).Value
     LstAjout.List(Cpte, 1) = v.Value
     Cpte =Cpte +1
Next v

Si quelqu'un connait la solution... un message MP serait le bien venu.

Ca ressemble à un manque dans Excel 2007 et +.


ESVBA

[Didier Gonard]

je ne comprends pas

ce que tu veux, c'est alimenter une listbox avec 2 colonnes contiguës

Code :

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

1
2
3
Private Sub UserForm_Initialize()
ListBox1.RowSource = "A2:B998"
End Sub

fonctionne sans souci normalement ?

cordialement,

Didier