Excel 2007 批量删除隐藏的文本框

该方法取自百度知道,该朋友给出函数,我详细写一下方法。

打开有文本框的excel文件。

按 Alt+F11 打开编辑器。

将下面的函数复制进去:

Sub deltxbox()
Dim s As Shape
For Each s In ActiveSheet.Shapes
If s.Type = msoTextBox Then s.Delete
Next
End Sub

然后按 F5  执行即可!

上一篇:js实现页面与页面之间传值的几种方法优劣


下一篇:IDEA下利用Jrebel插件实现JFinal项目main方法【热加载】