VBA Code to e-mail selection syntax

[victoria2207]

Good Afternoon, I have tailored the following code to enable me to e-mail a selection in my workbook to specified people at the push of a button:

With ActiveSheet.MailEnvelope
.Introduction = "These are the items Due or Late for Calibration - please review your items and confirm they have been actioned."
.Item.To = "email1@outlook.com;e-mail2@outlook.com"
.Item.Subject = "Calibration Items Due"
.Item.Send
End With

However, the list of e-mail addresses could be different as could the introduction. Is it possible to reference the text within a cell as the Introduction text and a cell which contains the full list of e-mail receipients rather than entering the e-mail addresses/text directly into the VBA code?

TIA

Vic2207

 

[Domenic]

Let's assume that A2 contains the introduction, and that B2 contains your list of email recipients, try...

With ActiveSheet.MailEnvelope
    .Introduction = Range("A2").Value
    .Item.To = Range("B2").Value
    .Item.Subject = "Calibration Items Due"
    .Item.Send
End With

Hope this helps!

 

[victoria2207]

Thanks Domenic - Works a treat.