Hi
For Lotus see
http://www.excelkb.com/?cNode=1X5M7A
Btw: The code below you posted is CDO code that not use a mail program
See
http://www.rondebruin.nl/cdo.htm
--
Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm
"locochon2010" wrote in message ...
Can someone please let me know how to send an email from Excel VBA using
Lotus Notes? I have Outlook installed in the computer that will send the
email. I just need to know if Lotus Notes requires a diffrent code that the
SendMail code (by the way the code below is from Ron DeBruin blog):
Public Sub mySendmail()
Dim FileExtStr As String
Dim iMsg As Object
Dim iConf As Object
Set iMsg = CreateObject("CDO.Message")
Set iConf = CreateObject("CDO.Configuration")
With iMsg
Set .Configuration = iConf
.To = "
.CC = ""
.BCC = ""
.From = """Jenny"" "
.Subject = "My Subject for " & Format(myDate, "mmmm d")
.TextBody = "Please see attached." & Chr(13) & Chr(13) & "Jenny" &
Chr(13) & "My Job Description" & Chr(13) & "My Company" & Chr(13) & "My
Address" & Chr(13) & "Tel:(956) 867-4309" & Chr(13) & "
.AddAttachment myDir & myFile
.Send
End With
End Sub