当我尝试将某些东西作为图表或图表对象时出错

我试图简单地在VBA中创build一个graphics，但得到的错误：

用户定义types未定义

我已经能够将其暗淡为一个对象，并产生它，但是我不能编辑它的任何成员属性。 我从MS-Access运行VBA，但我不确定会影响它。

这是我的完整代码

Dim TATchart As ChartObject Set TATchart = wrkSht.ChartObjects.Add(Left:=200, Width:=375, Top:=50, Height:=225) With TATchart.Chart Set ChartType = xlXYScatterLines .SetSourceData Source:=wrkSht.Range(wrkSht.cells(1, 1), CurCell.offset(0, 1)) Set .Title = "Total Over Time (MAW)" End With 

编辑：wrkSht被初始化为工作表，并一直工作正常。

Answer 1

如果要将某些东西Dim As ChartObject ，则需要添加对项目的引用。 在VB编辑器的主菜单中，select工具 – >参考。 然后向下滚动列表直到find“Microsoft Excel <版本>对象库”并选中它旁边的框。

然后你的Dim应该编译。

 Dim TATchart As ChartObject 

你可以用Excel作为前缀来提醒它来自哪里：

 Dim TATchart As Excel.ChartObject 

请注意，在xlXYScatterLines常量处遇到类似的编译错误，因为Access VBA在没有Exceltypes库引用的情况下也是未知的。