Grafici in ciclo for

Hai un problema con Excel?

Nuova discussione

Grafici in ciclo for
di Buccio (utente non iscritto) data: 01/05/2011
Ciao a tutti, ho un problema con un macro. io ho bisogno di creare una serie di grafici, e volevo fare tale operazione con un ciclo for. il problema è che non riesco a far modificare l'intervallo di dati da selezionare a ogni ciclo. il programma di dice errore di sintassi, solo che non riesco a trovarlo.
vi posto il codice.
grazie mille in anticipo!

For i = 896 To 1000
k = 96 + i
    ActiveSheet.Shapes.AddChart.Select
    ActiveChart.ChartType = xlXYScatterSmoothNoMarkers
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(1).Name = "=""puissance réelle"""
    ActiveChart.SeriesCollection(1).XValues = "=Range("B" & i & ":B" & k).Select"
    ActiveChart.SeriesCollection(1).Values = "=Range(Cells(i, 3), Cells(i + 96, 3)).Select"
    ActiveChart.SeriesCollection.NewSeries
    ActiveChart.SeriesCollection(2).Name = "=""puissance théorique"""
    ActiveChart.SeriesCollection(2).XValues = "='PROD4'!Range(cells(i,2),cells(i+96),2).select"
    ActiveChart.SeriesCollection(2).Values = "='PROD4'!Range(cells(i,8),cells(i+96),8).select"

Next i

Vuoi Approfondire?