Find and replace text with wildcards

macropod · #1 06-29-2019, 11:51 PM

In your attachment, you've replaced the string of spaces before the paragraph break, plus the paragraph break, with a single non-breaking space and a manual line break. The Find/Replace expression I posted didn't cause that. As for your question about the code itself, there's no .Execute line and there's nothing to indicate whether you're using wildcards. That said, at least one of the expressions wouldn't work unless you change the .UseWildcards state.

arunchandar9 · #2 06-30-2019, 12:25 AM

Quote:

Originally Posted by macropod

In your attachment, you've replaced the string of spaces before the paragraph break, plus the paragraph break, with a single non-breaking space and a manual line break. The Find/Replace expression I posted didn't cause that. As for your question about the code itself, there's no .Execute line and there's nothing to indicate whether you're using wildcards. That said, at least one of the expressions wouldn't work unless you change the .UseWildcards state.

Is that right? I'm just beginner working on Word Macro.

Sorry for pressing you more on Weekend!!

Code:

With wdDoc
  .ConvertNumbersToText (wdNumberAllNumbers)
  With .Range.Find
    .ClearFormatting
    .Replacement.ClearFormatting
    .Forward = True
    .Format = False
    .Wrap = wdFindContinue
    .MatchWildcards = True
    .Text = "^w^p"	
    .Replacement.Text = "^p"
    .Execute Replace:=wdReplaceAll
    .Text = "([0-9]{1,})[!^13]@| ([A-Z]{2}_[A-Z0-9^13]{8,9}>)^13"^p"

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Dissecting a hyperlink with Find Replace Wildcards	WeyldFalcon	Word	4	11-15-2016 12:48 PM
Using wildcards in Find/Replace to change font/case	angie450	Word	2	05-26-2016 11:09 AM
Using wildcards how do I Find and Add to, not replace	Stargehzer	Word	3	01-25-2016 09:14 PM
Find & Replace: Wildcards (except this pattern)	tinfanide	Word	6	01-26-2014 06:39 AM
wildcards in find & replace to reverse word order	jeffk	Word	3	11-11-2012 01:47 PM