I have an Access 2003 Database that sends emails with attachments to the Drafts folder for review. We then created a macro (in Outlook 2003) to cycle through the emails in the Drafts folder, opening each one & clicking the SEND button.
Office 2007 was installed, and the Outlook 2007 macro is now now longer working.
HELP!!! Did the sendkeys sequence change?
'This macro sends all selected messages from the Drafts Folder,
'for emails generated from the TMA Database
Dim olExplorer As Outlook.Explorer, _
olSelection As Outlook.Selection, _
olItem As Outlook.MailItem
Dim x As Integer
Set olExplorer = Application.ActiveExplorer()
Set olSelection = olExplorer.Selection
If olSelection.Count > 0 Then
For x = olSelection.Count To 0 Step -1
If x <> 0 Then
Set olItem = olSelection.Item(x)
Set olItem = Nothing
Set olSelection = Nothing
Set olExplorer = Nothing