Merci, j'avais un trou de mémoire.
Par contre pour les graphiques je fais comment ??
With ActiveChart.SeriesCollection.NewSeries
.Name = "Courbe garantie"
.XValues = "=Feuil2!$K$2:$K$26"
.Values = "=Feuil2!$L$2:$L$26"
.ChartType = xlXYScatterSmooth
.Format.Line.ForeColor.RGB = RGB(39, 7, 177)
Pour XValue je fais comment ?