Combobox Excel

[joe]

Bonjours,
je n'arrive pas a remplir une combobox dans excel 2003 avec la fonction RowSource car cette dernier n'existe pas.
Que dois je faire pour obtenir cette fonciton.
Merci et bonne continuation...

 

[wilfried]

Salut joe

Dans ta macro tu peu essaye :

dim m_tab as variant

m_tab=array(infodetacombobox)

for i=0 to nbinfocombobox-1
combobox1.additem m_tab(i)
next

si cela est toujours possible sous excel 2003.

Tu peu également dimentionner un variable tableau si tu ne connait pas le nombre d'info à mettre dans ta combobox ex:
dim m_tab(0 to 65535) as variant
dim m_cellule as range
dim i as integer
'si tes infos sont bien dans des cellules

range("A1").select
activecell.end(xldown).select
range("A1",activecell).select
i=0
for each m_cellule in selection
m_tab(i)=activecell.value
i=i+1
next
redim m_tab(0 to i-1)
for i=0 to i-1
combobox1.additem m_tab(i)
next

Voila

Wilfried

 

[joe]

Merci bien...