EXCEL表格中怎样批量才能重命名工作表命名-excel表格网

2019年09月24日 16:44
EXCEL表格中怎样批量才能重命名工作表命名

左键点击 Thisworkbook 把函数代码复制需要操作的表格中 ： Sub 重命名 （ ）  Dim  i  For  i  =  1  To  Sheets . (计数表/不需要写)Count  Sheets （ i ） . Name  =  Sheets （ 1 ） . (细胞/不需要写)Cells （ i ,  1 ） (下一个结束节)Next  End  Sub  返回  Excel  操作页面 ， 在按钮控件指定“宏”时  点击  “其他”  单元格  就会使得  按钮处有变动 点击 Thisworkbook

复制 代码 ： Sub 重命名（） Dim i＆ For i = 1 To Sheets.Count Sheets（ i ） . Name  =  Sheets （ 1 ） . Cells （ i ,  1 ） Next End Sub
等返回 中的界面，表格中函数在控件下可选择按钮函数控件

鼠标点击 其他的单元格使按钮变成可用状态 ，在按钮点击时，表格已经就处于批量重命名表格名称了。