![]() |
|
#1
|
|||
|
|||
![]() Many thanks,Gmaxey, for the code and explanations! And thanks a lot, Vivka, for the concise alternative to my code! |
#2
|
|||
|
|||
![]()
You are welcome!
|
#3
|
|||
|
|||
![]()
Hi, Gmaxey! I was trying to use part of your code, but I failed somehow. I cannot force it to insert the new line. Thanks!
Code:
Set oRng = ActiveDocument.Range With oRng.Find .Text = " (about" .Replacement.Text = "" If .Execute Then MsgBox "Found" If .Execute Then oRng.InsertBefore "^l" End With |
![]() |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
eduardb | Word | 1 | 08-10-2022 03:17 AM |
Search Word for specific strings and replace with hyperlinks from a list | jlive24 | Word VBA | 2 | 06-26-2022 08:14 PM |
Extracting Specific Text Strings | PWH68 | Word VBA | 6 | 10-08-2019 02:07 AM |
![]() |
ppayaw | Word VBA | 8 | 12-13-2016 08:11 AM |
![]() |
vikrantkale | Word | 1 | 03-28-2011 06:13 PM |