Beverly,
The following lines are taken from an XL routine which creates email
messages in Lotus Notes.

Dim oItem As Object

Set oItem = oDoc.createrichtextitem("BODY")

oItem.embedObject 1454, "", AttachFile, "mail.rtf"

I think the embedObject command is what you want.
If this doesn't work, I can send the full routine code (BTW, it has been
posted a number of times - you can find it with a Google search).

Regards,
Alex J


"Beverly" wrote in message
...

I have tried Andy Wiggins solution to automatically sending messages to
Lotus and it works except for attaching an Excel file. Below is a request I
sent to Andy. Does anyone have any ideas on solving this.

Andy-
Do you have any help for me....I am using LotusNotes and I get your
program to work except for attaching files.
I generate Error 438 which says Objects doesn't support this method or
property....or something like that. Can you help me?

-Beverly