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