Disable features introduced after Microsoft Word 97

[Ward]

Please,

I have a large custommer. They use Word2003 world wide . Under Tools,
Options, Save As, they have checked "Disable features introduced after:
Microsoft Word 97".

They want from me a template, with 2003 table colors, and nested tables, and
other 2003 extra's.

So in ThisDocument from my Test.dot template i wrote:
Private Sub Document_New()
With ActiveDocument
.DisableFeatures = False
.OptimizeForWord97 = False
End With
With Application.Options
.DisableFeaturesbyDefault = False
.OptimizeForWord97byDefault = False
End With
Application.DefaultSaveFormat = ""
MsgBox "Word 2003 features are now enabled"
End Sub

This works perfect: if you look under tools, options save, the "Disable
features..." is turned OFF. Until you save the new document: "Disable
features..." will be turned on and the new document will be saved in Word97
format!

Reproduce?
1 Create Test.dot (with code above) and place a nested table in it, for easy
testing.
2 I closed Word, and deleted my Normal.dot (to be sure), and started Word
again.
3 Create a new blanc document, and set "Disable features introduced
after..." to ON.
4 Close Word. (Normal.dot is saved with the Disable Feature function ON.)
5 Start Word again.
6 Create a new document based on the Test.dot. OK, this document wil have
the Disable Features turned OFF, thats expected and correct.
7 Now save the document, and Bingo, the Disable Features After Word 97 are
turned ON again! So nested table is gone...

 

[Ward]

I discovered that if Word is not started yet, and you dubble click the
Test.dot template, the Document_New macro will correctly set for all
documents the "Disable features introduced after: Microsoft Word 97" (under
menu Tools, Options, Tab Save) to False.

If Word was already started (so the "Disable features ..." is set to True),
and you dubble click Test.dot to start a new Test1.doc you see that for
Test1.doc "Disable features..." is indeed set to False, but during the saving
of Test1.doc, "Disable features..." will be reset to True.

Question: How can i make sure that all documents based on Test.dot are saved
in with all Word 2003 features?

 

[Ward]

I found a solution!

With ActiveDocument
.DisableFeatures = False
.SmartTagsAsXMLProps = False
End With

Don't know why but the SmartTagsAsXMLProps seems to be essential!

Ward