Your question, your audience. Choose who sees your identity—and your question—with question security.
Word macro to find and replace % to percent conditionally
Hello, I would like to get some assistance in writing a find and replace Word 2007 macro from the folks here. I would like the macro to perform two conditional operations.
First, for any text that is not enclosed by ( ) or [ ] find the % sign and change it to the word 'percent' without the single quotes.
Next, find any instances of percent enclosed by ( ) or [ ] and change this to the % symbol.
Any help would be greatly appreciated as always.
Thanks,
Bev
First, for any text that is not enclosed by ( ) or [ ] find the % sign and change it to the word 'percent' without the single quotes.
Next, find any instances of percent enclosed by ( ) or [ ] and change this to the % symbol.
Any help would be greatly appreciated as always.
Thanks,
Bev
Asked:
2-
2
1 Solution
Hi Graham, thanks so much for the response here is an example:
When I said any text I mean that the whole word document would be scanned for these changes. Sorry if there was confusion by the vague wording.
Before correction:
This is an example paragraph in which % is used incorrectly. However if someone uses parentheses then (percent) should use a symbol instead. This should be the case even if large amounts of text are in parentheses. [This example of percent should be informative %]. So basically percent is spelled out whenever not enclosed by parentheses or brackets.
After correction:
This is an example paragraph in which percent is used incorrectly. However if someone uses parentheses then (%) should use a symbol instead. This should be the case even if large amounts of text are in parentheses. [This example of % should be informative %]. So basically percent is spelled out whenever not enclosed by parentheses or brackets.
When I said any text I mean that the whole word document would be scanned for these changes. Sorry if there was confusion by the vague wording.
Before correction:
This is an example paragraph in which % is used incorrectly. However if someone uses parentheses then (percent) should use a symbol instead. This should be the case even if large amounts of text are in parentheses. [This example of percent should be informative %]. So basically percent is spelled out whenever not enclosed by parentheses or brackets.
After correction:
This is an example paragraph in which percent is used incorrectly. However if someone uses parentheses then (%) should use a symbol instead. This should be the case even if large amounts of text are in parentheses. [This example of % should be informative %]. So basically percent is spelled out whenever not enclosed by parentheses or brackets.
Sorry for the delay. It was quite difficult to find text that is not in brackets. Hopefully you aren't already using highlighting because this code uses temporary highlighting to differentiate.
Sub Percent()
Dim rng1 As Range
Set rng1 = ActiveDocument.Range
Application.Options.DefaultHighlightColorIndex = wdYellow
With rng1.Find
.MatchWildcards = True
.Text = "\(*\)"
.Replacement.Highlight = True
.Execute Replace:=wdReplaceAll
.Text = "\[*\]"
.Replacement.Highlight = True
.Execute Replace:=wdReplaceAll
.MatchWildcards = False
.Text = "percent"
.Highlight = True
.Replacement.Text = "%"
.Execute Replace:=wdReplaceAll
.Text = "%"
.Highlight = False
.Replacement.Text = "percent"
.Execute Replace:=wdReplaceAll
End With
ActiveDocument.Range.HighlightColorIndex = wdNoHighlight
End Sub
Question has a verified solution.
Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.
Have a better answer? Share it in a comment.
Join & Write a Comment Already a member? Login.
Featured Post
Tackle projects and never again get stuck behind a technical roadblock.
Join Now
"for any text that is not enclosed by ( ) or [ ] ". 'Any text' is a bit vague. It could be a whole document, a paragraph, a word, one character or anything in between.
For that which is already enclosed, what needs to be changed to a % symbol?
Perhaps a few examples would help.