Imprimir página | Cerrar ventana

Eventos que han dejado de funcionar

Impreso de: Foro de Access y VBA
Categoría: Access y VBA
Nombre del foro: Access y VBA
Descripción del foro: Foro de programacion en Access (Con código y sin código)
URL: http://www.mvp-access.com/foro/forum_posts.asp?TID=86179
Fecha de impresión: 16/Abril/2024 a las 11:07


Tema: Eventos que han dejado de funcionar
Publicado por: Eduard.2008
Asunto: Eventos que han dejado de funcionar
Fecha de publicación: 23/Noviembre/2021 a las 11:28
Buenos día a todos.
Los 2 eventos que adjunto han dejado de funcionar en uno de los equipos, mientras que en el resto no dan ningún problema.

Private Sub Total_DblClick(Cancel As Integer)
Me.TOTAL = Me.PendentPagament.Form.pendent
End Sub

Private Sub ORDEN_DblClick(Cancel As Integer)
Dim ruta0 As String
    ruta0 = "U:\GESTION\F-REB\" & Me!ORDEN & ".PDF"
    stAppName = "EXPLORER " & ruta0
    Call Shell(stAppName, 1)
End Sub
  
La única diferencia entre equipos es que todos corren windows 10 excepto en el equipo que falla.

Muchas gracias


-------------
Muchas gracias por vuestra ayuda.
www.ofp.cat


Imprimir página | Cerrar ventana