View Single Post
 
Old 03-20-2017, 03:46 PM
macropod's Avatar
macropod macropod is offline Windows 7 64bit Office 2010 32bit
Administrator
 
Join Date: Dec 2010
Location: Canberra, Australia
Posts: 21,963
macropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond reputemacropod has a reputation beyond repute
Default

Quote:
Originally Posted by Ziad El Hachem View Post
I would really like to delete all blank lines along with the next 2 bad lines. I only know this is possible in VBA!
You almost certainly don't need VBA for this; a wildcard Find/Replace would most likely do the job, where:
Find = ([^13^l])[^13^l]{1,}
Replace = \1
This assumes there are no stray spaces, tabs, etc. in your 'blank' lines.
__________________
Cheers,
Paul Edstein
[Fmr MS MVP - Word]
Reply With Quote