Excel for VBA：对象枚举循环For each
发布时间：2022-01-28 16:41:30
标签：工作,按钮,改名,童鞋,Excel函数
分享下所学的VBA。下面代码很适合财务童鞋做报表。
首先假定你的工作簿打开就是3个工作表的打开Excel，按alt+F11，进入编辑器，然后插入模块。
框里输入
Sub addchange() ‘添加9个然后统一改名为1-12月
Worksheets.Add Count:=9 ‘添加12-3个工作表，对象.方法（setting）
For Each tsheet In ActiveWorkbook.Worksheets’tsheet代表this sheet
i = i + 1’i从0开始
tsheet.Name = i & "月"’改名工作表的名称。
Next
End Sub
最后效果
点绿色按钮运行的。
是不是很神奇，一点按钮就实现了3个表变成12个，还改名1-12月。
肯定很多财务童鞋说大爱呀，哈哈。
0
投稿猜你喜欢
word如何更换证件照背景？如何实现简单又快速的修改证件照背景色呢？今天小Q教大家使用Word修改证件照背景，自己也能快速操作，再也不用请教- 在Excel中我们经常需要把表格里的内容进行拆分和合并，例如从word里面复制出来的目录，这些目录都有序号且在一个单元格里。今天，小编就教大
- 下图工作表A列和B列中记录了不同日期的交易数据，且随着时间的推移，交易数据会不断增加。接下来我们想在D2和E2单元格中动态获取A列和B列中的
- 查看手机wps文件内容一般都是左右滑动切换页面的，无法像实体书那样左右翻页，有翻书的效果，手机wps查看文件的方法如下：1.在手机上点击打开
- 说明鼠标双击功能区选项卡标题展开或折叠功能区，并展开时转到双击的选项卡。演示
- 我们在使用Win10系统时程序无响应怎么办？我们经常会遇到程序无响应的问题，程序卡死之后无法使用，多点几次就出现是否结束进程，或者直接闪退，
- 在我们使用的excel中，有着一些我们常用到的特殊字符，它能够很好的帮助我们制作表格。下面让小编为你带来excel表格横杠怎么插入的方法。e
- 接着为大家提供具体的操作步骤：1、我们本次的例子就是人事部经常会在月底计算员工的出勤情况，通过考勤机的软件导出类似如下图的数据，我们要对其进
- 如何在Word 2007中检查语法？除了检查拼写是否正确外，Word 2007还使您能够证明您的文档能够捕获语法错误。您可以在滚动文档时查看
- 在Excel中，我们经常根据现有的表格创建图表，以便更直观地显示数据。但是，并不是表格中的所有列都需要显示在图表中，有时甚至一些数据行也不需
- 电脑中的防火墙可以很好的保护我们的电脑，但是有些时候防火墙会影响我们玩游戏，所以很多用户会选择关掉防火墙，但是在关闭掉win10系统的防火墙
- Excel中柱状图里”系列1、系列2“叫做数据系列名称，编辑图表数据时可以为其指定或者输入自定义的名称。下面以Excel 2010为例进行演
- 玩转Word低成本双面打印.很多办公室和家庭使用的激光打印机都没有自动双面打印功能。为了节省纸张，手动双面打印也就成了无奈之举。但实际上，当
- onenote是一款很好用的笔记软件，onenote的同步功能给用户带去了很多方便，无论在家、在办公室还是外出办事，onenote都会将用户
- 今天教大家如何用Excel工作表计算这个小技巧，你可一定要掌握，非常的简单！！首先我们可以看到第1个工作表是加数1：然后第2个表呢是加数2，
- 将word文档中的文本转换成表格详细操作方法： 1、插入分隔符 (分隔符：将表格转换为文本时，用分隔符标识文字分隔的位置，或在将文
- win10系统怎么打开pdf文件呢？很多用户对此还不是很清楚，小编这里就给大家带来有关win10系统怎么打开pdf文件的回答，希望能够对大家
- 在wps表格中拆分窗口的方法打开示例表格。双击打开"综合素质录入系统.xls"表格。注：示例默认表格打开方式金山wps而
- 在平时的办公中，我们需要在文字或者段落之间添加水平线，来进行分隔。那么到底水平线怎么进行添加，今天就为大家介绍Word2007中怎样插入水平
- 在word中出现了很多横向，这种横线让读者阅读起来总是觉得很碍眼，那么在word中怎么将word 横线去掉呢？一般我们删除横线的方法就是直接
