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

Preguntas similare

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

Respuesta Responder a este mensaje
#2 fer
13/09/2005 - 22:54 | Informe spam
KL muchas gracias por responder, sin lugar a dudas tu orientacion me
dio luces para lo que estoy haciendo, sin embargo tengo una pregunta
adicional, al momento de abrir el archivo excel, existe alguna
instruccion que me ayude a impedir o evitar que aparezca el mensaje de
excel cuando da aviso que el archivo contiene macros, esto con el fin
de seguir ejecutando las instrucciones de la macro, dandole la orden
desde acces?

muchas gracias de nuevo.

fer


KL ha escrito:

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
>
email Siga el debate Respuesta Responder a este mensaje
Ads by Google
Help Hacer una preguntaRespuesta Tengo una respuesta
Search Busqueda sugerida