Bonjour à tous,
Je sais que ce thème a été traité plusieurs fois, mais je ne m'en sors pas...
J'ai besoin de modifier les liens de la base sur le lecteur W vers une copie de la base qui se trouve sur le lecteur R
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4 zz = CurrentDb.TableDefs("T_Client").Connect CurrentDb.TableDefs("T_Client").Connect = Replace(zz, "W:\à classer", "R:\essai\à classer") CurrentDb.TableDefs("T_Client").RefreshLink CurrentDb.TableDefs.Refresh
Ce code ne plante pas, mais rien ne se passe....
Avez-vous une piste ?
Merci de m'avoir lu
Partager