|
|
Thread Tools | Display Modes |
#1
|
|||
|
|||
Using VB Regex feature, I tried to replace 'the' and 'this' with 'that' but got screwed
I tried to replace 'the' and 'this' with 'that' by using VB Regex feature on Word with the applied strings (ie. document) having font size mostly 10 and 18 for titles, but it resulted in entire strings having font size 18, although the regex seems works correctly (I can't read well)
Sub Regex_Replace Dim re As Object, match As Object, matches As Object Set re = CreateObject("VBScript.RegExp") With re .Global = True .IgnoreCase = True .Pattern = "(th)(e|is)\b" ActiveDocument.Range.Text = .Replace(ActiveDocument.Range.Text, "$1at") End With End Sub I can't read the document now as it got messed up and screwed with crammed words with font size 18. How to solve it? Sincere help would really be appreciated |
#2
|
||||
|
||||
You don't need RegEx - or even a macro - for that. A wildcard Find/Replace, with:
Find = <th[eis]{1,2}> Replace = that will do. That said, it's not apparent how your font sizes or reference to titles (both of which can be accommodated in a wildcard Find/Replace) have to do with what you're doing, as your code discloses nothing about that.
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
#3
|
|||
|
|||
How I avoid from messing around finding 'thes', 'thee', thie, etc.
|
#4
|
||||
|
||||
It's not as if those aren't valid words... so why would you expect to find them with that Find expression?
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
Tags |
regex |
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
Section numbering screwed up | scorpio_oz | Word | 7 | 04-06-2016 06:02 AM |
Macro help regex | subspace3 | Word VBA | 1 | 10-15-2014 09:53 AM |
Convert RegEx to Word (Devanagari Font Find/Replace) | gasyoun | Word VBA | 9 | 04-12-2013 04:15 PM |
2007 recent update screwed up view | abrad99 | Office | 5 | 05-07-2011 09:55 PM |
Regex in Word: Replaced strings are in disorder | chgeiselmann | Word | 0 | 04-26-2009 11:33 AM |