1.请问在vb中如何调用excel的图表图表导航自适应源码表控件chart啊vb引用表控件

请问在vb中如何调用excel的表控件chart啊vb引用表控件

       以下为关键部分'打开Set sf1 = CreateObject(\"Excel.Application\")sf1.Workbooks.AddSet sf2 = sf1.Workbooks(1)Set sf3 = sf2.ActiveSheet'作图 Range(\"A1:E5\").SelectCharts.AddActiveChart.ChartType = xl3DColumnActiveChart.SetSourceData Source:=Sheets(\"Sheet1\").Range(\"A1:E5\")ActiveChart.Location Where:=xlLocationAsObject, Name:=\"Sheet1\"ActiveWindow.Visible = False‘第二个图Charts.AddActiveChart.ChartType = xl3DPieExplodedActiveChart.SetSourceData Source:=Sheets(\"Sheet1\").Range(\"A1:E5\"), PlotBy:= _xlRowsActiveChart.Location Where:=xlLocationAsObject, Name:=\"Sheet1\"Windows(\"Book1\").SmallScroll Down:=-9ActiveWindow.Visible = False