该方法取自百度知道，该朋友给出函数，我详细写一下方法。
打开有文本框的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 执行即可！
转载：http://www.cnblogs.com/findw/p/3737343.html
Excel 2007 批量删除隐藏的文本框[转],布布扣,bubuko.com
原文：http://www.cnblogs.com/luyuwei/p/3907841.html