New Find/Replace Wildcard Needed

rsrasc · #1 11-11-2014, 07:48 AM

I would like to know how to put the following info into a find/replace wildcard

A: A.
B: B.
C: C.
D: D.

to be replace with

A.
B.
C.
D.

Thanks!

gmaxey · #2 11-11-2014, 09:05 AM

Here is a recorded macro. I normally don't use Selection.Find:

Code:

Sub Macro1()
'
' Macro1 Macro
'
'
  Selection.Find.ClearFormatting
  Selection.Find.Replacement.ClearFormatting
  With Selection.Find
    .Text = "([A-D]: )([A-D].)"
    .Replacement.Text = "\2"
    .Forward = True
    .Wrap = wdFindContinue
    .Format = False
    .MatchCase = False
    .MatchWholeWord = False
    .MatchAllWordForms = False
    .MatchSoundsLike = False
    .MatchWildcards = True
  End With
  Selection.Find.Execute Replace:=wdReplaceAll
End Sub

rsrasc · #3 11-11-2014, 09:46 AM

Thanks Mr. Maxey! Working great!

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Wildcard Find and Replace	Ulodesk	Word	1	06-23-2014 10:26 AM
Wildcard Find/Replace deletes extra character	Cosmo	Word	1	06-20-2014 08:49 AM
Need help using WildCard Find & Replace	Cayce	Word	1	06-09-2014 04:17 PM
How to replace this word file using wildcard	zhangzujin361	Word	1	01-18-2014 08:02 PM