RON wrote:

I wrote a little routine:

Private Sub Test()
Dim ThisEmail As Object
Dim ol As Object
Set ol = CreateObject("Outlook.Application")
Set ThisEmail = ol.ActiveInspector.CurrentItem 'Errror 91 here
end sub

which I run from ThisOutlookSession (Outlook 2003).

But even this, emits a Error 91 Object variable not set error.

Outlook is open to the inbox.

This is not the programnming group. You want
news://msnews.microsoft.com/microsof...ok.program_vba . I have
set the follow up to that group.
--
Brian Tillman

Please don't call CreateObject from within Outlook VBA. There's one
Application object already created that you should use.

ActiveInspector is valid if there's at least one Inspector opened, whereas
the object that shows folders (the Inbox e.g.) is called Explorer. So what
you probably want to access is the ActiveExplorer property.

--
Viele Gruesse / Best regards
Michael Bauer - MVP Outlook
Keep your Outlook categories organized!
http://www.shareit.com/product.html?...4&languageid=1
(German: http://www.VBOffice.net/product.html?pub=6)


Am Tue, 9 Jan 2007 15:42:42 -0500 schrieb Brian Tillman:

RON wrote:

I wrote a little routine:

Private Sub Test()
Dim ThisEmail As Object
Dim ol As Object
Set ol = CreateObject("Outlook.Application")
Set ThisEmail = ol.ActiveInspector.CurrentItem 'Errror 91 here
end sub

which I run from ThisOutlookSession (Outlook 2003).

But even this, emits a Error 91 Object variable not set error.

Outlook is open to the inbox.

This is not the programnming group. You want
news://msnews.microsoft.com/microsof...ok.program_vba . I have
set the follow up to that group.