Question

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

EXCEL表格中怎样批量才能重命名工作表命名左键点击 Thisworkbook 把函数代码复制需要操作的表格中 ： Sub 重命名 （ ） Dim i Fo

Answer 1

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

等返回 Excel表格中的界面，表格中函数在控件下可选择按钮函数控件

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