Como executar Seek e Index em tabelas vinculadas

(P) Posso executar comandos Seek e Index em tabelas vinculadas?

Autor: Michel Walsh

(R) Diretamente, NÃO. Mas você pode usar a função a seguir, que permite que isso seja feito.

(Cuidado com as continuações de linha. É uma única linha de código.)

'************ Início do Código ***************
'Este código foi escrito originalmente por Michel Walsh.
'Ele não deve ser alterado ou distribuído,
'exceto como parte de um aplicativo.
'Use-o a vontade em qualquer aplicativo,
'desde que esta nota de copyright não seja alterada.
'
'Código cortesia de 
'Michel Walsh

 Public Function OpenForSeek(TableName As String) As Recordset
' Assume que seja uma tabela MS-ACCESS
    Set OpenForSeek = DBEngine.Workspaces(0).OpenDatabase _
                    (Mid(CurrentDb().TableDefs(TableName).Connect, _
                    11), Fa28-Oct-2005  11:25bOpenTable)
End Function
'************ Final do Código ***************
            

Just use:
    Dim rst as Recordset
    set rst=OpenForSeek("TableName")

and you can use rst.Seek and rst.Index on linked table TableName.