close

oExcel.ActiveSheet.ChartObjects("圖表 222").Activate()
oExcel.ActiveChart.ChartArea.Select()
oExcel.ActiveChart.SetSourceData(Source:=oSheet.Range("A2:A13,B2:B13"))
oExcel.ActiveChart.SeriesCollection(1).Name = "標題"

arrow
arrow
    全站熱搜

    呼和羅聖 發表在 痞客邦 留言(0) 人氣()