MSChart1.AllowSelections = False MSChart1.ChartData = donnees MSChart1.Repaint = True MSChart1.SeriesType =VtChSeriesTypeDefault MSChart1.Refresh