Hello tout le monde,

J'ai un petit souci avec mon code VBA. Je vous explique j'affiche sur mon graphique la moyenne et le volume d'emails par mois. Chaque fois le graphique va s'incrémenter de 1 ou plus. Je voudrais rendre dynamique mon graphique. Pour cela je veux lui affecter directement une macro a mon graphique et lui envoyer la nouvelle formule ( avec le nouveau range) mais VBA me dit 'incompatibilité de type' je en comprends pas........

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
Sub Macro14()
'
' Macro14 Macro
'
 
Dim S2et3Emailsenvoyés As Worksheets
 
 
  Worksheets("S2et3Emailsenvoyes").Activate
 
    ActiveSheet.ChartObjects("Graphique 4").Activate
 
 
 
                                Set graphePB = ActiveSheet.ChartObjects("Graphique 4").Activate
                                With graphePB
                                    .FullSeriesCollection(16).Select
                                    Selection.Formula = _
        "=SERIES(S2et3Emailsenvoyes!R16C1,S2et3Emailsenvoyes!R1C2:R1C46,S2et3Emailsenvoyes!R16C2:R16C46,44)"
              End With
 
End Sub


merci pour vos réponses Ps : je comrpends aps non plus ce que représente le chiffre 44 a la fin de la formule?!?!

Vanessa