Mail a row to each person in a range (HTML) Index?

D

Donnie Stone

Mail a row to each person in a range (HTML) Index
(with the Outlook object model)
Ron de Bruin ( Last update 24 July 2004 )

Is it possible to use:
.Body = Nsh 'with a specified range of "B2:p2"?
Instead of: .HTMLBody = RangetoHTML2

Looking for a way to send the message in text, versus html.

Thanks,
Donnie


Set OutMail = OutApp.CreateItem(olMailItem)
With OutMail
.To = cell.Value
.Subject = "Grades Aug"
.HTMLBody = RangetoHTML2
.Send 'Or use Display
End With
Set OutMail = Nothing
Nsh.Cells.Clear
End If
Next cell

cleanup:
Application.DisplayAlerts = False
Nsh.Delete
Application.DisplayAlerts = True
Set OutApp = Nothing
Application.ScreenUpdating = True
End Sub
 

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

Similar Threads

Mail a row to each person in a range (HTML) - by Ron de Bruin 7
Mail a different file(s) to each person in a range 0
create HTML from a range 9
Macro works in one workbook but not in another 6
Macro to Paste Picture in email body from Clipboard 4
send sheet to email as html attachment 10
Mail Multiple Sheets via PDF Q 5
Converting an Excel file to PDF Q 1

Top