Macro doesn't automatically resolve All email address when email is drafted

Ok So I found a Macro to send the emails --however I still have to click the 'Check Name' tab in outlook to validate the addresses from my exchange server.
how do I add this to the macro to do it for me?
here is the code..

Sub Mail()
    Dim OutlookApp As Object
    Dim Mess As Object, Recip
    Recip = Range("E8")
    Set OutlookApp = CreateObject("Outlook.Application")
    Set Mess = OutlookApp.CreateItem(olMailItem)
    With Mess
        .Subject = "Subject"
        .Body = "Body"
        .To = Recip
        .Display
        End With

End Sub


TRIED to use Resovle ALL but that doesnt work.. Help!