引用VBA中的圖表時的運行時錯誤'438'

Question

我想通過單擊工作表上的命令按鈕來過濾現有圖表以過濾數據系列並更改標題，但在運行時錯誤438爲某些操作編寫代碼。

首先，線 Worksheets("Report").ChartObjects("ChartVisitors").Visible=True（或False）
作品就好了，但是當我嘗試：
Worksheets("Report").ChartObjects("ChartVisitors").ChartTitle.Text = "Test"或
Worksheets("Report").ChartObjects("ChartVisitors").FullSeriesCollection(25).IsFiltered = True (False)，我得到運行時錯誤438這兩個是幾乎唯一的屬性我想修改，我猜我的語法錯了？ MSDN僅指定圖表應將.HasTitle屬性設置爲True，它的作用如下。

Answer 1

A ChartObject用作容器爲Chart對象。把它看成是該圖表嵌入在窗口中你需要：

Worksheets("Report").ChartObjects("ChartVisitors").Chart.ChartTitle.Text = "Test" 

不是

Worksheets("Report").ChartObjects("ChartVisitors").ChartTitle.Text = "Test" 

等