Visual Basic - Reporte Access 2010 o superior

Life is soft - evento anual de software empresarial
 
Vista:
sin imagen de perfil
Val: 1
Ha disminuido su posición en 60 puestos en Visual Basic (en relación al último mes)
Gráfica de Visual Basic

Reporte Access 2010 o superior

Publicado por Ricardo (73 intervenciones) el 29/08/2018 15:54:48
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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
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
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