Syntaxe Data source graphique

Maxxikilla Messages postés 40 Statut Membre -  
Maxxikilla Messages postés 40 Statut Membre -
Bonjour,

Je veux réaliser un graphique à plage de données variable.

Mon problème et de savoir quelle est la bonne syntaxe:

J'ai essayé ceci, mais sans succès

 ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlLine
    
     With ActiveChart
        
        .Parent.Name = "Tabtab"
      ' solution 1     
.SeriesCollection.Values = Sheets("CA Mensuel").Range(Sheets("CA Mensuel").Cells(80, nbc4 - 12), Sheets("CA Mensuel").Cells(81, nbc4))
    End With
    
    Set champDonnees = (Cells(80, nbc4 - 12), Cells(81, nbc4))
    
'solution 2
    ActiveChart.SetSourceData Source:=Range("'CA Mensuel'!range(Cells(80, nbc4 - 12), Cells(81, nbc4))")

' solution 3
    ActiveChart.SetSourceData Source:=Sheets("CA Mensuel").Range(champDonnees), PlotBy:=xlRows


Aucun de ces essais ne fontionne. Merci pour votre aide

A voir également:

2 réponses

f894009 Messages postés 17416 Date d'inscription   Statut Membre Dernière intervention   1 715
 
Bonjour,

     With ActiveChart
        .Parent.Name = "Tabtab"
        'solution 2
        .SetSourceData Source:=Sheets("CA Mensuel").Range(Cells(80, nbc4 - 12), Cells(81, nbc4))
        ' ou
        ' solution 3
        Set champDonnees = Sheets("CA Mensuel").Range(Cells(80, nbc4 - 12), Cells(81, nbc4))
        .SetSourceData Source:=champDonnees, PlotBy:=xlRows
    End With


A+
1
Maxxikilla Messages postés 40 Statut Membre
 
Merci, Ca fonctionne du tonnerre !!!!!
0