如何基于Excel中的單元格值重命名工作表？

重命名工作表通常在我們的Excel工作中應用，但是您是否曾經嘗試過根據單元格值重命名工作表？ 當然，您可以手動重命名工作表，但是在本教程中，我們將介紹一些技巧，這些技巧可以根據單元格值快速重命名多個工作表，從而節省您的工作時間。

使用VBA根據特定單元重命名工作表

使用重命名多個工作表來基于特定單元格重命名工作表

使用重命名多個工作表根據一系列單元格內容重命名工作表

使用VBA根據特定單元重命名工作表

使用下面的VBA，您可以基于特定單元格重命名相對工作表。

1.選擇要基于其重命名工作表的單元格，在這種情況下，選擇單元格A1。 看截圖：

2。 按 Alt + F11鍵 打開鑰匙 Microsoft Visual Basic應用程序 窗口。

3。 點擊 插頁 > 模塊，然后將以下VBA代碼粘貼到新 模塊 窗口。

VBA：根據特定的單元格值重命名工作表。

Sub RenameSheet()UpdatebyKutools20191129Dim xWs As WorksheetDim xRngAddress As StringDim xName As StringDim xSSh As WorksheetDim xInt As IntegerxRngAddress = Application.ActiveCell.AddressOn Error Resume NextApplication.ScreenUpdating = FalseFor Each xWs In Application.ActiveWorkbook.SheetsxName = xWs.Range(xRngAddress).ValueIf xName <> "" ThenxInt = 0Set xSSh = NothingSet xSSh = Worksheets(xName)While Not (xSSh Is Nothing)Set xSSh = NothingSet xSSh = Worksheets(xName & "(" & xInt & ")")xInt = xInt + 1WendIf xInt = 0 ThenxWs.Name = xNameElseIf xWs.Name <> xName ThenxWs.Name = xName & "(" & xInt & ")"End IfEnd IfEnd IfNextApplication.ScreenUpdating = TrueEnd SubCopy

4。 按 F5 運行VBA代碼的鍵。 然后，所有工作表已按每個相對的A1單元格值重命名。

使用重命名多個工作表來基于特定單元格重命名工作表

如果你有 Kutools for Excel，則無需保存VBA代碼，可以使用 重命名多個工作表 功能可以根據所有工作表的相對單元快速重命名。

Kutools for Excel, 與超過 300 方便的功能，使您的工作更加輕松。免費全功能 30 天

后 免費安裝Kutools for Excel，請執行以下操作：

1.啟用要重命名其工作表名稱的工作簿。

2。 點擊 Kutools 加> 工作表 > 重命名工作表。 看截圖：

3.然后在彈出的對話框中，選中要重命名的工作表 工作表 窗格，然后選擇其中之一 重命名選項 您需要，在這里我將替換工作表名稱，然后檢查 重命名具有特定單元格的工作表，然后選擇您要重命名的單元格。 看截圖：

4。 點擊 Ok。 現在，工作表已使用特定的單元格內容重命名。

但是有時候，您需要根據一系列單元格值重命名多個工作表，如下圖所示，在這種情況下，您可以選擇 下面的方法.

使用重命名多個工作表根據一系列單元格內容重命名工作表

重命名多個工作表 of Kutools for Excel，您還可以根據所選范圍重命名工作表。

后 免費安裝Kutools for Excel，請執行以下操作：

1。 點擊 Kutools 加> 工作表 > 重命名工作表。 看截圖：

2.在 重命名多個工作表 對話框中，您需要指定以下設置：

（1）選擇需要從中重命名的工作表 工作表清單;

（2）檢查 從特定范圍 選項，然后選擇您需要基于其重命名的單元格值；

（3）指定 重命名選項，你可以檢查 在原始工作表名稱之前插入, 在原始工作表名稱后插入或 替換原始工作表名稱，您可以在對話框中預覽相應的結果。

3。 點擊 Ok，然后您可以看到所選的所有工作表已根據指定的單元格值進行了重命名。

替換原始工作表名稱

在原始工作表名稱之前插入

在原始工作表名稱后插入

使用“重命名工作表”實用程序，您還可以使用特定的前綴或后綴來重命名工作表。 單擊此處以了解有關重命名多個工作表的更多信息。

根據單元格值重命名多個圖紙

最佳辦公生產力工具

將小時轉化為分鐘 Kutools for Excel!

準備好增強您的 Excel 任務了嗎？ 利用的力量 Kutools for Excel - 您終極的節省時間的工具。 簡化復雜的任務并像專業人士一樣瀏覽數據。 以閃電般的速度體驗 Excel！

為什么需要 Kutools for Excel