Recherche:

40 Set db = CurrentDb
50 Set VTable = CurrentDb.TableDefs(PTable)


Ton code ne change rien.
Tu déclares, tu affectes mais tu n'utilises pas...



Attention à bien fermer les objets...

Bonjour,

Il ne faut jamais utiliser currentdb directement, tu dois toujours l'utiliser depuis une variable, comme ceci :



Dim db As DAO.Database

Set db = CurrentDb