[VBA Excel/Access] problème de fermeture instantannée d'Access

Bonjour,

J'ai un petit problème avec Access, ( tout d'abord je travail avec office 2003 et j'ai bien activé les librairies d'Access ) lorsque je lance Access via macro VBA Excel, Access se lance correctement puis se ferme directement dans la seconde qui suit 8O .
Voici mon code ( très simpliste j'attends de trouver une solution à ce problème avant de poursuivre mon dévellopement ) :

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16

Sub MacroooAccess() Dim acApp As Access.Application   ' Démarrer Access Set acApp = New Access.Application   ' Ouvrir la base de données concernée 'acApp.OpenCurrentDatabase ("U:\test.mdb")   acApp.Visible = True ''''' Quitter Access '''''''acApp.Quit ''''''Set acApp = Nothing     End Sub

---

Merci d'avance à celui qui trouvera :king: j'ai deja du mal a m'y mettre avec les macro access si en plus j'ai des prob logiciels :aie:

Edith ( Cresson...:mrgreen: ) : Quand j'ouvre Access par l'executable je n'ai pas ce problème

Essaie ça (fonctionne chez moi)
Fais ce test en pas à pas et laisse les deux dernières lignes sinon tu crées une instance qui ne sera pas fermée et que tu devras fermer dans le gestionnaire des tâches (Ctrl + Alt + Sup... etc.)

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

Sub AccessOuvrir() Dim acApp As Access.Application   ' Démarrer Access Set acApp = CreateObject("Access.Application")   ' Ouvrir la base de données concernée 'acApp.OpenCurrentDatabase ("U:\test.mdb")   acApp.Visible = True   ' Quitter Access acApp.Quit Set acApp = Nothing End Sub

---

PS - Bienvenue sur le forum ;)

Bonjour,

En fait j'ai rajouté quelques lignes de commandes et access les execute bien comme il faut donc en fait access se ferme automatiquement à la fin de la sub.

Je suppose qu'avec ton code access doit resté ouvert à la fin de celle-ci. J'essayerais quand ton code pour mon info personelle mais pour l'instant j'ai avancé sur mon projet et ce problème ne me dérange plus.

Merci en tout cas de ta réponse :D

Non, pour indication, avec mon code Access se ferme correctement en fin de sub.
A+