Re: Help! A word feature is trying to drive me insane!

Gosh Greg it looks like you might be onto something here but "You can set
that option to off in a batch of files by running this macro:" I have no idea
what all this is. How do I run a macro? Figures they have to make turning it
off hard. Thanks for your help. Rianna



"Greg Maxey" wrote:

Rianna,

I had a similiar problem a few years back when I upgraged to Word2002. It
would happend when I opened documents created in an earlier version. The
culprit was Tools>Options>Save>Embed Smart tags.

If that option was checked, I would get the promt everytime.

You can set that option to off in a batch of files by running this macro:

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
Documents.Close SaveChanges:=wdPromptToSaveChanges
End If
'Get the folder containing the files
With Dialogs(wdDialogCopyFile)
If .Display <> 0 Then
PathToUse = .Directory
Else
MsgBox "Cancelled by User"
Exit Sub
End If
End With

If Left(PathToUse, 1) = Chr(34) Then
PathToUse = Mid(PathToUse, 2, Len(PathToUse) - 2)
End If

myFile = Dir$(PathToUse & "*.*")

While myFile <> ""
'Open each file and toggle SmartTags
Set myDoc = Documents.Open(PathToUse & myFile)
With ActiveDocument
.EmbedSmartTags = False
End With
'Close the file, saving the changes.
myDoc.Close SaveChanges:=wdSaveChanges
myFile = Dir$()
Wend

End Sub


--
Greg Maxey/Word MVP
See:
http://gregmaxey.mvps.org/word_tips.htm
For some helpful tips using Word.


Rianna wrote:
Hello, one of words features it trying to send me to the nut house so
I better try to do something about it. I use my word 2003 a lot.
Every single dratful time I open one of my word documents and try to
close it again it asks me if I want to save my changes. Even when I
have made NONE! It asks me every time! What good is it having the
save feature if it insists on asking you? Is there a way I can turn
this annoying feature off? Let me know please, I hope you know the
answer you will save me from this neverending torture. Rianna at
riannamay@xxxxxxx



.

Relevant Pages

  • Re: Updating docproperty value in multiple documents
    ... I found a macro for doing batch find and replace in a directory. ... a docProperty Word doesn't regonize the document has changed. ... Dim myFile As String ... Dim PathToUse As String ...
    (microsoft.public.word.docmanagement)
  • Re: Finding and Replacing a Certain Word from 100+ Documents
    ... Good Morning Greg, ... Word MVP web site http://word.mvps.org ... Dim FirstLoop As Boolean ...
    (microsoft.public.word.vba.general)
  • Re: Missing bookmarks
    ... documents and step through the macro one line at a time using the F8 key. ... Greg Maxey/Word MVP ... Dim oFrmFlds As FormFields ... Dim oStr As String ...
    (microsoft.public.word.vba.general)
  • Re: Long MsgBox -- need to display in 2 paragraphs
    ... The following pages of fellow MVP Greg Maxey's website: ... Doug Robbins - Word MVP ... Dim dbDatabase As Database ... MsgBox "Choose a search field", ...
    (microsoft.public.word.vba.general)
  • Re: Long MsgBox -- need to display in 2 paragraphs
    ... The following pages of fellow MVP Greg Maxey's website: ... Doug Robbins - Word MVP ... Dim dbDatabase As Database ... MsgBox "Choose a search field", ...
    (microsoft.public.word.vba.general)