Question

我正在使用ACCESS 2016.我在课程表上有一个图表：

SeriesCollection

问题：

我试图在图表上单独更改条形图的颜色，这样如果值大于0，则为蓝色，否则为红色

为什么我认为这是一个问题：

我在线查看了文档，在Excel和Word中使用VBA有很多回复，它们使用了图形MyGraph的属性（例如here）

这似乎不再暴露或存在。

我在我的对象"SeriesCollection"上设置了一个断点。我没有看到属性{{1}}或类似的东西，我可以用它来改变颜色。

有什么想法吗？

Answer 1

看起来Access 2016中的Graph对象与Excel的Chart对象

有很大不同

我能够在一个非常基本的图表中查看一个系列的属性。我可以使用一行代码

来查看和更改数据系列的颜色

Graph0.SeriesCollection(1).Interior.Color = 1738934

其中（1）代表我的数据系列1.

我假设您需要构建一个颜色代码列表以匹配您想要的结果，但如果您可以修改图表一次然后使用debug.print获取上述值，那么这应该很容易。

希望有所帮助

[编辑] - 发现蓝色= 16711680

[已修改]以显示如何编辑[/ Modified]

系列中的各个点颜色

此代码为每组点创建了不同的条形图颜色在我的4个条形图示例中

Graph0.SeriesCollection(1).Points(1).Interior.Color = 39423
Graph0.SeriesCollection(1).Points(2).Interior.Color = 8388736
Graph0.SeriesCollection(1).Points(3).Interior.Color = 16711935
Graph0.SeriesCollection(1).Points(4).Interior.Color = 32768

使用vba更改Access中条形图的颜色

1 个答案: