Microsoft Office Forums - View Single Post - [Solved] Delete the graph based on its character number

eduzs · 02-28-2018, 03:00 AM

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

Backup your original files before do any modifications or test, test before use, use at your own.