Collegare tabelle database esterno protetto

Ciao a tutti,
per la prima volta tento di collegare tabelle che risiedono in un database diverso e  protetto da password (access 2003).
La prima domanda che mi sono posto è perchè la maggioranza dei post, nei vari forum, parla di Ricollegare invece che collegare.
Sicuramente esiste una spiegazione che non so.

Io ho un database con le tabelle e, per ora, un database vuoto dove verranno inserite le varie query, etc.
Seguendo il classico wizard di access posso linkare le varie tabelle esterne ma volevo seguire la strada del VBA.
Come tutte le prime volte ho usato il classico copia-incolla di qualcosa già fatto per  poi provare che tutto vada bene e cercare di capire cosa accade.
Ho trovato questa routine e tutto sembra funzionare.

Private Sub Comando0_Click()
On Error GoTo Err_Comando0_Click

 Dim db As Database, n As Integer, TableArray() As String
 Dim TFileName As String, LinkedTable As TableDef, i As Integer

        Set db = CurrentDb
'Percorso Database esterno
TFileName = "percorsodatabase_be.mdb"
        DoCmd.Hourglass True
        n = 2
        ReDim TableArray(1 To n)
' Tabelle esistenti sul database esterno...
        TableArray(1) = "Nome tabella 1"
        TableArray(2) = "Nome tabella 2"
       
' ... che si vogliono collegare al database corrente con lo stesso nome
        For i = 1 To n
        Set LinkedTable = db.CreateTableDef(TableArray(i))
        LinkedTable.Connect = ";DATABASE=" & TFileName & ";PWD=tuapassword perBE;"
        LinkedTable.SourceTableName = TableArray(i)
        db.TableDefs.Append LinkedTable
        Next i
        db.TableDefs.Refresh
        DoCmd.Hourglass False
 
Comando0_Click_Exit:
    Set td = Nothing
    Set db = Nothing

Exit_Comando0_Click:
    Exit Sub

Err_Comando0_Click:
    MsgBox Err.Description
    Resume Exit_Comando0_Click
   
End Sub

Questo implica, comunque, di  scrivere un elenco di tutte le tabelle nell'array e non è comodo.
Poi ho dei problemi se la tabella risulta essere gia collegata.
Leggendo un vecchio post, si parlava di utilizzare una tabella di appoggio ma decisamente non sono riuscito ad assemblare il tutto in una Sub valida.
Qualcuno può presentarmi uno script con relative spiegazioni.
Grazie