Histogramme + courbe = graphique. Données sur tableau

Lumanitoc -  
 Lumanitoc -
Bonjour à tous,

Je cherche a faire un graphique combo sur VBA avec un histogramme et une courbe (loi normale cumulé) sur le même graphique.
Mes données sont dans des variables tableaux.
Je n'arrive pas a mettre les 2 sur le même graphique.
pour avoir l'un ou l'autre j'utilise le code suivant :


Charts.Add
ActiveChart.Location Where:=xlLocationAsObject, Name:="AXA"
With ActiveChart
.SeriesCollection(1).XValues = absi()
.SeriesCollection(1).Values = N()
.SeriesCollection(1).ChartType = xlLine
.SeriesCollection(1).Name = "loi normale"
End With


Comment ajouter l'histogramme ? J'ai tout essayé mais ça ne marche pas...
Merci d'avance pour votre aide :))
Bonne journée !

4 réponses

  1. Frenchie83 Messages postés 2254 Statut Membre 339
     
    Bonjour
    Un exemple: cliquer sur le bouton "Création graphique"
    https://www.cjoint.com/c/FDmnE6s0Tfk
    Cdlt
    0
    1. Lumanitoc
       
      Bonjour, et merci pour ton aide.

      Je n'arrive pas a lancer ton code, cela ne fonctionne pas.

      J'ai bien regardé ton code ceci dit, mais ça ne regle pas mon pb malheuresement.
      J'arrive bien a créé un graphique combo à partir de plage de données comme tu l'a fait, ce que je n'arrive pas a faire, c'est de le créer a partir de variable macro.
      Merci encor
      0
  2. Frenchie83 Messages postés 2254 Statut Membre 339
     
    RE
    Voici la correction
    https://www.cjoint.com/c/FDmodGEnrkk
    Quant aux variables, De quelles variables s'agit-il? de la base de données, autres choses?
    Il faudrait disposer d'un extrait du tableau pour obtenir la réponse souhaitée.
    cdlt
    0
  3. Lumanitoc
     
    Je sens que je ne suis pas loin de réussir !

    Mes variables sont des données :

    Pour mon histogramme :


    Dim cumulprc() As Double
    For i = 1 To np
    ReDim Preserve cumulprc(i)
    cumulprc(i) = cumul(i) / somfi
    Next i

    Cela dépend donc de la variable np, de format integer que j'ai préalablement défini.

    La variable N() est la fonction de répartition de la loi Normale :


    Dim N() As Double
    For i = 0 To 10 Step 0.05
    ReDim Preserve N(i * 20 + 1)
    N(i * 20 + 1) = Application.WorksheetFunction.Norm_Dist((i - 5), 0, 1, True)
    Next i


    Le code de la loi normal est un peu bizarre pr le moment j'en conviens.. Je le modifierai plus tard..

    Du coup, je n'ai pas la possibilité de séléctionner des plages de données, c'est ce qui me pose pb.. :/
    0
  4. Lumanitoc
     
    Personne n'a une idée..? Ca ne marche tjrs pas :'(
    0