當我嘗試將某些內容以圖表或ChartObject的形式顯示時出錯

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編輯器的主菜單中，選擇“工具”->“參考”。 然后向下滾動列表，直到找到“ Microsoft Excel <版本>對象庫”並選中它旁邊的框。

然后，您的Dim應該會編譯。

Dim TATchart As ChartObject

您可以在它前面加上Excel來提醒它來自何處：

Dim TATchart As Excel.ChartObject

請注意，您在xlXYScatterLines常量上也會遇到類似的編譯錯誤，因為在沒有Excel類型庫引用的情況下，Access VBA也不知道該錯誤。