Ole con excel

14/10/2003 - 16:43 por Jose Lara | Informe spam

Desarrollo en VB6.0:
agrege la referencia (Dll) excel 9.0 para trabajar ole

Tengo el codigo:
Dim appEx as Excel.Application
Dim wb as Excel.Workbook

set appEx = GetObject(,"Excel.Application")
set wb = appEx.Workbooks.open("Factura.xls")
Todo funciona perfecto, Pero...:

Si ejecuto el codigo 2,3,4 o mas veces me da el mensaje
que "LIBRO YA ESTA ABIERTO DESEA ABRIRLO NUEVAMENTE"

Entonces quiero hacer:
1.- Que pregunte si esta abierto el libro "Factura"
"Como es la instruccion" ?

2.- Si esta abierto que lo cierre
"Como es la instruccion" ?

Siga el debate

1 respuesta

Tengo una respuesta

Preguntas similare

Leer las respuestas

#1 Victor B.

14/10/2003 - 18:25 | Informe spam

Deberías de cerrar el libro y destruir el objeto cuando termine con el
libro, así te evitarías que se cargue Excel tantas veces en memoria:

wb.Close

appEx.Quit

"Jose Lara" escribió en el mensaje
news:2a7c101c39261$795c9720$

Desarrollo en VB6.0:
agrege la referencia (Dll) excel 9.0 para trabajar ole

Tengo el codigo:
Dim appEx as Excel.Application
Dim wb as Excel.Workbook

set appEx = GetObject(,"Excel.Application")
set wb = appEx.Workbooks.open("Factura.xls")
Todo funciona perfecto, Pero...:

Si ejecuto el codigo 2,3,4 o mas veces me da el mensaje
que "LIBRO YA ESTA ABIERTO DESEA ABRIRLO NUEVAMENTE"

Entonces quiero hacer:
1.- Que pregunte si esta abierto el libro "Factura"
"Como es la instruccion" ?

2.- Si esta abierto que lo cierre
"Como es la instruccion" ?

Siga el debate Respuesta

Responder a este mensaje

Ads by Google

Hacer una pregunta

Tengo una respuesta

Busqueda sugerida