[VB6 ] EXCEL中畫圖的問題

[timohu (隨便說說)]

當我輸入完資料
開始要畫圖的時候
有時候在第二行的    With ActiveChart會出現錯誤
錯誤訊息是：執行階段錯誤'1004'   ActiveChart方法('_Glocal'物件)失敗
錯誤好像都是發生在當我的VB執行一次後
在沒有關掉程式的情況下要在畫另一個圖時會產生
請問是不是我少寫了一些關掉或停止某些物件的程式 謝謝

下面是我的程式碼
        CreateObject("excel.application").Charts.Add
    With ActiveChart
        .HasTitle = True
        .ChartTitle.Characters.Text = "成績表"
        .ChartTitle.Select
            '.Left = 508
        Selection.Top = 30
        .Axes(xlCategory, xlPrimary).HasTitle = True
        .Axes(xlCategory, xlPrimary).AxisTitle.Characters.Text = "分數"
        .Axes(xlValue, xlPrimary).HasTitle = True
        .Axes(xlValue, xlPrimary).AxisTitle.Characters.Text = "人數"
        .HasLegend = False
        .ChartType = 73
        .SetSourceData Source:=Sheets("sheet1").Range("A1:B9"), _
            PlotBy:=xlColumns
        .Location Where:=xlLocationAsObject, Name:="sheet1"
    End With
        oBook.SaveAs track & ".xls"
    Exit Sub

--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 59.124.129.194
※ 編輯: timohu          來自: 59.124.129.194       (09/18 15:40)
推 fumizuki:請先看2394最後2行程式
推 timohu:謝謝版大～但是好像.HasTitle這個指令都會出現錯誤耶@_@
推 timohu:我似乎找到辦法了～好像是前面宣告的問題~~