191问答库 > word2003如何批量删除图文框啊！！！不要复制的，要实际能用的！！！

word2003如何批量删除图文框啊！！！不要复制的，要实际能用的！！！

2024-11-05 02:24:45

推荐回答（5个）

回答1：

复制以下所有文字，添加宏后运行即可：

Sub 删除全部文本框()
'
' 删除全部文本框，保留文字
'
Dim i As Shape
For Each i In ActiveDocument.Shapes
i.ConvertToFrame
Next
Dim ii As Frame
For Each ii In ActiveDocument.Frames
ii.Delete
Next

' 取消所有框线
' ------------ 注：若文章当中存在有用的框线，请删除下边8行字句 ---------
Selection.WholeStory
With Selection.ParagraphFormat
.Borders(wdBorderLeft).LineStyle = wdLineStyleNone
.Borders(wdBorderRight).LineStyle = wdLineStyleNone
.Borders(wdBorderTop).LineStyle = wdLineStyleNone
.Borders(wdBorderBottom).LineStyle = wdLineStyleNone
.Borders(wdBorderHorizontal).LineStyle = wdLineStyleNone
End With
' ------------注：若文章当中存在有用的框线，请删除上边8行字句---------

End Sub

回答2：

在OFFICE2010下面可以实现，但是不知道2003可不可以，你可以试下，在编辑模式下Ctrl+A然后Ctrl+X，然后选择性粘贴-->无格式文本，这样就好了，你可以试试

回答3：

全选剪切选择性粘贴无格式文本

回答4：

按SHIFT或CTRL可以并选

回答5：

ctrl+A

点 DEL即可