Nuages de points et intervalle de confiance

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 4 Octobre 2007

• #2

Re : Nuages de points et intervalle de confiance

Bonjour,

Sub ModifCouleur()
ActiveSheet.ChartObjects(1).Activate
For i = 1 To ActiveChart.SeriesCollection(1).Points.Count
If Application.Index(ActiveChart.SeriesCollection(1).Values, i) > 150 Then
ActiveChart.SeriesCollection(1).Points(i).MarkerBackgroundColorIndex = 4
Else
ActiveChart.SeriesCollection(1).Points(i).MarkerBackgroundColorIndex = 3
End If
Next i
End Sub

JB
Formation Excel VBA JB

 

Vote positif 0 Vote négatif

M

manulemalin13000

XLDnaute Occasionnel

• 4 Octobre 2007

• #3

Re : Nuages de points et intervalle de confiance

Merci c'est super sympa la réponse rapide
Mais je ne sais absolument pas ou introduire ce code !!!

 

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 4 Octobre 2007

• #4

Re : Nuages de points et intervalle de confiance

Hyperlien sur clic point

Private Sub Chart_Select(ByVal ElementID As Long, ByVal Arg1 As Long, ByVal Arg2 As Long)
If ElementID = 3 And Arg2 > 0 Then
x = Application.Index(ActiveChart.SeriesCollection(1).XValues, Arg2)
y = Application.Index(ActiveChart.SeriesCollection(1).Values, Arg2)
'Sheets(2).Shapes("monshape").TextFrame.Characters.Text = "Point: " & Arg2 & " x=" & x & " y=" & y
Sheets(1).Activate
Cells(Arg2 + 1, 1).Select
End If
End Sub


JB
Formation Excel VBA JB

 

Pièces jointes

• GrapheEvent.xls

  28.5 KB · Affichages: 133

Vote positif 0 Vote négatif

BOISGONTIER

XLDnaute Barbatruc

Repose en paix

• 4 Octobre 2007

• #5

Re : Nuages de points et intervalle de confiance

Le code s'écrit dans un module
-Alt+F11
-Insertion/module

JB

 

Pièces jointes

• GrapheNuage12.xls

  32.5 KB · Affichages: 109

Vote positif 0 Vote négatif

M

manulemalin13000

XLDnaute Occasionnel

• 5 Octobre 2007

• #6

Re : Nuages de points et intervalle de confiance

Merci
Plusieurs questions ...

1:
Comment fixe-t-on le seuil ??

2: le seuil est-ce 150 dans le code ???

3: si oui, pourquoi quand je modifie le 150 pour 250 par exemple ca change pas les couleurs ???

4: Hyperlien sur clic point ??? c'est quoi et ca sert a quoi ce code supplémentaire donné par BOISGONTIER

Merci a toi pour tes réponses mais je suis tres moyen en excel et j'en ai grand besoin pour mon boulot.

 

Vote positif 0 Vote négatif

M

manulemalin13000

XLDnaute Occasionnel

• 6 Octobre 2007

• #7

Re : Nuages de points et intervalle de confiance

De plus

Je voudrais que par exemple

si superieur a 500 Les points sortent de couleur X
Si inferieur a 200 Les point apparaissent de couleur y
Si entre les deux valeurs... couleur z

Merci

 

Vote positif 0 Vote négatif

M

manulemalin13000

XLDnaute Occasionnel

• 18 Octobre 2007

• #8

Re : Nuages de points et intervalle de confiance

Personne ???

 

Vote positif 0 Vote négatif

CB60

XLDnaute Barbatruc

• 18 Octobre 2007

• #9

Re : Nuages de points et intervalle de confiance

Bonsoir
La base de la macro est aussi de Jboisgontier, regarde si cela te convient

 

Pièces jointes

• GrapheNuage.zip

  11.5 KB · Affichages: 92

Vote positif 0 Vote négatif