☰

根据系列标题格式化 Excel 数据透视图系列

tag-icon • tag-icon microsoft-excel charts formatting pivot-chart bar-chart
根据系列标题格式化 Excel 数据透视图系列

我有一个非堆叠的数据透视条形图，其中显示了多个系列的两个值（计划小时数总和与实际小时数总和）。

我想要实现的是一个格式规则，即每个系列的计划小时数的所有条形图都以实线显示，而实际小时数的所有条形图都以虚线显示。

此图表将定期更新不同的系列，例如 Assy、Insp、Plan，但我希望格式保持基于计划值和实际值。每次更新图表后我是否可以运行宏？

我已将所需格式的图片（其中包含两个系列）作为示例，链接如下。

任何/所有帮助都将非常感激！

示例图表：

示例图表

答案1

所以，我找到了一个解决方案。计划系列始终是偶数系列，因此我创建了一个循环，该循环遍历所有偶数系列并应用正确的条形格式：

Dim x As Integer

ActiveSheet.ChartObjects("Hours_By_Department").Activate

For x = 2 To ActiveChart.FullSeriesCollection.Count Step 2

    ActiveSheet.ChartObjects("Hours_By_Department").Activate
    ActiveChart.FullSeriesCollection(x).Select
    With Selection.Format.Fill
        .Visible = msoTrue
        .Patterned msoPatternNarrowHorizontal
    End With

Next

相关内容