Send emails through VBA but skip outlook "Yes" button

I

itsyash

Hi All,

I am using the following code to send emails from VBA. However, where I
do so, an outlook box opens up saying "A program is trying to
automatically send email on your behalf. Do you want to allow this?"

After this unless the user clicks on "Yes" button the email is not
sent.

ActiveWorkbook.EnvelopeVisible = True
Worksheets("Template").Activate
With ActiveSheet.MailEnvelope
.Item.To = "(e-mail address removed)"
.Item.Cc = emailadd
.Item.Subject = "Appraisal Form for " & TextBox5.Value
.Item.Send
End With

Is there a way to skip this step as I need to code a macro which
identifies deviations in a continous loop and sends emails as and when
it finds some deviations.

Thanks in advance,
Yash
 
V

Varadharajan

Hi

Give a try with Application.SendKeys method in ur Code.

U will be able to send various key combinations to the application ur
initiation

for complete details check the HELP on sendkeys method.

thanks
Varadhan
 
I

itsyash

Hi Varadharajan,

Thanks for the suggestion. However, my code will have to check various
conditions every minute and sendkeys may not the best option for this.

Please let me know if there are other options too.

Thanks,
 
S

Sriram

Yash,

Please tell me are you going to send the file as soon as it reaches some
sort of values. You'va mentioned some sort of deviations occur in the loop
then it should get automaticallt mailed.

Please tell me what sort of deviations you want to verify, whether those are
in code or in some cells of an excel sheet?

Please tell me, so that I can proceed further in giving you a solution.

If you wish, you can send a sample mail to me on the below mail id.
(e-mail address removed)

Regards,
Sriram
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top