Access - Cerrar access y cerrar sesión de W2k

¿Como puedo ejecutar una función de Cerrar la sesión de windows, cerrando correctamente la aplicación de access previamente?

Me explico, con el evento de un botón para cerrar que tengo en el formulario, tengo el siguiente código:

Private Sub cmdCerrar_Click()
On Error Resume Next
DoCmd.Quit
CerrarSesión 'Función que cierra la sesión de W2k
End Sub

El problema es que cuando ejecuta DoCmd.Quit, termina el código y no Cierra la sesión, y si quito esta instrucción y cierro la sesión forzando el cierre de Access, no se cierra correctamente y me deja abierto el fichero .ldb.
Alguien me da una solución???

Gracias

Para cerrar Access correctamente antes de cerrar la sesión de Windows, puedes usar la función `Quit` de Access y luego hacer un retraso de unos segundos antes de cerrar la sesión.

Puedes probar con este código:


Este código espera dos segundos después de cerrar Access antes de llamar a la función `CerrarSesion` para cerrar la sesión de Windows. Puedes ajustar el tiempo de espera según tus necesidades.

Ten en cuenta que este enfoque no garantiza que todos los procesos de Access se hayan cerrado completamente antes de cerrar la sesión de Windows, por lo que es posible que aún se mantengan algunos bloqueos de archivo. Para una solución más robusta, puedes considerar usar un controlador de errores de Windows para capturar la excepción "El archivo de bloqueo no se pudo eliminar" que se produce al cerrar una sesión de Windows mientras aún hay archivos bloqueados.