ChartType Property Example

This example sets the bubble size in chart group one to 200% of the default size if the chart is a 2D bubble chart.

With Worksheets(1).ChartObjects(1).Chart
    If .ChartType = xlBubble Then
        .ChartGroups(1).BubbleScale = 200
    End If
End With