Delete all Paragraph Marks except bullets, using Range
问题 I need to delete all paragraph marks of ActiveDocument except: The one which is having Bold-Font after. (Example is in picture, attached) Bullet-Point paragraph marks. By using Ranges I came up with the following Code. It works well, but it is not detecting the bullet points. What should I do? I am beginner to use Ranges . Sub PARAGRAPHSmark() Dim PARA As Range Dim p As Range Set PARA = ActiveDocument.Range PARA.MoveEnd wdCharacter, -1 Do Set p = PARA.Duplicate p.Find.Execute "^13" PARA.Start