Email with Notes

[Nigel]

I am trying to setup to email a spreadsheet thru notes, I have everything
worked out EXCEPT for the send to I have tried the following

emailsendto=emailadd


emailadd is a range in a spreadsheet (email b2)

the format is
"(e-mail address removed),","(e-mail address removed),","(e-mail address removed)"

but it is only sending to the first name

Now I could set the range to B2:b11, but not sure of the syntax


any help would be appreciated

 

[Ron de Bruin]

As far as i know this will work


Dim MyArr As Variant
MyArr = ThisWorkbook.Sheets("Sheet1").Range("A1:A20")


Then use MyArr in the sendto line