send excel sheet to email recipients contained on the sheet

hello folks,

im looking for help to run a macro that will email the excel book to whosever name is containing in columns. for eg

if a list of emails addresses is contained in column M i need to run a macro to send the book to these list of emails. there will be different number of columns/emial addresses every day so i need to be able to send the email to everyone listed in the column. 1 email address will be contained in every cell in column M.

anyone help?

hello,

i've used the following code:


Sub SendActiveWorkbook()


Dim MyArr As Variant

MyArr = Range("M1:M100")

ActiveWorkbook.SendMail _
Recipients:=MyArr, _
Subject:="test"

End Sub


but in the range M1:M100 it says in all the cellls eg.

"EMAIL:jblogs@email.com"


i just what to use jblogs@email.com

how do i just select this from the cell? is there anyway i can write in the code above select characters from 7 on???

For:

is there anyway i can write in the code above select characters from 7 on???

Try:

Please Login or Register  to view this content.