有时候在工作中,在一个EXCEL工作簿中有一个原始的工作表格模板,但工作需要,需要将这个模板复制多份成为多个工作表,如果数量较多,一个个的慢慢复制比较慢。那很简单的一段VBA代码即可搞定。 工作簿中的一个工作表模板 按Alt+F11进入VBE,插入模块,写上上面这小段代码即可 运行宏 输入数量 我输入了3,最终就成了将第一张表复制了三次的工作簿 当然,这个就是简单的写了写,需要完善之处还有很多,由于就是一个简单的复制,就不细写了。但可以提醒几点: 1、在输入复制工作表个数的输入框里,如果不是数字或输入的数字小于0; 2、如果运行宏后我不想复制了,单击了取消按钮; 3、我如果不是复制第一张工作表呢。。。 |
|