Thread: Excel & Outlook
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
gti_jobert[_108_] gti_jobert[_108_] is offline
external usenet poster
 
Posts: 1
Default Excel & Outlook


Hi all,

I have a Mail Sub to send emails to suppliers with attached orders;


Code:
--------------------

Sub SendAnEmailWithOutlook(CurrFile)

Dim olApp As Outlook.Application
Dim olMail As MailItem

Set olApp = New Outlook.Application
Set olMail = olApp.CreateItem(olMailItem)

With olMail
.To = "
.CC = "
.Subject = "Textron Schedule Agreements: " & Right(CurrFile, 13)
.Attachments.Add CurrFile & ".xls"
.Display
.OriginatorDeliveryReportRequested = True
.ReadReceiptRequested = True
End With

Set olMail = Nothing
Set olApp = Nothing

End Sub

--------------------


I want to be able to find out (from excel) whether or not the user
actually sent this mail to the supplier - is this possible?

TIA


--
gti_jobert
------------------------------------------------------------------------
gti_jobert's Profile: http://www.excelforum.com/member.php...o&userid=30634
View this thread: http://www.excelforum.com/showthread...hreadid=544734