Bonjour à tous,
j'ai un diagramme avec plusieurs séries et certaines d'entre elles ont la valeur 0.
ActiveSheet.ChartObjects("Diagramm 1 ").Activate
For i = 1 To ActiveChart.SeriesCollection.Count
If ActiveChart.SeriesCollection(i).Values = 0 Then ' erreur
MsgBox "zero"
end If
Next i
Qunad j'exécute ce code par exemple j'obtiens l'Erreur d'exécution 13: Incompatibilité de type sur la ligne
If ActiveChart.SeriesCollection(i).Values = 0 Then
J'ai aussi essayé avec les guillemets comme si dessous mais sans succès.
If ActiveChart.SeriesCollection(i).Values = "0" Then
Quelqu'un voit il ce qui ne va pas dans ce code?
Merci d'avance pour vos réponses.
Cdlt
Elo7