Ensure macro operates in the right doc window

macropod · #2 10-31-2012, 08:59 PM

Your code should run against whichever document is active at the time. That said, it could be reduced to:

Code:

Sub subCurlyQuots() 
   '
   ' CurlyQuotes Macro
   '
   '
  With ActiveDocument.Content.Find 
      .ClearFormatting 
      .Replacement.ClearFormatting 
      .Text = """" 
      .Replacement.Text = "^&" 
      .Forward = True 
      .Wrap = wdFindContinue 
      .Format = False 
      .MatchCase = False 
      .MatchWholeWord = False 
      .MatchWildcards = False 
      .MatchSoundsLike = False 
      .MatchAllWordForms = False 
      .Execute Replace:=wdReplaceAll 
      .Text = "'" 
      .Execute Replace:=wdReplaceAll 
  End With  
End Sub

PS: When posting code, please use the code tags. They're on the 'Go Advanced' tab.

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Research window that won't go away.	kaetsdz	Word	3	08-08-2012 07:24 PM
ensure I have an 8.5x11 sheet	Taylor	Word	3	10-09-2011 12:39 AM
Problem with window	Zakhary	Word	1	05-22-2011 01:24 PM
Date pop-up window	Roshan Hanief	Word	0	04-23-2011 04:16 AM
How to ensure that each line ends only at the margin	sparemejava	Word	9	02-06-2011 03:21 PM