OVH Cloud OVH Cloud

Selectionner un point

2 réponses
Avatar
Michel NOLF
Bonjour tout le monde
J'ai placé dans un userform un objet WCchart alimenté par une Listbox
A partir de cette ListBox je peux selectionner un point de la série pour le
mettre en valeur par:

Private Sub ListBox_Commune_Click()
n = ListBox_Commune.ListIndex
With UserForm2.ChartSpace1.Charts(0).SeriesCollection(0).Points(n)
.Interior.Color = RGB(255, 0, 0)
.Border.Color = RGB(255, 0, 0)
End With
End Sub

Inversement je voudrais en clicquant sur mon graphique selectionner un
point,recupérer son No d'item et ainsi remonter à l'item de ma ListBox.
Est-ce possible et comment?
Je ne sais pas si je peux mettre mon fichier sur cijoint.com: il fait 9.42Mo
D'avance merci à tous
Michel

2 réponses

Avatar
anonymousA
bonjour,

la réponse c'est qu'à priori tu ne peux pas end ehors de bricolage utilisant
les evenements du controle graphique et un combobox annexe .
Mais cela en vaut-il la peine ?

A+



Bonjour tout le monde
J'ai placé dans un userform un objet WCchart alimenté par une Listbox
A partir de cette ListBox je peux selectionner un point de la série pour le
mettre en valeur par:

Private Sub ListBox_Commune_Click()
n = ListBox_Commune.ListIndex
With UserForm2.ChartSpace1.Charts(0).SeriesCollection(0).Points(n)
.Interior.Color = RGB(255, 0, 0)
.Border.Color = RGB(255, 0, 0)
End With
End Sub

Inversement je voudrais en clicquant sur mon graphique selectionner un
point,recupérer son No d'item et ainsi remonter à l'item de ma ListBox.
Est-ce possible et comment?
Je ne sais pas si je peux mettre mon fichier sur cijoint.com: il fait 9.42Mo
D'avance merci à tous
Michel





Avatar
Michel NOLF
Bonjour
Eh bien à mon avis oui naturellement!! Je suis en train d'essayer de
développer une appli Excel qui permette de retrouver sur une carte pour un
département traçée par les latitudes et longitudes des communes( Graphique
nuage de points) la position d'une commune obtenue à partir de son nom
provenant d'une listbox. Cela ca marche(fragment de code que j'ai joint).
Maintenant je voudrais faire la manip inverse : en clicquant sur un pont de
mon graphe, retrouver le numero du point dans la collection des points et
ainsi à l'index dans la listbox et donc le nom de la commune. J'ai
l'impression que je m'en tirerais mieux si mon graphe etait en worksheet,
mais j'essaie de toute les manières avant d'abandonner mon userform.
Pour l'instant sur l'evenement Chart_Click je ne peux recuperer que la
position xy de la souris en unite tweaks je suppose. De là à retrouver le No
du point.....!!!
Merci d'avance pour tous les bidouillages,bricolages auquel tu pourrais
penser
"anonymousA" a écrit dans le message
de news:
bonjour,

la réponse c'est qu'à priori tu ne peux pas end ehors de bricolage
utilisant
les evenements du controle graphique et un combobox annexe .
Mais cela en vaut-il la peine ?

A+



Bonjour tout le monde
J'ai placé dans un userform un objet WCchart alimenté par une Listbox
A partir de cette ListBox je peux selectionner un point de la série pour
le
mettre en valeur par:

Private Sub ListBox_Commune_Click()
n = ListBox_Commune.ListIndex
With UserForm2.ChartSpace1.Charts(0).SeriesCollection(0).Points(n)
.Interior.Color = RGB(255, 0, 0)
.Border.Color = RGB(255, 0, 0)
End With
End Sub

Inversement je voudrais en clicquant sur mon graphique selectionner un
point,recupérer son No d'item et ainsi remonter à l'item de ma ListBox.
Est-ce possible et comment?
Je ne sais pas si je peux mettre mon fichier sur cijoint.com: il fait
9.42Mo
D'avance merci à tous
Michel