Can I customize emails using excel files

R

Robert Shreve

I am interested in doing bulk mailings for my customers on amazon and
ebay. I would like to send out mail using data from excel spreadsheets
to create a template that will extract the cells to make a customized
email for each sale. And thoughts on how this can be done? I've
checked out a few bulk emailers, but I'd rather use all MS Office
products. Gracias
 
D

Dave Cortright

I am interested in doing bulk mailings for my customers on amazon and
ebay. I would like to send out mail using data from excel spreadsheets
to create a template that will extract the cells to make a customized
email for each sale. And thoughts on how this can be done? I've
checked out a few bulk emailers, but I'd rather use all MS Office
products. Gracias

Use the Data Merge Manager in Word. The data source can be an Excel
spreadsheet and the target can be an e-mail message.
 
B

Bernard Rey

Robert Shreve wrote :
I am interested in doing bulk mailings for my customers on amazon and
ebay. I would like to send out mail using data from excel spreadsheets
to create a template that will extract the cells to make a customized
email for each sale. And thoughts on how this can be done? I've
checked out a few bulk emailers, but I'd rather use all MS Office
products. Gracias

Here's a couple of lines that should help you: It takes address, subject and
content from three cells on each row, but you can certainly customize it
easily to match your own requirements (you may use the same subject for
every message, several rows if different items sold, etc.)

This is a VBA macro, so you'd copy it to a VBA module. You can even attach
it to a toolbar button or menu item if you like. If you're not too familiar
with Visual Basic, feel free to ask a bit more about it.

--------------- cut along the dotted line --------------------

Sub SendMyBills()
' create and send messages using the values in col A, B & C
' of an Excel spreadsheet, start form row 2
For i = 2 To ActiveSheet.UsedRange.Rows.Count
TheAddress = Cells(i, 1).Value
TheSubject = Cells(i, 2).Value
TheContent = Cells(i, 3).Value
TheString = "tell application ""Microsoft Entourage"" " & _
vbCr & "make new outgoing message with " & _
"properties {address:""" & TheAddress & _
""", subject:""" & TheSubject & _
""", content:""" & TheContent & """}" & _
vbCr & "move the result to out box folder" & _
vbCr & "end tell"
temp = MacScript(TheString)
Next i
End Sub
 
Top