Code VBA incorrect après division données / GUI (erreur 3219)

Bonjour,

Je viens de scinder ma base et mon interface utilisateur, en utilisant l'assistant "Fractionner une base de données".
Désormais j'obtiens une erreur 3219 avec les quelques lignes suivantes :

Code:

---

1 2 3 4 5 6

Dim oDb As DAO.Database Dim oRst As DAO.Recordset   Set oDb = CurrentDb Set oRst = oDb.OpenRecordset("maTable", dbOpenTable)

---

Le mode debug indique que l'erreur est sur l'instruction OpenRecordset.

Ce code fonctionnait parfaitement avant que je scinde le fichier...
CurrentDb est-il à proscrire lorsque l'application est scindée ?

Merci pour votre aide.

Bonjour
C'est le dbOpenTable qui pose problème Essaye avec le dbOpenDynaset

Code:

---

1 2 3 4 5

Dim oDb As DAO.Database Dim oRst As DAO.Recordset   Set oDb = CurrentDb Set oRst = oDb.OpenRecordset("maTable", dbOpenDynaset)

---

--------------
Frédéric
http://www.access-developpement.com

Bonjour,

C'est le type qui n'est pas utilisable avec des tables liées (voir l'aide).

Essaie avec :

Code:

---

Set oRst = oDb.OpenRecordset("maTable", dbOpenDynaset)

---

Domi2

C'était bien ça, merci à vous deux :ccool: