Witam! Mam makro, które mi obrabia dane z tabeli przestawnej i wyświetla je jako kolumny i wiersze (przyrost danych jest jako kolejny wiersz).
Pytanie brzmi. Jak napisać makro, które zmieni mi zakres danych wykresu kołowego na jeden wiersz w dół? Np.
Dziś jest tak:
Code:
ActiveChart.PlotArea.Select
ActiveChart.ChartArea.Select
ActiveChart.SeriesCollection(1).Values = _
"=Druk!$B$4;Druk!$E$4;Druk!$H$4;Druk!$K$4;Druk!$N$4;Druk!$Q$4;Druk!$T$4"
A jutro już powinno być tak:
Code:
ctiveChart.PlotArea.Select
ActiveChart.ChartArea.Select
ActiveChart.SeriesCollection(1).Values = _
"=Druk!$B$[b]5[/b];Druk!$E$[b]5[/b];Druk!$H$[b]5[/b];Druk!$K$[b]5[/b];Druk!$N$[b]5[/b];Druk!$Q$[b]5[/b];Druk!$T$[b]5[/b]"
Nie wiem jak napisać tą składnię ActiveChart.SeriesCollection(1).Values. Mam zmienną x, w której przechowuję numer ostatniego wiersza, ale nie wiem jak to wykorzystać.
Proszę o pomoc! Pozdrawiam!