![]() |
#1
|
|||
|
|||
![]()
The following code does its job, but is there a more efficient way to obtain the same result? Thanks!
Code:
Dim oRng As Range Dim iType As Integer For iType = 1 To 2 Set oRng = ActiveDocument.StoryRanges(iType) With oRng.Find .ClearFormatting .Text = " ^p" While .Execute oRng.Characters.First.Delete oRng.Collapse wdCollapseEnd Wend End With Next iType |
|
![]() |
||||
Thread | Thread Starter | Forum | Replies | Last Post |
![]() |
gemmajackson7 | Word | 1 | 05-16-2021 07:26 AM |
![]() |
JulianS96 | Word | 4 | 02-04-2020 04:20 AM |
![]() |
sharina1985 | Mail Merge | 1 | 10-05-2019 03:52 AM |
big spaces appearing automatically in certain parts of the text - how to remove them | pratodifuoco | Word | 2 | 05-26-2017 12:55 PM |
editing text and remove spaces | romanticbiro | Word VBA | 5 | 07-04-2014 07:42 PM |