VBA Excel-从内存设置图表数据

在Excel中，是否可以通过VBA从存储在内存中的数据设置图表数据？例如，如果您在VBA[1,2,3,4,5,6…]中创建了一个数组，您可以在工作簿中显示该数组的图表吗

---

谢谢-KC是的，这里有一个简单的例子

Sub test()

    Dim vXVals As Variant
    Dim vVals As Variant

    vXVals = Array("Wk1", "Wk2", "Wk3")
    vVals = Array(100, 175, 150)

    With ActiveSheet.ChartObjects.Add(Left:=Range("B2").Left, Top:=Range("B2").Top, Width:=360, Height:=210).Chart
        With .SeriesCollection.NewSeries
            .Name = "Series Name"
            .XValues = vXVals
            .Values = vVals
        End With
    End With

End Sub

---

希望这有帮助

是的，这里有一个简单的例子

Sub test()

    Dim vXVals As Variant
    Dim vVals As Variant

    vXVals = Array("Wk1", "Wk2", "Wk3")
    vVals = Array(100, 175, 150)

    With ActiveSheet.ChartObjects.Add(Left:=Range("B2").Left, Top:=Range("B2").Top, Width:=360, Height:=210).Chart
        With .SeriesCollection.NewSeries
            .Name = "Series Name"
            .XValues = vXVals
            .Values = vVals
        End With
    End With

End Sub

---

希望这有帮助

非常感谢！我担心这会是一些超级复杂的内存/将数据对象保留在范围内的事情。。。。谢谢一个后续问题—您知道是否有一种方法可以在以后将数据附加到该图表中，而不必再次提供整个数组？我最初将其设置为的数组将需要一些时间才能运行，但希望在传入时附加传入的数据。Got it-test=ActiveSheet.ChartObjects（1）。Chart.SeriesCollection（1）。value太好了，很高兴您能够理解最后一部分。干杯对不起，我想这不是一个完整的答案，嗯！我想我应该使用上面的那一行从图表中获取现有值，在数组中添加一行，然后再次设置chart.values属性！我担心这会是一些超级复杂的内存/将数据对象保留在范围内的事情。。。。谢谢一个后续问题—您知道是否有一种方法可以在以后将数据附加到该图表中，而不必再次提供整个数组？我最初将其设置为的数组将需要一些时间才能运行，但希望在传入时附加传入的数据。Got it-test=ActiveSheet.ChartObjects（1）。Chart.SeriesCollection（1）。value太好了，很高兴您能够理解最后一部分。干杯对不起，我想这不是一个完整的答案，嗯！我想我应该使用上面的那一行从图表中获取现有值，向数组中添加一行，然后再次设置chart.values属性