Not using the default email address

trevorc · #1 12-14-2021, 05:29 PM

Hi All,

I have a strange problem with my email, i use several email accounts and have changed the default one to match my office login details, When i run the code below in uses the wrong email address even though that is not the default.

Code:

        Dim MailOutLook
        Dim olmailItem
        Dim AppOutLook
        Set AppOutLook = CreateObject("Outlook.Application")
        Set MailOutLook = AppOutLook.CreateItem(olmailItem)
        With MailOutLook
            .To = Intersect(acrow, tblColumns("Email Address").Range)
            .Subject = " "
            .Body = "Hi " 
            .Display
        End With
        Exit Sub
    Else
    End If

trevorc · #2 12-14-2021, 05:48 PM

All good now, Outlook is using the Data file default for some reason and not the default email address, i changed this and it uses the correct email now.
So for all you ppl out there using sendonbehalfof you don't need to for this case.

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Hide Email Address of Previous Email when Replying or Forwarding	bondingfortoday	Outlook	0	03-05-2016 04:29 PM
Add link to email address that hides the actual address or makes it inaccessible to online bots	richiebabes	Word	1	09-03-2014 03:22 PM
Macro to send from non-default email address	k.n.	Mail Merge	5	12-03-2013 03:22 AM
Setting default "from" email address	Jammmers	Outlook	0	02-23-2012 12:14 PM
Default Home Address over Business Address	DunnDeal	Outlook	1	12-03-2010 04:56 PM