修法布施得聰明智慧，多分享讓生活更美好。上次我們分享了如何快速生成工作表目錄，在實際操作中，有時還需要對大量的工作表進行批量改名。那么在Excel中如何高效處理這一問題呢？接下來將分享詳細的操作方法。

修法布施得聰明智慧，多分享讓生活更美好。上次我們分享了如何快速生成工作表目錄，在實際操作中，有時還需要對大量的工作表進行批量改名。那么在Excel中如何高效處理這一問題呢？接下來將分享詳細的操作方法。

打開Excel并設(shè)置宏

首先打開 Microsoft Office Excel 2007，新建文檔并保存文件名為“Excel批量工作表改名.xlsm”（以下代碼適用于能運行宏的工作簿）。然后按下快捷鍵ALT F11打開VBA（宏）編輯界面，點擊菜單欄【插入】中的【模塊（M）】，插入一個模塊1，在代碼框中粘貼以下代碼：

```vba

Sub 當前工作薄批量工作表改名()

Dim mb(), c As Long, r As Long, i As Long

mb Selection

r UBound(mb, 1)

c UBound(mb, 2)

On Error Resume Next

If c 2 Then

For i 1 To r

If mb(i, 1) <> "" And mb(i, 2) <> "" Then

Sheets(mb(i, 1)).Name mb(i, 2)

End If

Next i

End If

End Sub

```

實際操作步驟

1. 返回到工作表窗口，選擇數(shù)據(jù)（一列工作表名和一列要修改的工作表名，行一一對應(yīng)）。

2. 運行【當前工作薄批量工作表改名】宏（在菜單欄中點擊【視圖】，在下拉列表中選擇【宏】，打開宏對話框，選中該宏名稱執(zhí)行）。

3. 工作表會秒速完成批量修改的操作，操作過程如圖所示。

如果這篇文章對您有幫助，請不吝投下您寶貴的一票或收藏支持我們！若仍有疑問，歡迎點擊下方的“我有疑問”，謝謝您的閱讀與支持！