Excel Pivot VBA系列参考的图表格式

编程问答 2022-06-05

问题描述

我正在尝试使用VBA在excel中的多个相似图表之间应用格式设置。我希望这些图表是结合了堆积线和堆积柱的组合图。我无法在VBA中应用格式设置，因为我不知道该系列如何在要从中提取图表的数据透视表中命名（对数据透视表进行了过滤，因此系列名称不只是数据透视表的一个元素）

问题是当数据透视表没有全部4个数据系列时（类似于下面的ex），该系列被分配了1-3或1-2，而我不确切知道3或2是什么系列。我想拿出系列参考，并在可能的情况下使用FullSeriesCollection（“ Dogs Big”）。但是，我无法将此文本与数据透视表作为系列名称给出的名称进行匹配，因为它是通过排列数据透视表而组合的“狗”和“大”而得来的，因此我不知道如何引用此文本。 / p>

我将不胜感激。谢谢！

Sub ChangeChartType()
On Error Resume Next
Dim cht1
    ' Series 1,Dogs Big
    cht1.FullSeriesCollection(1).ChartType = xlLinestacked
    ' Series 2  Dogs Small
    cht1.FullSeriesCollection(2).ChartType = xlLinestacked
     Series 3   Cats Big
    cht1.FullSeriesCollection(3).ChartType = xlColumnStacked
     Series 4   Cats Small
    cht1.FullSeriesCollection(4).ChartType = xlColumnStacked

End Sub

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

excelexcelformatformatformatpivot-tableseriesseriesvba