Sélection de plusieurs plages en excel avec VB6Résolu

Question

Coucou tout le monde

Voila g un petit pb de s&#233;lection de plages.
En fait g un grand tableau, et je doit faire un graphique par colonne, je dois dc pour chaque graphique, s&#233;lectionner ma premi&#232;re colonne ou sont les titres, et me deux&#232;me colonne, ou sont mes valeurs.
G d&#233;ja essayer de faire une union, et de faire un range tout simple, mais je n'y arrive pas. Voila le code que j'ai a pr&#233;sent et qui ne marche pas :

dim plage1 as range
dim plage2 as range
dim ma_plage as range

set plage1 = xlapp.range(cells(nbl, nbc)),(cells(lignetitre, nbc)
set plage2 = xlapp.range(cells(nbl, colonnetitre)),(cells(lignetitre,colonnetitre))
set ma_plage = union(range(plage1),(plage2))

L'erreur est direct d&#232;s la premi&#232;re ligne (attendu fin d'instruction).
Et je me suis aussi demand&#233;, comment est ce que le prog va savoir que c dans la feuille 1 qu'il faut aller chercher ces plages?

Sauriez vous quelle est l'erreur, ou auriez vous une autre solution pour s&#233;lectionner mes deux plages?

Merci bcp .

BIz

mrdep1978 · Accepted Answer

Il manque les xlapp devant les cells + erreur dans les parenth&#232;ses.set plage1 xlapp.range(cells(nbl, nbc)),(cells(lignetitre, nbc))> set plage1 = xlapp.range(xlapp.cells(nbl, nbc),xlapp.cells(lignetitre, nbc))
set plage2 = xlapp.range(xlapp.cells(nbl, colonnetitre), xlapp.cells(lignetitre,colonnetitre))
set ma_plage = union(plage1,plage2)

Pour &#234;tre sur d'&#234;tre dans la bonne feuille, le mieux est de faire la chose suivante (en plus &#231;a simplifie vachement la lecture du code) :
with xlapp.worksheets("Feuil1")

   set plage1 = .range(.cells(nbl, nbc), .cells(lignetitre, nbc))
   set plage2 = .range(.cells(nbl, colonnetitre), .cells(lignetitre,colonnetitre))
   set ma_plage = union(plage1,plage2)
end with

Si tu ne pr&#233;cises pas la feuille, il va chercher dans la feuille active du classeur.

ndsaerith · Answer

Oki &#231;a a l'air de marcher, mais g un pb, c que ensuite lorsque je veux faire mon graphique, il ne veut pas se servir de cette variable (ma_plage) comme source : 

set graph_timer = xlapp.activesheet.chartobject.add(10,10,500,250)
graph_timer.chart.setsourcedata xlapp.range(ma_plage)

Est ce que c comme &#231;a qu'il faut l'utiliser?

Merci bcp :-) :-)

BIz

ndsaerith · Answer

En fait g reussi, il fallait juste mettre 
graph_timer.chart.setsourcedata ma_plage

Voila, merci bcp bcp pour ton aide

BIz

Sélection de plusieurs plages en excel avec VB6

3 réponses

Discussions similaires