Проверьте значение одной серии, измените цвет соответствующей точки во 2-й серии - PullRequest
0 голосов
/ 01 мая 2018

У меня есть автоматизированная диаграмма Парето, которая хорошо работает в Excel.

Я хочу изменить его, чтобы проверить, имеют ли точки в совокупном процентном ряду значение менее 80% и закрасить ту же числовую точку в серии подсчета, если это так.

Попробовал это; не выдает никаких ошибок, но также не работает.

Я думаю, что он должен выполнять итерацию по списку значений, проверять, не являются ли они <80, а затем обновлять точку на соответствующем i в серии отсчетов. </p>

Set percVals = paretoChart.Chart.SeriesCollection(percentSeries).Values
For Each i in percVals 
    If percVals(i) = <80 Then
        With paretoChart.Chart.SeriesCollection(countSeries).Points(i)
            .Format.Fill.ForeColor.RGB = RGB(0,0,225) 
            .Format.Line.ForeColor.RGB = RGB(0,0,225)
        End With
    End If 
Next i 

Переменная "paretoChart" установлена ​​ранее в коде и работает нормально во всем. Я пробовал без заявления «с». Нет разницы.

Существует аналогичный вопрос, сравнивающий два значения в ряду, но я не думаю, что смогу приспособить это для работы здесь. Любые идеи приветствуются!

Добро пожаловать на сайт PullRequest, где вы можете задавать вопросы и получать ответы от других членов сообщества.
...