Access 2013, tables liées, répertoire courant Fermé

Question

Bonjour, 

Je cherche une solution pour le gestionnaire des tables liées.  En effet, je travaille parfois sur un poste fixe et parfois sur le réseau.

Comme la modification des macros et des modules est trop long sur le réseau, je mets la Base de données et les tables sur mon poste.  Mais je dois à chaque fois refaire les liens du gestionnaire des tables liées.  Alors, est-ce qu'il y a un moyen rapide de modifier les liens?  Est-ce qu'il y a une procédure VBA que je pourrais utiliser?

Merci à l'avance de votre aide

yg_be · Answer

bonjour, source d'inspiration:
Public Sub Fix_Table_Locations()
    Dim tbl As TableDef, db As Database, strConnect As String

Set db = CurrentDb

For Each tbl In db.TableDefs
        If InStr(tbl.Connect, "Portion of connect string to change") > 0 Then
            tbl.Connect = Replace(tbl.Connect, "Portion of connect string to change", "New portion of connect string")
            tbl.RefreshLink
        End If
    Next
End Sub

Access 2013, tables liées, répertoire courant

1 réponse

Discussions similaires