Automation error

[avarghese]

Hi,

When I try to run a macro from Word (Tools->Macros->Run), I'm getting the
following error:
__________________________________________
Run-time error '-2147467259 (80004005)':

Automation error
Unspecified error
__________________________________________

When I debug, it goes to this line of code in my program:
ActiveDocument.CustomDocumentProperties.Add _
Name:="TemplateOpenExclude", LinkToContent:=False, Value:="True", _
Type:=msoPropertyTypeString

I'm using Microsoft Office 2003 Version 11.0, Build 6113.

This code works on other machines with other versions of Word. For eg., I
tried on version 11.5604.6360 and it works. It also works in Word 2002.

Any help is greatly appreciated

Thanks
Al

 

[Jezebel]

You get an error an error additing custom properties if the property already
exists. Safer coding is to delete the property first --

On error resume next
ActiveDocument.CustomDocumentProperties("TemplateOpenExclude").Delete
On error goto 0
ActiveDocument.CustomDocumentProperties.Add ...