O VBA é uma maneira de fazer isso. Siga estas etapas:
- guia Desenvolvedor
- Macros (novo título como "RemoveShapes" (ou o que você quiser))
- clique em "mais"
- copiar / colar (abaixo)
- run (basta selecionar essa macro na próxima vez)
For i = ActiveDocument.Shapes.Count To 1 Step -1
ActiveDocument.Shapes(i).Delete
Next i
credit: link