Visual Basic - CERRAR EXCEL

Life is soft - evento anual de software empresarial
 
Vista:

CERRAR EXCEL

Publicado por ALE (1 intervención) el 13/03/2006 19:33:19
HOLA
TENGO QUE CERRAR EXCEL Y GUARDAR LOS CAMBIOS
Y LUEGO CERRAR EL EGECUTABLE DE VISUAL BASIC
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder

RE:CERRAR EXCEL

Publicado por ivan (463 intervenciones) el 13/03/2006 20:57:31
¿cómo lo abriste....?
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:CERRAR EXCEL

Publicado por ale (1 intervención) el 14/03/2006 21:47:42
Dim ApExcel As Variant
Set ApExcel = CreateObject("Excel.application")
' Hace que Excel se vea
ApExcel.Visible = True


'ABRIR

ApExcel.Workbooks.Open ("c:\proga\" & Text3 & "\ARCHIVOS\FEDE.xls")
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar

RE:CERRAR EXCEL

Publicado por ivan (463 intervenciones) el 15/03/2006 17:45:01
En mi caso yo uso esto...

Al declararlo
Dim ApExcel As excel.Application

Al configurarlo
Set ApExcel = New excel.Application

Al abrirlo
ApExcel.Workbooks.Open FileName:=Nombre_Archivo
ApExcel.Visible = True

Al terminar el proceso donde uso el objeto EXCEL
Set ApExcel = Nothing

Para terminar el proceso le dejo al usuario la tarea de cerrar el excel...

En caso de generarse algún error durante la generación del archivo en Excel, mi forma de cerrarlo es esta

ApExcel.Visible = False
ApExcel.Application.Visible = False
ApExcel.Application.Quit
Set ApExcel = Nothing

He notado que al momento de establecer la propiedad VISIBLE a true, es cuando el proceso EXCEL.EXE se agrega a la lista de procesos... al momento de que el usuario cierra manualmente la venta de EXCEL es cuando este proceso se quita, asimismo el proceso se quita de dicha lista cuando ejecuto el método QUIT.

Hasta ahora eso me ha funcionado.

Espero te sirva, saludos
Valora esta respuesta
Me gusta: Está respuesta es útil y esta claraNo me gusta: Está respuesta no esta clara o no es útil
0
Comentar