如何删除 Microsoft Word 中的所有形状

Question

我想删除word中的所有形状。我能怎么做？请帮我。

我用红色标记来看看：

Answer 1

VBA 是一种方法。按着这些次序：

• 开发者选项卡
• 宏（新标题为“RemoveShapes”（或任何你想要的））
• 点击“加号”
• 复制/粘贴（如下）
• 运行（下次只需选择该宏）

For i = ActiveDocument.Shapes.Count To 1 Step -1  
    ActiveDocument.Shapes(i).Delete  
Next i

信用：https://social.msdn.microsoft.com/Forums/en-US/a514a54a-fc33-4c8b-9e9c-1f179b5e1d46/word-vba-to-delete-all-shapes ?forum=isvvba