Excel vba给所有的工作表自动批量加页码,会计的有福啦

网友投稿 800 2022-12-03

excel vba给所有的工作表自动批量加页码,会计的有福啦

今天来分享一段有用而简单的excel编程代码。目的就是这个工作簿所有的工作表自动批量加页码。会计亲们有福啦。我们按快捷键alt+F11,进入vba的编辑器里。点插入模块。然后在这输入以下代码Sub 加页码() Dim i%For i = 1 To Sheets.Count ‘表示工作表数量Sheets(i).Range("d1") = i ‘固定在i1添加页码,i1代表你要的单元格位置。NextEnd Sub

Excel vba给所有的工作表自动批量加页码,会计的有福啦

效果就是

Excel vba给所有的工作表自动批量加页码,会计的有福啦

版权声明:本文内容由网络用户投稿,版权归原作者所有,本站不拥有其著作权,亦不承担相应法律责任。如果您发现本站中有涉嫌抄袭或描述失实的内容,请联系我们jiasou666@gmail.com 处理,核实后本网站将在24小时内删除侵权内容。

上一篇:Excel Vba正数数字批量换成文字
下一篇:如何在表格中筛选出每列数值最小的
相关文章