從SHEETNAME

Question

創建圖表標題我希望能修改使用VBA

我的圖表我創建了一個名爲範圍使用公式，把它命名爲在VBA SheetNames

=REPLACE(GET.WORKBOOK(1),1,FIND("]",GET.WORKBOOK(1)),"") 

然後，我試圖改變圖表標題：

ActiveChart.HasTitle = True 
ActiveChart.ChartTitle.Text = Range("SheetNames").Value 

但是不成功。我試圖用一個公式來調用在單元格B1德表名稱和它使用的後續工作

=SheetNames 

然後在VBA，做工精良：

ActiveChart.HasTitle = True 
ActiveChart.ChartTitle.Text = Range("B1") 

我應該怎麼做，使第一位作品？

Answer 1

爲什麼要使用一個公式來獲取表的名稱：

ActiveChart.HasTitle = True 
ActiveChart.ChartTitle.Text = ActiveSheet.Name