[VB6 ] 請問在轉EXCEL時的問題
請問一下各位,小弟在寫一個將資料轉到EXCEL的程式遇到一個問題.
就是轉檔時如果有設定欄位顏色,在程式結束後EXCEL雖然結束了,但是
實際上在工作管理員裡的EXCEL.EXE還是存在.
小弟的寫法如下:
Dim objExcelApp As Object
Set objExcelApp = Excel.Application
Dim objSheet As Excel.WorkSheet
Set objExcelApp = CreateObject("Excel.Application")
objExcelApp.Workbooks.Add
略...
Range("A" & i & ":" & "V" & i).Select
With Selection.Interior
.ColorIndex = 37
.Pattern = xlSolid
End With
Set objSheet = Nothing
objExcelApp.Workbooks.Close
Set objExcelApp.Workbooks = Nothing
DoEvents
objExcelApp.Quit
Set objExcelApp = Nothing
DoEvents
但如果沒有去作填色的動作就可以正常結束EXCEL.EXE.
請問這要如何處理??
謝謝大家.
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.211.254.196
→
11/27 14:54, , 1F
11/27 14:54, 1F
→
11/27 14:56, , 2F
11/27 14:56, 2F
推
11/27 16:31, , 3F
11/27 16:31, 3F
→
11/27 16:33, , 4F
11/27 16:33, 4F
→
11/27 16:33, , 5F
11/27 16:33, 5F
推
11/27 21:38, , 6F
11/27 21:38, 6F
→
11/27 21:39, , 7F
11/27 21:39, 7F
推
11/27 21:41, , 8F
11/27 21:41, 8F
→
11/28 18:43, , 9F
11/28 18:43, 9F
推
11/30 13:41, , 10F
11/30 13:41, 10F
推
11/30 16:56, , 11F
11/30 16:56, 11F
推
12/01 09:53, , 12F
12/01 09:53, 12F
→
12/01 09:54, , 13F
12/01 09:54, 13F