Bonjour,
J'essaye d'appliquer cette page:
https://docs.microsoft.com/fr-fr/off...deproject.path

Ce simple exemple n'est pas fonctionnel.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
 
Sub Test()
    MsgBox "The current database is located at " & Application.CurrentProject.Path & "."
End Sub
Ou est l'erreur?

Cordialement