Search and Replace special characters between word using wildcards

mauuuuu5 · #1 08-23-2015, 07:08 PM

I have a Word document in which I want to replace the uppercase letters by accented ones.

For instance

subir fotos gratis

This happened due to an error when replace some characters and you can not undo it.

I tried with this option <?*[ó]*?> (just for the O letter), but I could not replace the words.

Best Regards

macropod · #2 08-23-2015, 09:20 PM

You could use a macro like:

Code:

Sub Demo()
Dim i As Long, StrFnd As String, StrRep As String
StrFnd = "A,E,I,O,U"
StrRep = "á,é,í,ó,ú"
With ActiveDocument.Content.Find
  .ClearFormatting
  .Replacement.ClearFormatting
  .Forward = True
  .Wrap = wdFindContinue
  .Format = False
  .MatchWildcards = True
  For i = 0 To UBound(Split(StrFnd, ","))
    .Text = "(<[A-Za-z]@)" & Split(StrFnd, ",")(i) & "(*>)"
    .Replacement.Text = "\1" & Split(StrRep, ",")(i) & "\2"    .Execute Replace:=wdReplaceAll
    .Execute Replace:=wdReplaceAll
  Next
End With
End Sub

The second '.Execute Replace:=wdReplaceAll' is to allow for the possibility that a given word might contain two of the same character to be converted.

For a manual wildcard Find/Replace, you'd use expressions like:
Find = (<[A-Za-z]@)A(*>)
Replace = \1á\2

Thread Tools
Show Printable Version Email this Page
Display Modes
Linear Mode Switch to Hybrid Mode Switch to Threaded Mode

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
best way to use search/replace wildcards in this scenario?	dylansmith	PowerPoint	3	03-04-2023 08:55 PM
Search all special characters in MS word 2007	dshrish	Word	3	03-28-2013 05:23 AM
Word 2010: Wildcards Replace	tinfanide	Word	2	09-10-2011 10:40 AM
Any wildcards search and replace in Powerpoint 2010?	tinfanide	PowerPoint	0	09-10-2011 02:17 AM
special/escape/insertion characters in word	manojbmsce	Word	0	09-25-2008 06:40 AM