Problems with outlook application

I think you may need to move this line down:

Please Login or Register  to view this content.

right now you create an email, send it and then there is no email to work with until you create a new one...

Put the above line of code inside the loop, just before

Please Login or Register  to view this content.

Thanks for marking the thread as solved

One workaround (I hate using sendkeys as a rule):
remove .Send from the earlier part of the email, and then change .Send to .Display and use sendkeys:

Please Login or Register  to view this content.

It won't work if you step through the code because the VBA window keeps focus and the %s is not sent to the outlook window, but if you run the code directly then it should work fine.

Like this:

Please Login or Register  to view this content.

Szwadron6 said:

...but now before sending each emails Outlook asks me for approval

For older versions of Outlook unfortunately, Arkadi's solution is probably correct.

The following link may help eliminate the message: https://support.office.com/en-us/art...ad=US&fromAR=1


To prevent the problem from occurring in Outlook 2016:
To prevent OutLook Security Message such as (and to remain secure):
a. A program is trying to send an e-mail message on your behalf, or
b. A program is trying to access e-mail addresses:
Make sure Anti-Virus software is up to date
Go to Windows 'Start' Menu
Right Click on 'Outlook 2016' and select 'Run as Administrator'
File > Options > Trust Center > Trust Center Settings > Programmatic Access
AntiVirus status : Valid' should be displayed in the middle of the Screen.

Lewis

Hmmm...
Not sure what I've done wrong but the result is still the same - outlook asks me for approval before sending each email even though I copied and pasted your whole code directly into vba. I use Run Sub button directly...