arrays - 从多维数组创建聚集条形图

Question

我想在 excel 中从 10x10 数组创建一个聚集条形图。我已经想出了如何使用 seriescollection 从一维数组中创建一个简单的条形图。它看起来像这样：

   Dim ChartInputNumber() As Variant
    ReDim ChartInputNumber(9)

    Dim ChartInputValue() As Variant
    ReDim ChartInputValue(9)

'Neues Chart Objekt deklarieren
    Dim mychart As ChartObject
    
    'Chart formatieren und mit Daten aus Arrays befüllen
    With ActiveSheet
        Set mychart = .ChartObjects.Add(Range("D6:V35").Cells(1).Left, Range("D6:V35").Cells(1).Top, Range("D6:V35").Width, Range("D6:V35").Height)
        'mychart.Chart.ChartWizard .Cells(1)
        mychart.Chart.SeriesCollection.NewSeries
        mychart.Chart.SeriesCollection(1).Values = ChartInputValue
        mychart.Chart.SeriesCollection(1).XValues = ChartInputNumber
        mychart.Chart.HasTitle = True
        mychart.Chart.ChartTitle.Text = "Behälterbestand" & .Cells(1, 2).Value
        mychart.Chart.HasLegend = False
    End With

其中ChartInputValue是一个包含 y 值并ChartInputNumber包含 x 轴声明的一维数组。

但是，到目前为止，从我的网络搜索中，我无法找到如何重写代码以使其也适用于ChartInputValue(9,9)10x10 数组。基本上我想为列表中的每个类别显示 10 个条形图ChartInputNumber。

我将继续搜索和尝试，但感谢任何帮助！

标签： arraysexcelvbaexcel-charts