<em>vb</em>怎样打开<em>excel关闭</em>再打开-v

没问题了，关闭了。
你只要通过windows 任务管理器，看看还有没有EXCEL，就知道了。

Set xlApp = CreateObject("Excel.Application") '创建EXCEL对象
Set xlBook = xlApp.Workbooks.Open(App.Path & "\委托书.xls") '打开已e799bee5baa6e79fa5e98193e78988e69d83362经存在的EXCEL工件簿文件
xlApp.Visible = IIf(fg = 0, True, False) '设置EXCEL对象可见（或不可见）预览设置为可见
Set xlSheet = xlBook.Worksheets("sheet1") '设置活动工作表
......
xlApp.DisplayAlerts = False '不提示是否覆盖
xlBook.SaveAs App.Path & "\检验委托书\" & Trim(w.C_hpzl.Text) & Trim(w.T_hphm.Text) & "_" & a.jylsh & ".xls" '保存当前发票信息

xlBook.Close (False) '关闭工作簿
xlApp.Visible = False
xlApp.Quit '结束EXCEL对象

Set xlSheet = Nothing
Set xlBook = Nothing
Set xlApp = Nothing '释放xlApp对象
VB代码自己创建的是这样关闭的
其他的需要调用系统API来结束进程