關於用VB匯出Excel，Excel中含圖表Chart

Question

Set l_objChart = l_objWorksheet.Parent.Charts.Add
    ActiveChart.ChartType = xl3DColumnStacked   '設定圖表類型為立體直條圖
    '設定圖表數據源和圖表放置位置
    ActiveChart.SetSourceData Source:=Sheets("Sheet1").Range("A15:" & l_str & "18"), PlotBy:=xlRows
    ActiveChart.Location Where:=xlLocationAsObject, Name:="Sheet1"代碼出口出設置了：
    Set l_objChart = Nothing
    Set l_objWorksheet = Nothing
    Set l_objWorkbook = Nothing
    Set l_objExcel = Nothing
程序運行後匯出Excel(l_objExcel.Visible = True),關閉Excel後我想再次生成一次這份Excel(此時程序沒有關閉)，便出現錯誤：Method 'Sheets' of object '_Global' failed 
請問怎麼解決？謝謝!