Bonjour,

Je dispose d'une macro qui me créer un graphique en fonction d'une base de données mais le problème et que par la suite je masque mes cellules et par défaut lors de la création du graphique la case " Afficher les lignes masquées" n'est pas cochés Comment écrire dans le code vba afin que la case soit cocher lors de sa création ?

Je voudrais savoir comment mettre mon graphique transparent c'est à dire sans fond de couleur ?

Voici mon code

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
Dim Grf As ChartObject
Dim Sh As Worksheet
 
Set Sh = Sheets("ASP")
'On supprime tous les graphiques
For Each Grf In Sh.ChartObjects
    Grf.Delete
Next Grf
'On crée notre graphique
Set Grf = Sh.ChartObjects.Add(140, 10, 500, 300)
With Grf.Chart
    .ChartType = xlLineMarkers
    .SeriesCollection.NewSeries
    With .SeriesCollection(1)
        .Values = Sh.Range("D2:D" & [A65536].End(xlUp).Row)
        .XValues = Sh.Range("B2:B" & [A65536].End(xlUp).Row)
    End With
End With
Set Grf = Nothing
Set Sh = Nothing
Cordialement