Question

我试图在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被初始化为工作表并且一直工作正常。

Answer 1

如果您想Dim某事As ChartObject，则需要添加对项目的引用。从VB Editor的主菜单中，选择Tools-＆gt; References。然后向下滚动列表，直到找到“Microsoft Excel＆lt; version＆gt; Object Library”，然后选中它旁边的框。

然后你的Dim应该编译。

Dim TATchart As ChartObject

您可以在Excel前面添加一个提示符，来源于：

Dim TATchart As Excel.ChartObject

请注意，您将在 xlXYScatterLines 常量中遇到类似的编译错误，因为在没有Excel类型库引用的情况下，Access VBA也不知道。

我尝试将DIM作为Chart或ChartObject时出错

1 个答案: