I can't get macros to run in Outlook. Even the sample macros from the help
file fail. Even this simple macro

Sub MoveItems()
Dim myOlApp As New Outlook.Application
Dim myNameSpace As Outlook.NameSpace
Set myNameSpace = myOlApp.GetNamespace("MAPI")
End Sub

results in

Run-time error '-2147467259(80004005)':
Automation error
Unspecified error

When I step into the macro, it fails on line 3: Set myNameSpace...

Anyone have any recommendations? I upgraded from Win 2000 to Win XP, but was
able to keep Outlook 2003. I also tried the Office 2007 upgrade, changed my
mind, and reinstalled Outlook 2003. Would any of that have cause the wrong
scripting engine to run? Any ideas at all?

Certainly an upgrade from Office 2003 to 2007 and then back again could mess
up lots of things. In general the MVPs recommend completely uninstalling
Office 2003 before installing Office 2007 and then creating a brand new
profile for Outlook 2007 (not copying an existing profile).

I'd try the Office repair and see if that helps.

--
Ken Slovak
[MVP - Outlook]
http://www.slovaktech.com
Author: Professional Programming Outlook 2007.
Reminder Manager, Extended Reminders, Attachment Options.
http://www.slovaktech.com/products.htm


"mmapes" wrote in message
...
I can't get macros to run in Outlook. Even the sample macros from the help
file fail. Even this simple macro

Sub MoveItems()
Dim myOlApp As New Outlook.Application
Dim myNameSpace As Outlook.NameSpace
Set myNameSpace = myOlApp.GetNamespace("MAPI")
End Sub

results in

Run-time error '-2147467259(80004005)':
Automation error
Unspecified error

When I step into the macro, it fails on line 3: Set myNameSpace...

Anyone have any recommendations? I upgraded from Win 2000 to Win XP, but
was
able to keep Outlook 2003. I also tried the Office 2007 upgrade, changed
my
mind, and reinstalled Outlook 2003. Would any of that have cause the wrong
scripting engine to run? Any ideas at all?