Ggf. klappt das so:
Beim Start der Access-Anwendung gehst du durch jede verknüpfte Tabelle und trägst in die Verbindungseigenschaften zusätzlich "UID=XXX;PWD=YYY" ein bevor auf die Tabellen zugegriffen wird.
Das selbe gilt auch für vorhandene SQL-Passthrou-Abfragen.
Leider lassen sich eben UID und PWD nicht permanent speichern.

Public Sub StartApp()
Dim xTable As TableDef

For Each xTable In CurrentDb.TableDefs
If InStr(1, xTable.Connect, "ODBC", vbTextCompare) > 0 Then
xTable.Connect = xTable.Connect & ";UID=XXX;PWD=YY;"
End If
Next

Dim xQuery As QueryDef
For Each xQuery In CurrentDb.QueryDefs
If InStr(1, xQuery.Connect, "ODBC", vbTextCompare) > 0 Then
xQuery.Connect = xQuery.Connect & ";UID=XXX;PWD=YY;"
End If
Next
End Sub