Страницы: 1
RSS
Условное форматирование диаграммы
 
Доброе утро!    
 
Во вложении пример. Проценты динамические, меняюся каждый день. Хотелось бы, чтобы меняли цвет на зеленый те столбцы, где процент >=100.    
 
Может быть, подскажите какой-то альтернативный вариант визуализации.  
Спасибо.
 
Private Sub Worksheet_Change(ByVal Target As Range)  
   If Target.Count > 1 Then Exit Sub  
   If Not Intersect(Target, Range("B1:B3")) Is Nothing Then  
       ActiveSheet.ChartObjects(1).Chart.SeriesCollection(1).Points(Target.Row).Format.Fill.ForeColor.RGB = IIf(Target.Value > 1, RGB(0, 176, 80), RGB(192, 0, 0))  
   End If  
End Sub  
 
Это Вам поможет  
________________________  
khafizovtt@gmail.com
Учимся сами и помогаем другим...
 
Мой вариант.
Страницы: 1
Наверх