You need other code for that

See the Outlook Object model section on this page
http://www.rondebruin.nl/sendmail.htm


See this in the code
.Attachments.Add ("C:\test.txt")



--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Thanks" wrote in message ...
I'm sending out a new mail message and attaching the current excel worksheet.
I would like to also include a pdf file from a seperate folder. This is the
code for the attachment of the excel document. What else would I have to
include to find the pdf and place in the same email? Thanks !

Dim mySend As Integer
mySend = MsgBox("Would you like to send document by email?", vbYesNo)
If mySend = vbNo Then
Exit Sub
End If
Application.Dialogs(xlDialogSendMail).Show


End Sub