VBA中的图表数据不是单元格

我想知道是否可以从VBA代码将数据设置为图表，而不必将其设置为一组单元格

为了达到这个目的，它可以策划任何事情。。偶数随机数。但我不想使用任何单元格粘贴值，然后让图表获取这些值

---

[我的应用程序有一张一年中每天都有一大堆设备的表，上面有很多字母“M”（维护）、“O”（操作）和“a”（可用）。我对设备进行vba过滤，以获得一些我想要绘制的数据，并希望根据“M”、“O”和“a”数量进行一些计算。]

以下是一个简单的示例：

Sub AddChart()
    Dim cht     As Chart
    Dim ser     As Series

    Set cht = Charts.Add
    cht.ChartType = xlColumnClustered
    Set ser = cht.SeriesCollection.NewSeries
    ser.XValues = Array(1, 3, 5, 7, 9)
    ser.Values = Array(2.4, 3.2, 5.7, 12.67)
End Sub

---

您必须注意，某些版本（我认为是2003年及以前版本）中图表的系列公式限制为1024个字符。在2010年，它似乎被限制为8192个字符。这意味着，如果对数据使用文字值（而不是范围），则公式中包含每个字符-因此指定的小数位数越多，数据点越多，代码失败的可能性就越大。

下面是一个简单的示例：

Sub AddChart()
    Dim cht     As Chart
    Dim ser     As Series

    Set cht = Charts.Add
    cht.ChartType = xlColumnClustered
    Set ser = cht.SeriesCollection.NewSeries
    ser.XValues = Array(1, 3, 5, 7, 9)
    ser.Values = Array(2.4, 3.2, 5.7, 12.67)
End Sub

---

您必须注意，某些版本（我认为是2003年及以前版本）中图表的系列公式限制为1024个字符。在2010年，它似乎被限制为8192个字符。这意味着，如果对数据使用文字值（而不是范围），则公式中包含每个字符-因此指定的小数位数越多，数据点越多，代码失败的可能性就越大。

下面是一个简单的示例：

Sub AddChart()
    Dim cht     As Chart
    Dim ser     As Series

    Set cht = Charts.Add
    cht.ChartType = xlColumnClustered
    Set ser = cht.SeriesCollection.NewSeries
    ser.XValues = Array(1, 3, 5, 7, 9)
    ser.Values = Array(2.4, 3.2, 5.7, 12.67)
End Sub

---

您必须注意，某些版本（我认为是2003年及以前版本）中图表的系列公式限制为1024个字符。在2010年，它似乎被限制为8192个字符。这意味着，如果对数据使用文字值（而不是范围），则公式中包含每个字符-因此指定的小数位数越多，数据点越多，代码失败的可能性就越大。

下面是一个简单的示例：

Sub AddChart()
    Dim cht     As Chart
    Dim ser     As Series

    Set cht = Charts.Add
    cht.ChartType = xlColumnClustered
    Set ser = cht.SeriesCollection.NewSeries
    ser.XValues = Array(1, 3, 5, 7, 9)
    ser.Values = Array(2.4, 3.2, 5.7, 12.67)
End Sub

---

您必须注意，某些版本（我认为是2003年及以前版本）中图表的系列公式限制为1024个字符。在2010年，它似乎被限制为8192个字符。这意味着，如果对数据使用文字值（而不是范围），则公式中包含每个字符-因此指定的小数位数越多，数据点越多，代码失败的可能性就越大。

是的，当然可能。要想知道怎么做，只需画一个随机的小图表。打开宏记录器，然后右键单击图表以选择数据，然后手动键入以逗号分隔的值，然后查看新图表。然后停止宏记录器。您将准备好模板代码。（我使用的是ipad，所以无法在答案中发布代码：）希望有用）是的，当然可能。要想知道怎么做，只需画一个随机的小图表。打开宏记录器，然后右键单击图表以选择数据，然后手动键入以逗号分隔的值，然后查看新图表。然后停止宏记录器。您将准备好模板代码。（我使用的是ipad，所以无法在答案中发布代码：）希望有用）是的，当然可能。要想知道怎么做，只需画一个随机的小图表。打开宏记录器，然后右键单击图表以选择数据，然后手动键入以逗号分隔的值，然后查看新图表。然后停止宏记录器。您将准备好模板代码。（我使用的是ipad，所以无法在答案中发布代码：）希望有用）是的，当然可能。要想知道怎么做，只需画一个随机的小图表。打开宏记录器，然后右键单击图表以选择数据，然后手动键入以逗号分隔的值，然后查看新图表。然后停止宏记录器。您将准备好模板代码。（我正在使用ipad，所以无法在答案中发布代码：）希望有用）