室内设计培训
平面设计培训
部落窝教育
网站首页 >> Excel教程 >> 文章内容

excel批量修改文本框里面的文字内容之方法

[日期:2013-12-03]   来源:IT部落窝  作者:IT部落窝   阅读:5162[字体: ]
内容提要:本文讲解使用编写一段代码来实现批量修改excel文本框里面的文字内容的方法.

   有会员询问在一个excel文档里面,插入了很多文本框,如果批量快速的将文本框里面的某一些文字修改为另外的文字?

  比如本文的案例:将excel文档文本框里面的:43278116频道,修改为:69247频道。如果批量迅速修改呢?
 批量修改excel文本框文字
  这种批量的操作已经超出了excel的常规操作,也就是使用excel内置命令是无法实现批量的,可以借助在VBE里面编写一段小代码实现。
  操作方法是:
  1.按下ALT+F11,打开VBE代码窗口。
  2.双击文本框所在的工作表名称,这里是SHEET1,然后在右边复制下面的代码:
Sub 文本框批量修改文字()
  Dim tb As Object
  For Each tb In ActiveSheet.Shapes
    If tb.Type = msoTextBox Then
      tb.DrawingObject.Caption = Replace(tb.DrawingObject.Caption, "43278116频道", "69247频道")
    End If
  Next
End Sub
  3.单击属性栏的“运行子过程”,快捷键是F5。关闭代码窗口,返回到excel工作表,可以看到我们想要修改的excel文本框里面的内容已经全部批量修改好了。
excel文本框文字内容批量修改
IT部落窝PS,CDR,213班 分享到: QQ空间 新浪微博 腾讯微博 人人网
photoshop教程
Photoshop教程
平面设计教程
Photoshop教程