2.7.Построение диаграмм
2.7.5. Задание цветов серий


При построении диаграмм можно автоматизировать процесс установки цвет, серий данных. Например, на рабочем листе в диапазоне А1:Е4 имеется таблица с результатом работы фирмы за отчетный период. Для наглядности заголовки строк с названиями стран, в которые фирмой поставлялись товару окрашены в различные цвета. Задача состоит в том, чтобы и графики соответствующих серий были окрашены в те же цвета.


 Sub Цвет()
ActiveSheet.ChartObjects(1).Activate
With ActiveChart
.SeriesCollection(1).Interior.Color = Range("b1").Interior.Color
.SeriesCollection(2).Interior.Color = Range("c1").Interior.Color
End With
End Sub






  
КОНТАКТЫ
Ермакова Надежда Игоревна
Лицей им.Г.Ф.Атякшева
ХМАО-Югорск, ул Ленина 24



+7 9222596815 nady_er@mail.ru
КАРТА
sample map