博客园  :: 首页  :: 新随笔  :: 联系 :: 订阅 订阅  :: 管理

Excel模版,自己設定好分析餅圖,如何動態地更新分析圖的數據源呢?代碼好下:

 

'注:l_xlsWS是空義的WorkSheet

        Dim l_objChartPercent As Excel.ChartObject
        Set l_objChartPercent = l_xlsWS.ChartObjects("Chart 2")
        Call l_objChartPercent.Chart.SetSourceData(Source:=l_xlsWS.Range("A7,A8,D7,D8"), PlotBy:=xlColumns)
        If Not l_objChartPercent Is Nothing Then Set l_objChartPercent = Nothing

'其實做Excel的分析圖並不難,只要我們設定好填充的數據源,再將分析數據圖綁定我們指定的數據源,之後就成功出分析圖