Visual Basic para Aplicaciones - Reporte Access 2010 o superior

Buenas tardes a todos.
Estoy haciendo una aplicación en la cual debo ejecutar un informe en access 2010, he logrado en el pasado ejecutar reportes de access 2003, pero usando el mismo codigo, y la libreria de que dispongo 14.0 no nunciona, no tira error, lee, ejecuta el informe y habilita el servicio pero nunca pasa a la próxima linea de codigo osea nunca cierra la bd por tanto se clava la aplicación.-
código que uso

Option Explicit
Dim oAccess As Object

Private Sub mnuBuscar:Click()

Dim acc As Access.Application
Set acc = New Access.Application

With acc
.OpenCurrentDatabase App.Path & "\ExportarExelLocal.accdb", False
.DoCmd.OpenReport "inf_Buscar", acViewPreview ' (nf_Buscar)nombre del informe
.CloseCurrentDatabase
.Quit
End With

Set acc = Nothing

End Sub

Hola, buenos días.

¿Estas totalmente seguró de que la base de datos esta bien?
es decir ¿que no tiene ninguntipo de problema con el nombre del origen de datos del informe?

Te recomiendo que le agreges una sola linea de codigo para ver que está haciendo access y ver si el problema no esta en la base de datos.

Solo tendrias que poner: acc.Visible=True

Espero que esto te de una idea de pueda estar pasando.

Saludos.

ya lo solucione, el problema es que tenia estas 2 lineas en el codigo

.CloseCurrentDatabase
.Quit

abria y cerraba al toque, cerre la base al cerrar el informe y se solucionó....

gracias por el aporte, ahora estoy renegando con la ejecución de una macro que hice y no puedo ejecutarla desde vb6, si tenes alguna idea te lo agradecería

saludos

Pero a que tipo de macro te refieres?

Macro de datos.
Macro de incrustada.
Macro normal.
Macro de VBA.
???

tengo una base access 2010 e hice una macro en acces la cual ejecuta una serie de consultas complejas las cuales corren mucho mas rapidas si las corre el motor de base de datos.
Por eso quiero dar la orden de ejecución desde mi aplicación de vb6, y no doy pie con bola,

el codigo que tengo es el siguiente


si tenes alguna observación, escucho, graciasssss

Si la macro que vas a ejecutar es de VBA lo que tienes que hacer es lo siguiente:

Call Obj_Access.Run(Nombre de la función o sub, parametros...)

Esto va en vez de:

Obj_Access.RunMacro

Espero que te haya servido.