如何用vba判断excel图表具有多少种图表类型?

我们知道在excel图表中可以展示一种或者多种图表类型,多种图表类型一般是柱形图+折线图或者其它几种基础图表类型的组合。

如果要在vba中获取具体一个图表中用了几种图表类型可以使用ChartGroup对象。

ChartGroup对象代表的是一个图表中用了几个图表类型。

以下vba代码将返回一个图表中具体有几种图表类型:

Sub QQ1722187970()
    Dim oChartGroup As ChartGroup
    Dim oChart As Chart
    Dim oWK As Worksheet
    Dim oChartObject As ChartObject
    Set oWK = Sheet1
    With oWK
       Set oChart = .ChartObjects(1).Chart
       With oChart
            MsgBox "本图表中共有" & .ChartGroups.Count & "个不同的图表类型"
       End With
    End With
End Sub
       

发表评论