email Word DOC along with XL sheet?

C

CLR

Hi all.........
I can send the XL sheet(s) ok fine.........just don't know how to also
attach a Word Document...........

Any ideas please?

Vaya con Dios,
Chuck, CABGx3
 
C

CLR

Thanks Ron.....unfortunately I'm using Lotus Notes. My code came mainly from
you.....it works great, just need to add the word document attachment.


TempFilePath = ThisWorkbook.Path
TempFileName = "EmailTest"
With ActiveWorkbook
.SaveAs TempFilePath & TempFileName & FileExtStr
Dim emadd
emadd = EmailAddy 'Range("emailtemp!p18 ").Value
Dim INSTRUCTIONS
INSTRUCTIONS = "INSTRUCTIONS.DOC"
.SendMail emadd, "Supplier Report Card"
.Close SaveChanges:=False
End With

Range("data!q1:y25").Copy 'This is the cover sheet text for the email
'This SendKey string pastes the cover sheet Text into the email and steps
'out of the email client Lotus Notes.
SendKeys "^v" & "~"
Kill TempFilePath & TempFileName & FileExtStr

Any ideas?

Vaya con Dios
Chuck, CABGx3
 
C

CLR

Thanks Ron..........
It looks great, I'll give it a try...........

Vaya con Dios,
Chuck, CABGx3
 

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

Top