![]() |
|
#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
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
How to remove gap between text and footnotes on Mac?
|
gemmajackson7 | Word | 1 | 05-16-2021 07:26 AM |
How to Remove trailing spaces AND line breaks in a block of text
|
JulianS96 | Word | 4 | 02-04-2020 04:20 AM |
Remove Paragraph / Spaces
|
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 |