用vb打开excel文件后，那个excel文件就在打不开也关不上了，呜呜

Question

Set ex = CreateObject("Excel.Application")
Set exwbook = Nothing
Set exwbook = ex.Workbooks.Open(Trim(StrPath))就写的这几句打开的，然后这样引用Trim(ex.Cells(1, IntCol).Value)引用数据是没问题的，可是好像用完这个excel文件就关不上了，而且打开提示副本什么的呜呜呜

Answer 1

你把excel打开了，
没有彻底关闭。
进程里已经有一个Excel.exe了。
所以无法继续打开。

Answer 2

Open之后，没有Close啊再执行代码就又去Open，当然“提示副本什么的”了。

Answer 3

我也想知道！！因为我也老碰到这种问题．程序不退出去EXCEL也不会退出去．

Answer 4

ReportDate = Format(Now, "yyyy_mm_dd_HH_mm_ss")
              vbexcel.ActiveWorkbook.SaveAs FileName:="D:\OQC_Report\Report\Customer_Report\" & Trim(rsLotInfo("FABLOT")) & " " & ReportDate & ".xls", FileFormat:=xlNormal, _
                 Password:="", WriteResPassword:="", ReadOnlyRecommended:=False, ConflictResolution:=xlLocalSessionChanges, CreateBackup:=False
              vbexcel.ActiveWorkbook.Close False, "D:\OQC_Report\Use\Customer_Report.xls"

Answer 5

我晕，看不懂啊，好像和我的不是同一种方法啊，我就是想知道，如何在打开文件读出数据后，能让excel正常关闭，而且我的这种打开是隐式的，用户并看不到excel打开了，但是在进程中是有的，但是又不能强制的到进程中关闭excel，因为用户很可能还打开了别的excel文件

Answer 6

应该最后加上一句ex.quit就可以了吧．

Answer 7

Set ex = CreateObject("Excel.Application")
Set exwbook = Nothing
Set exwbook = ex.Workbooks.Open(Trim(StrPath))......用完后加上
    ex.ActiveWorkbook.Close
    Set exwbook = Nothing
    Set ex = Nothing

Answer 8

最后加上两句
 exwbook.close
 ex.quit

Answer 9

也可以用其它方法打开Excel啊，你把他用ADO或DAO打开，关闭不是很容易么？