有会员询问在一个excel文档里面,插入了很多文本框,如果批量快速的将文本框里面的某一些文字修改为另外的文字?
比如本文的案例:将excel文档文本框里面的:43278116频道,修改为:69247频道。如果批量迅速修改呢?
这种批量的操作已经超出了excel的常规操作,也就是使用excel内置命令是无法实现批量的,可以借助在VBE里面编写一段小代码实现。操作方法是:1.按下ALT+F11,打开VBE代码窗口。2.双击文本框所在的工作表名称,这里是SHEET1,然后在右边复制下面的代码:Sub文本框批量修改文字() DimtbAsObject ForEachtbInActiveSheet.Shapes Iftb.Type=msoTextBoxThen tb.DrawingObject.Caption=Replace(tb.DrawingObject.Caption,"43278116频道","69247频道") EndIf NextEndSub3.单击属性栏的“运行子过程”,快捷键是F5。关闭代码窗口,返回到excel工作表,可以看到我们想要修改的excel文本框里面的内容已经全部批量修改好了。





