LinkBack Thread Tools Search this Thread Display Modes
Prev Previous Post   Next Post Next
  #1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 49
Default Crappy message when using the "recipients" property

My excel VBA sends some files it's just created to a number of e-mail
addresses specified in one of the worksheets.

I understand why outlook warns before sending the mail from excel and other
applications, but can I stop the other message re trying to access addresses
from my adress book? The address book doen't really come into play, I have
addresses in the lists. I'm using exchange (not SMTP) so I don't think I can
use CDO.

Here's the code fwiw:

Sub EmailOutOps()
Dim objOutlook As Object
Dim objMailItem As Object
Dim objRecipient As Object
Dim objNameSpace As Object

Set objOutlook = CreateObject("Outlook.Application")
Set objNameSpace = objOutlook.GetNamespace("MAPI")
objNameSpace.Logon , , True

Set objMailItem = objOutlook.CreateItem(0)

'reference the "email" worksheet to get recipient names
For Each c In Range("emailops")
If c.Text < "" Then
objMailItem.Recipients.Add (c.Text)
Else
Exit For
End If
Next c

'set the other mail criteria
objMailItem.Subject = "Haulage for " & Range("date")
objMailItem.Body = "File attached"
objMailItem.Attachments.Add ("I:\Accounting\Daily Tonnes\DailyReports\" &
Range("date") & "-ops.xls")
objMailItem.Send

Set objOutlook = Nothing
Set objNameSpace = Nothing
Set objMailItem = Nothing

End Sub



 
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On


Similar Threads
Thread Thread Starter Forum Replies Last Post
"excel "macros may be disabled" message using an xlam file frustrated Excel Worksheet Functions 2 July 13th 09 08:32 PM
Excel - Golf - how to display "-2" as "2 Under" or "4"as "+4" or "4 Over" in a calculation cell Steve Kay Excel Discussion (Misc queries) 2 August 8th 08 01:54 AM
Multiple "Range" with "Cells" property? jopu[_2_] Excel Programming 3 November 18th 04 04:05 PM
Multiple "Range" with "Cells" property? jopu Excel Programming 2 November 18th 04 02:38 PM
"Select Column method or property not available because some/all of object doesn't refer to table" Steven Rosenberg Excel Programming 0 August 18th 03 04:41 AM


All times are GMT +1. The time now is 12:29 PM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
Copyright ©2004-2025 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"