| Home |
| Search |
| Today's Posts |
|
#8
Posted to microsoft.public.excel.programming
|
|||
|
|||
e-mail a range of cells as the body
it works perfectly thank you a lot.
-- Thank you... "Ron de Bruin" wrote: It will create a html file local Then read the html into the mail Delete the html So it will not be published on the web -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "EXCELMACROS" wrote in message ... Thank you, one question, your method is asking me to create an html file, how private is that? is that going to be published on the web? this is sensitive information. -- Thank you... "Ron de Bruin" wrote: See http://www.rondebruin.nl/mail/folder3/mail4.htm -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "EXCELMACROS" wrote in message ... I want to be able to add a Range of cells to the body of my email, I'm using the following method but I'm not getting it to work. Does anyone knows what I'm doing wrong? For x = 1 To 5 For y = 1 To 5 If Sheets("Values").Range("H" & x) = Date + y And IsEmpty(Sheets("Values").Range("N" & x)) Then email = Sheets("Values").Range("H" & x).Offset(0, 4).Select subj = "test" Set OutApp = CreateObject("Outlook.Application") OutApp.Session.Logon Set OutMail = OutApp.CreateItem(0) Set Text = Range("H" & x - 1 & ":K" & x + 4).SpecialCells(xlCellTypeVisible) With OutMail .To = email .CC = "" .Subject = subj .body = Text .Send End With Set OutMail = Nothing Set OutApp = Nothing Sheets("Values").Range("M" & x) = "e-mail sent" End If Next y Next x -- Thank you... |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Mailing an excel range in the body of an e-mail | Excel Discussion (Misc queries) | |||
| Convert to HTML and e-mail selection as the body of the e-mail. | Excel Programming | |||
| Paste excel range into a mail item's body | Excel Programming | |||
| Range of Cells to create body of email | Excel Worksheet Functions | |||
| Paste range of cells on E-maul Msg Body | Excel Programming | |||
Threaded Mode
