Visual Basic - Correr macro de access desde Excel

Life is soft - evento anual de software empresarial
 
Vista:

Correr macro de access desde Excel

Publicado por Jonathan Rubin (1 intervención) el 22/02/2010 15:30:39
Que tal. Estoy teniendo un problema al querer correr una macro de access desde un codigo visual en Excel. Es raro porque la primera vez que llamo al access, corre bien la macro. Pero cuando quiero volver a llamar al mismo acces para correr otra macro, me tira el siguiente error: "Se ha producido el error '-2147417851 (80010105)' en tiempo de ejecucion: Error de automatizacion."

Creo yo que es un problema con el objeto que creo. Es como si lo pudiese usar una vez sola. Si alguien tuvo este problema, o sabe como resloverlo, les estare infinitamente agradecido.

Esta es la parte del codigo problematica:

patgestvinc='C:\....'
Dim vinc As Object
Set vinc = CreateObject("Access.Application")
With vinc
.OpenCurrentDatabase patgestvinc
.Run "Macroelim"
.Run "Vinculartxt"
.Quit
End With
Set vinc=Nothing



Cuando la corre por primera vez lo hace bien, pero cuando quiero volver a correr una de estas macros del acces, en otra parte del codigo, me tira el error.
En otra parte del codigo necesito correr esto por ejemplo, y ahi falla:

patgestvinc='C:\....'
Dim vinc As Object
Set vinc = CreateObject("Access.Application")
With vinc
.OpenCurrentDatabase patgestvinc
.Run "CREA_QUERYS"
.Quit
End With
Set vinc=Nothing

Muchas gracias! Saludos
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