histogramme cliquable

[julie]

Salut à tous, je voulais vous demander si il est possible de pouvoir affecter une macro à un bâton d'un histogramme sur un graph EXCEL.
C'est à dire je veux que si je clic sur une valeur ça me renvoie sur une autre page.

Merci d'avance
Bisous à tous

 

[Arnaud]

salut,

apparement selon l'aide c faisable mais g pas réussit à l'utiliser mais bon je te met l'exemple de l'aide, tu y arriveras pe être.

"
Cet exemple montre comment ne pas tenir compte du double-clic par défaut pour le plancher du graphique.

Private Sub Chart_BeforeDoubleClick(ByVal ElementID As Long, _
ByVal Arg1 As Long, ByVal Arg2 As Long, Cancel As Boolean)

If ElementID = xlFloor Then
Cancel = True
MsgBox "Chart formatting for this item is restricted."
End If

End Sub

"

 

[julie]

merci pour ton aide mais j'ai du mal à voir comment ça marche?
😉

 

[Arnaud]

g eu du mal mais g réussi a faire un bout de truc.
a adapter.

 

[Arnaud]

a et j'ai oublier de mettre une ligne pour que la fenêtre de propriété qui s'ouvre normalement ne s'ouvre pas. cela donne ça :

Private Sub cht_BeforeDoubleClick(ByVal ElementID As Long, _
ByVal Arg1 As Long, ByVal Arg2 As Long, Cancel As Boolean)
Select Case ElementID
Case xlSeries
MsgBox "click sur la barre 🙂" 'donc écris ton code ici
Cancel = True
End Select
End Sub

 

[julie]

merci de ton aide. Mais je suis pas trop callée en POO pour adapter le truc je vais galérer à mon avis
bises

 

[Sebb]

Salut !
Si tu n es pas trop callée commence par utiliser les macros automatiques !

Outil macro nouvelle macro
tu executes ce que tu veux faire puis tu appuies sur Stop

ensuite tu colles le code (fait tout seul comme par magie) à la place du Msgbox "click sur la barre" que t'as donné Arnaud

Donnes nous de tes nouvelles après ^^

 

[Arnaud]

ben la y a pu grand chose a faire. faudrais juste savoir ce que tu veux que ça fasse derrière le double click.

envoi une pièce jointe avec un exemple mais j'verrai ça ce soir 😉.

 

[julie]

J'ai mis le code dans VBA mais il me dit 'Impossible de lire la propriété chartObject de la classe worksheet'....
Je comprend pas!
;(

 

[julie]

C'est bon ça marche mais je veux pouvoir cliquer sur sur chaque barre et que chacune d'entre elle éxecute une macro différente

Merci

 

[Arnaud]

g pas trop le tps de tester donc a voir....

Private Sub cht_BeforeDoubleClick(ByVal ElementID As Long, _
ByVal Arg1 As Long, ByVal Arg2 As Long, Cancel As Boolean)
Select Case ElementID
Case xlSeries
MsgBox "click sur la barre 🙂"
Select Case Arg1
Case 1: MsgBox "Barre1"
Case 2: MsgBox "Barre2"
Case 3: MsgBox "Barre3"
Case 4: MsgBox "Barre4"
etc.........
End Select
End Select
End Sub