instancia de excel en acces

13/09/2005 - 03:17 por fer | Informe spam
Hola grupo

tengo una aplicacion en acces donde abro un libro de excel, al momento
de empezar a operar el archivo me marca un error 9 en tiempo de
ejecucion.

la instruccion donde salta el error es:

Set MiXL = GetObject(archivo_excel)
MiXL.Windows(elite).Activate > aqui salta el error

lo he modificado por esta otra sin lograr lo que necesito

MiXL.application.Windows(archivo_excel).Activate

de que manera puedo instanciar al archivo de tal manera que pueda
ejecutar la manipulacion de varios archivos abiertos de excel desde
acces?

muchas gracias por la ayuda

Fernando
 

Leer las respuestas

#1 KL
13/09/2005 - 08:36 | Informe spam
Hola fer,

Prueba con:

Dim MiXL As Excel.Application
Set MiXL = GetObject(,"Excel.Application")
MiXL.Workbooks(archivo_excel).Activate

Ojo - para manipular los archivos no es necesario activarlos en un 99% de
los casos.

Saludos,
KL


"fer" wrote in message
news:
Hola grupo

tengo una aplicacion en acces donde abro un libro de excel, al momento
de empezar a operar el archivo me marca un error 9 en tiempo de
ejecucion.

la instruccion donde salta el error es:

Set MiXL = GetObject(archivo_excel)
MiXL.Windows(elite).Activate > aqui salta el error

lo he modificado por esta otra sin lograr lo que necesito

MiXL.application.Windows(archivo_excel).Activate

de que manera puedo instanciar al archivo de tal manera que pueda
ejecutar la manipulacion de varios archivos abiertos de excel desde
acces?

muchas gracias por la ayuda

Fernando

Preguntas similares