Excel- queda proceso activo

Te cuidado porque tienes que comprobar que esa instancia tiene abierto tu
fichero y que no es un excel del usuario. A ver si te vale este codigo que
utilizo yo para lo mismo

' Comprobamos que no existe una instancia de EXCEL colgada.
Dim objExcel As Object
Dim Abierto As Boolean
On Error Resume Next
Set objExcel = GetObject(, "Excel.Application")
On Error GoTo 0
If Not objExcel Is Nothing And Err.Number = 0 Then
For Each objWB In objExcel.Workbooks
Select Case objWB.Name
Case "mifichero.xls"
objWB.Save
objWB.Close
Abierto = True
End Select
Next
If Abierto = True Then
objExcel.Quit
MsgBox "MENSAJE - SE HA GUARDADO Y CERRADO UNA INSTANCIA DE EXCEL
ANTERIOR", vbInformation + vbOKOnly, "ERROR"
End If
End If
Set objExcel = Nothing

Guillermo Rey
Vigo (SPAIN)
Desarrollo VB y VBA
www.guillermorey.com


"pedro_B" escribió en el mensaje
news:%

a quien me pueda ayudar:
tengo una aplicacion que lee 3 bases de datos y carga
una planilla excel y realiza una consulta dinamica.
La consulta es la siguiente:
Si ocurre algun error, la aplicacion de cierra pero el
proceso del excel.exe queda activo.
Como debo matar el proceso en caso de error o averiguar si hay alguna
instancia de exel cargada para
poder matarla.
Gracias.