Attach Sheet and Send Mail VBA

[GK039]

Hi all,

There is an older thread about emailing attachments through vba but i cant get through.

The code is working perfectly but when its get to this point

<code>

Set MItem = OutlookApp.CreateItem(olMailItem) 'Create Mail Item
With MItem
.To = EmailAddr
.Subject = Subj
.Body = msg
.Attachments.Add....... (red dots to indicate the problem)
.Send
End With


the email is sent without the attachment. I've tried to pass a string argument, something like

.Attachments.Add StrPathName

OR to hard code the path, something like

.Attachment.Add ("H:\metro\[Appraisal File General Managers.xls]Report3") but again the mail is sent without the attachment

Any help is appreciated

Thanks

George
</code>

 

[meldoc]

Hello

See the link.

http://www.rondebruin.nl/sendmail.htm

 

[GK039]

Hi

Thanks for the hint. I'll check the link

George

Hello

See the link.

http://www.rondebruin.nl/sendmail.htm

 

[GK039]

Hi again,

Thanks a lot for the link. Its working great

George

Hello

See the link.

http://www.rondebruin.nl/sendmail.htm