我试图简单地在VBA中制作一个图形，但出现错误：
用户定义的类型未定义
我已经能够将其调暗为一个对象并产生它，但是后来我无法编辑其任何成员属性。我正在从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初始化为工作表，并且工作正常。
如果您想要Dim做某事As ChartObject，则需要添加对项目的引用。从VB编辑器的主菜单中，选择“工具”->“参考”。然后向下滚动列表，直到找到“ Microsoft Excel <版本>对象库”并选中它旁边的框。
然后，您Dim应该编译。
Dim TATchart As ChartObject
您可以给它加上前缀Excel以提醒其来源：
Dim TATchart As Excel.ChartObject
请注意，您在xlXYScatterLines常量上会遇到类似的编译错误，因为在没有Excel类型库引用的情况下，Access VBA也未知该错误。
本文收集自互联网，转载请注明来源。
如有侵权，请联系[email protected] 删除。
我来说两句