如何使用 VBA 更改 Access 报表中的图表标题？
How can I change the Chart Title in an Access report with VBA?
我有一个带有图表的访问报表，我想在打开报表（预览或打印）时更改图表的标题。
我找到了以下代码：
Dim g As Graph.Chart
Set g = Me!Graph0.Object
With g
.ChartTitle.Text = "Test"
End With
但我不知道我应该 运行 将此代码用于哪个事件。我尝试了 Report_Open 和其他事件，但它从未改变标题。
我不确定您的代码是否有效，但要在打开报告时触发事件，您需要将代码放入 Report.Load 事件中。
查看 msdn：https://msdn.microsoft.com/en-us/library/office/ff197739.aspx
我在这里找到了答案：
Modify Chart properties in Access report via VBA (error 2771)
首先，我将图表从报表复制到表单并测试代码以更改标题。成功了。
然后我尝试 运行 报告中带有打开或加载事件的代码，但我总是收到错误。我用谷歌搜索了那个错误并找到了上面的文章，这就是解决方案。
我刚刚在报告中添加了一个按钮并添加了行
Me.Command1.SetFocus
在我的代码开头。
现在我可以 运行 来自 Report_Load() 或 Report_Open() 的代码。它适用于两者。
问题已解决。
如果使用表单，请使用 OnActivate 事件。
我有一个带有图表的访问报表，我想在打开报表（预览或打印）时更改图表的标题。 我找到了以下代码：
Dim g As Graph.Chart
Set g = Me!Graph0.Object
With g
.ChartTitle.Text = "Test"
End With
但我不知道我应该 运行 将此代码用于哪个事件。我尝试了 Report_Open 和其他事件，但它从未改变标题。
我不确定您的代码是否有效，但要在打开报告时触发事件，您需要将代码放入 Report.Load 事件中。
查看 msdn：https://msdn.microsoft.com/en-us/library/office/ff197739.aspx
我在这里找到了答案：
Modify Chart properties in Access report via VBA (error 2771)
首先，我将图表从报表复制到表单并测试代码以更改标题。成功了。
然后我尝试 运行 报告中带有打开或加载事件的代码，但我总是收到错误。我用谷歌搜索了那个错误并找到了上面的文章，这就是解决方案。
我刚刚在报告中添加了一个按钮并添加了行
Me.Command1.SetFocus
在我的代码开头。
现在我可以 运行 来自 Report_Load() 或 Report_Open() 的代码。它适用于两者。
问题已解决。
如果使用表单，请使用 OnActivate 事件。