Hello，大家好，今天有粉絲留言問到如何批量更改工作表名稱，因為他有十幾個工作薄，每個工作薄都有一百多個工作表，需要為名稱增加年份，一個一個修改估計需要五六個小時，太浪費時間了。
不知道大家在工作中有沒有遇到類似的問題呢？今天就跟大家分享一下我們如何批量更改工作表名稱
一、獲取工作表名稱
首先我們需要新建一個工作表，將它放在所有工作表的第一個位置，并命名為修改名稱。然后點擊公式找到定義名稱，在名稱中輸入tx然后在引用位置中輸入=GET.WORKBOOK(1)點擊確定
緊接著我們在A1單元格中輸入函數=INDEX(tx,ROW(A1)),向下填充數據，這樣的話我們得到的是工作薄名稱加上工作表名稱
二、批量為工作表名稱添加數據
然后我們在b1單元格中輸入修改名稱然后按快捷鍵ctrl+e使用快速填充來提取工作表名稱，繼續在c1單元格中輸入2019修改名稱，然后繼續按ctrl+e為工作表名稱批量添加2019，緊接著我們將A列的數據刪除
三、使用vba批量更改工作表名稱
我們點擊修改名稱這個工作表名，然后點擊鼠標右鍵選擇查看代碼然后輸入代碼
Public Sub 修改名稱() For i = 2 To Worksheets.Count Worksheets(i).Name =Cells(i, 2).Value Next End Sub
然后我們點擊運行，將vba窗口都關閉，再回到表格中就會發現，工作表名稱已經被批量的修改了
最后我們只需要將修改名稱這個工作表刪掉然后點擊保存即可，在這里我們用宏表函數提取工作表名稱，然后利用vba批量修改名稱，如果以后再工作中遇到類似的問題，直接套用即可
怎么樣？你學會了嗎？
我是Excel從零到一，關注我持續分享更多excel技巧
