Не могу решить следующую проблему:
Имеется диаграмма. Необходимо удалить все ряды данных, т.е. SeriesCollection. Но у меня никак не получается узнать количество этих рядов без активации (выделения) текущего Листа и Диаграммы, т.е. нижеследующее работает
ActiveSheet.ChartObjects(5).Activate
c = ActiveChart.SeriesCollection.Count
а это нет:
c = ActiveSheet.ChartObjects(5).SeriesCollection.Count
Если обращаться напрямую:
c = Sheets(ndiag).ChartObjects(5).SeriesCollection.Count
получаю следующую ошибку:
http://dziman.nm.ru/files/Pic15.png
Почему? Может нужно приведение типов сделать?