Una forma de hacer eso, es en el formulario que abras al iniciarse la base de datos, compruebes que tienes acceso a una de las tablas vinculadas, y de no ser así, vincularlas
Dim db as database
DIm tdf as tabledef
Set db = CurrentDb()
For Each tdf In db.TableDefs
If Len(tdf.Connect) > 0 Then
' Es una tabla vinculada
tdf.Connect = ";DATABASE=" & cFileName
tdf.RefreshLink
End If
Next
MsgBox "Proceso finalizado", vbInformation
O algo así
Un saludo
