disbale features after word 97

[Melissa]

Hi there,

We received some code from a developer that was supposed to set a variety of
settings when word is first opened or when a document is created or opened,
and since receiving it the disable features box in Tools, options, save keeps
becoming checked when we try to save. Even if I open the document and check
that it is off, when I try to save the document it becomes checked.

I thought that it was the following code that determines whether it is
checked or not (which appears in my normal.dot template and my startup.dot
template), but can't understand why the box becomes checked on the save.

Should I be looking for something else that is causing this?

Sub AutoOpen()
With ActiveDocument
.DisableFeatures = False
.Compatibility(wdDontUseHTMLParagraphAutoSpacing) = False
End With
End Sub

Sub AutoNew()
With ActiveDocument
.DisableFeatures = False
.Compatibility(wdDontUseHTMLParagraphAutoSpacing) = False
End With
End Sub

Any suggestions would be very welcomed, as this is causing headaches across
the office.

Thank you,
Melissa

 

[Beeawwb]

Hi Melissa,

Not sure if this will help, but when I ran the Macro recorder to see what
functions were changed when I ticked the box (I've never had it ticked
before), the options that look relevant to me are...

With Options
.DisableFeaturesbyDefault = True
.DisableFeaturesIntroducedAfterbyDefault = wd80
.OptimizeForWord97byDefault = True
End With
With ActiveDocument
.DisableFeatures = True
.DisableFeaturesIntroducedAfter = wd80
.OptimizeForWord97 = True
End With

Maybe check that .DisableFeaturesIntroducedAfter isn't being used anywhere
in the code...?

Sorry I can't be of any more assistance,

-Bob

 

[Russ]

Melissa,
I would search for the word
Disable
In the whole project code.

What you showed, is code that runs when first opening the docs.
You may have other code that is intercepting commands to save, for example,
that are changing the option.