Bonjour,
Il ya qque temps, sur ce forum, il m'avait été donné le code suivant (qui fonctionne bien) pour obtenir le nom du projet
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim appAccess As Access.Application
Set AppAccess = New Access.Application
appAccess.OpenCurrentDatabase base
appnom= appAccess.VBE.ActiveVBProject.Name
J'ai depuis tenté en vain de faire l'inverse, çàd modifier le nom du projet par code, avec
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
Dim appAccess As Access.Application
Set AppAccess = New Access.Application
appAccess.OpenCurrentDatabase base
appAccess.VBE.ActiveVBProject.Name=appnom
sans succès.

Question : cette opération est-elle possible ? Si oui, comment ?
Merci
Amitiés