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表格中的界面，表格中函數在控件下可選擇按鈕函數控件
鼠標點擊 其他的單元格使按鈕變成可用狀態 ，在按鈕點擊時，表格已經就處於批量重命名表格名稱了。