在 Access 表单上使用组合框更改现代图表值不起作用

问题描述

我的表单中有一个现代图表，我想使用表单上的组合框更改值。我的代码如下：

If Me.Keuzelijst104 = "Overweight" Then
Me.Grafiek101.RowSource = "Data_grafiek_tbl01"
Me.Grafiek101.ChartValues = "[Overweight %]"
Me.Grafiek101.ChartAxis = "Boekingsdatum"
Me.Grafiek101.ChartLegend = "Werkplek"
End If

当我运行代码时，我收到错误消息： “查询不包含作为聚合函数一部分的指定表达式”

这是由transform rowsource引起的，如果正确则聚合函数正确：

TRANSFORM Sum([OEE]) AS [SumOfOEE] 
SELECT Format([Boekingsdatum],"ddddD") 
FROM [Data_grafiek_tbl01] 
GROUP BY Format([Boekingsdatum],"ddddD"),Int([Boekingsdatum]) 
ORDER BY Int([Boekingsdatum]) 
PIVOT [Werkplek]

使用 VBA 更改值后，缺少聚合函数并导致错误消息。

TRANSFORM [Overweight %] 
SELECT Format([Boekingsdatum],Int([Boekingsdatum]) 
ORDER BY Int([Boekingsdatum]) 
PIVOT [Werkplek]

我的问题是如何将聚合函数添加到 vba 代码中，因为无法更改转换行源，这是自动化的。

提前致谢，

rg，安德烈

解决方法

暂无找到可以解决该程序问题的有效方法，小编努力寻找整理中！

如果你已经找到好的解决方法，欢迎将解决方案带上本链接一起发送给小编。

小编邮箱:dio#foxmail.com (将#修改为@）

charts forms ms-access