Envio de email sem bloqueio do Outlook - Security Warnings

Tenho um Access dispara emails automátivos, pelo Outlook, mas cada email o usuário é obrigado a confirmar as mensagens de segurança do Outlook ( security warnings ).
Até sei como desabilitar a mensagem entrando no Outlook, mas não posso fazer isso para as dezenas de usuários que irão usar. Precisa fazer via código VB. ALguém sabe onde buscar isso.
segue meu código de envio:

Function EMAIL_TESTE()

EMAIL_1 = "MEU_EMAIL@GMAIL.COM"
'---------------
'Sub SendMessage()
Dim objOutlook As Outlook.Application
Dim objOutlookMsg As Outlook.MailItem
Dim objOutlookRecip As Outlook.Recipient
Dim objOutlookAttach As Outlook.Attachment
Set objOutlook = CreateObject("Outlook.Application")
Set objOutlookMsg = objOutlook.CreateItem(olMailItem)
'----------------------------------------------------------------------------------
With objOutlookMsg
Set objOutlookRecip = .Recipients.Add(EMAIL_1)
objOutlookRecip.Type = olTo
'----------------------------------------------------------------------------
CORPO = "EMAIL AUTOMÁTICO!!!"
CORPO = CORPO & Chr(13) & "TESTANDO ENVI ODE EMAIL"

.Subject = "TESTE - IGNORAR - ENVIO AUTOMÁTICO"
.Body = CORPO & vbCrLf & vbCrLf
.Importance = olImportanceHigh 'High importance
.Save
.Send
End With
'----------------------------------------------------------------------------------
Set objOutlook = Nothing
EMAIL_1 = ""
End Function