![]() |
|
|
|
#1
|
|||
|
|||
|
You can try a VBA macro code like that:
Code:
Sub x()
Dim MyPara As Paragraph
For Each MyPara In ActiveDocument.Paragraphs
If MyPara.Range.Characters.Count <= 4 Then MyPara.Range.Delete
Next MyPara
End Sub
|
|
#2
|
||||
|
||||
|
A wildcard Find/Replace macro would be far faster - even a recorded one would be faster than your code.
__________________
Cheers, Paul Edstein [Fmr MS MVP - Word] |
|
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
count a number of cells based on the beginning of a order number
|
Kubi | Excel | 2 | 08-06-2017 08:54 PM |
Delete Character on Single Line Only
|
Tye30 | Word VBA | 8 | 04-20-2017 08:40 PM |
Delete starting number *) and delete Unneeded data in series
|
frustrated teacher | Word VBA | 5 | 12-07-2014 06:53 PM |
| first character NOT Alpha numeric or Tilde (~) delete. | ksridh | Word VBA | 5 | 03-17-2014 12:45 AM |
| graph changes number when losing embedded link | Alaska1 | Excel | 0 | 08-14-2013 11:31 AM |