VBA Remover tela de login do SQL

Bom dia pessoal

tenho um access (2010), que possui duas tabelas vinculadas com o SQL.

sempre que executo, abre a tela de "Logon do SQL Server" pedindo usuário e senha.

o access verifica a data de atualização de varias tabelas e manda por e-mail para um grupo de pessoas.

so que quando executo o VBA que monta o corpo do e-mail, ele acessa as tabelas e com isso pede o usuário e senha.

Existe algum meio para essa tela não aparecer mais?

espero alguma luz de vocês....

desde ja agradeço a atenção.

Olá amigo. Post o seu código para o fórum poder analisar.

Sucesso.

segue o meu código:

Código:

Sub ENVIAR_EMAIL()

    Dim OutApp As Object
    Dim OutMail As Object
    Dim rst As DAO.Recordset
    
    Set OutApp = CreateObject("Outlook.Application")
    OutApp.Session.Logon
    Set OutMail = OutApp.CreateItem(0)

    Set rst = CurrentDb.OpenRecordset("UNION")
    strDestinatarios = "Ultima data de entrada do BMF: " & rst("DT_ENTRADA_BJ") & Chr(10)
    strDestinatarios = strDestinatarios & "Ultima data de entrada do OBF: " & rst("DT_ENTRADA") & Chr(10)
    strDestinatarios = strDestinatarios & "Ultima data de finalização do OBF: " & rst("DATA_FINALIZACAO")
    
    With OutMail
        '.from = "teste"
        .To = "teste"
        .Subject = "E-MAIL AUTOMATICO - Atualização das bases"
        .Body = "Bom dia," & Chr(10) & Chr(10) & "E-mail automatico, não responder ao mesmo." & Chr(10) & Chr(10) & _
                "Informativo do ultimo carregamento de informações nas bases." & Chr(10) & Chr(10) & strDestinatarios & _
                Chr(10) & Chr(10) & "Atenciosamente" & Chr(10) & Chr(10) & "UPP - Unidade de Processos e Performance"
        .Save
    End With

    Set OutMail = Nothing
    Set OutApp = Nothing

End Sub