Set thecell1 = Range("F10")
Set thecell2 = Range("F22")
Do While thecell1.Value = "Pas d'isolation suffisante"
Set thecell1 = thecell1.Offset(1, 0)
Loop
If Range("F10").End(xlDown).Value = "impossible" Then
Set thecell2 = Cells(Feuil3.Range("F1:F100").Find(What:="impossible", SearchOrder:=xlByRows, SearchDirection:=xlNext).Row - 1, 5)
Else
Set thecell2 = Range("F10").End(xlDown)
End If
Graph2.SeriesCollection(2).XValues = Feuil3.Range(thecell1.Offset(0, -2), thecell2.Offset(0, -2))
Graph2.SeriesCollection(2).Values = Feuil3.Range(thecell1, thecell2)
Bon j'avais fait un bout de code pour un pote qu'avait un truc comme çà à faire. En fait il suffit de redéfinir la plage de valeur de la série et de redéfinir la plage des X. Inspires toi de ce code si tu me file plus de détails je veux bien te faire le code, mais bon c'est en forgeant qu'on devient forgeron !