Nom du projet modifiable par code ?

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:

---

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:

---

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

Bonjour,
D'après l'aide

Code:

---

Application.SetOption "Project Name", "MonProjetAccess"

---

Merci Oleff,
Je vais regarder cela de plus près.
Amitiés

Bonjour Oleff,
J'ai appliqué ta méthode et c'est OK, mais il ne faut pas oublier de refermer l'application après, pour que la modif soit prise en compte.
D'autre part GetOption remplace avantageusement

Code:

---

appnom= appAccess.VBE.ActiveVBProject.Name

---

Merci pour ton aide qui m'a permis de découvrir cette méthode qui semble pouvoir s'appliquer à toutes les options, si j'en crois l'aide Access, mais reste à trouver le terme correspondant à l'option (comme "PrjectName" pour "Nom du projet" !
Amitiés