My experiece was this was only a problem when opening files on my desktop
(Office2002) that had been created on my laptop (Office2000). I suppose if
it is unchecked in the template then new files created would be unchecked.
You can run this macro to turn it off on all files in a directory:
Public Sub BatchToggleEmbedSmartTabs()
'Sets embeded SmartTag off in all files in a directory
Dim myFile As String
Dim PathToUse As String
Dim myDoc As Document
'Close any documents that may be open
If Documents.Count > 0 Then
'Get the folder containing the files
If .Display <> 0 Then
PathToUse = .Directory
MsgBox "Cancelled by User"
If Left(PathToUse, 1) = Chr(34) Then
PathToUse = Mid(PathToUse, 2, Len(PathToUse) - 2)
myFile = Dir$(PathToUse & "*.*")
While myFile <> ""
'Open each file and toggle SmartTags
Set myDoc = Documents.Open(PathToUse & myFile)
.EmbedSmartTags = False
'Close the file, saving the changes.
myFile = Dir$()
A peer in "peer to peer" support
To e-mail, edit out the "w...spam" in XXXX@XXXXX.COM