推 ytlty:在END SUB 前加 END就可以了 05/15 13:15
推 shietsd:沒用 這跟有無加End沒有關係 ~ 是物件釋放問題 ~~^^ 05/16 07:42
程式大致如下
===========================
' vb 6.0 , Excel 2000
Private Sub Form_Load()
Dim objExcelApp As Excel.Application
Dim objSheet As Excel.Worksheet
...etc (初始化與路徑設定)
Set objExcelApp = New Excel.Application
Workbooks.Add
Set objSheet = objExcelApp.Worksheets(1)
objSheet.Activate
...etc (讀寫 Excel 檔案)
objExcelApp.Quit
Set objExcelApp = Nothing
End Sub
============================
重點是程式結束後 (程式跑完, 視窗也關了),
為何在工作管理員那裡仍然可以看到一個 Excel.exe 呢 ?
還是我建立 Excel 物件的方法有錯誤 ?
還請不吝指正 ~~ 謝謝 ~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 220.133.57.44