如何在Excel中按字母/字母數字順序對工作表進行排序？

通常，您可以通過在工作表標籤欄上拖放工作表標籤來在Excel中對工作表標籤進行排序或排列。但是，要使用多個工作表完成此工作，您可以考慮以下棘手的方法，以便在大型工作簿中按字母/字母數字順序快速對工作表進行排序。

使用VBA代碼按字母/字母數字順序對工作表進行排序
 使用Kutools for Excel按字母/字母數字順序對工作表進行排序

使用VBA代碼按字母/字母數字順序對工作表進行排序

Microsoft支持中心中有一個用於按字母排序工作表的宏。我們可以通過以下步驟應用它：

1. 按住 ALT + F11 鍵，然後打開 Microsoft Visual Basic for Applications 窗口。

2. 點擊插入 > 模塊，然後將以下宏粘貼到 模塊窗口.

VBA：按字母/字母數字順序對工作表進行排序

Sub SortWorkBook()
'Updateby20140624
Dim xResult As VbMsgBoxResult
xTitleId = "KutoolsforExcel"
xResult = MsgBox("Sort Sheets in Ascending Order?" & Chr(10) & "Clicking No will sort in Descending Order", vbYesNoCancel + vbQuestion + vbDefaultButton1, xTitleId)
For i = 1 To Application.Sheets.Count
    For j = 1 To Application.Sheets.Count - 1
        If xResult = vbYes Then
            If UCase$(Application.Sheets(j).Name) > UCase$(Application.Sheets(j + 1).Name) Then
                Sheets(j).Move after:=Sheets(j + 1)
            End If
            ElseIf xResult = vbNo Then
                If UCase$(Application.Sheets(j).Name) < UCase$(Application.Sheets(j + 1).Name) Then
                    Application.Sheets(j).Move after:=Application.Sheets(j + 1)
            End If
        End If
    Next
Next
End Sub

3。按 F5 運行此宏的鍵。在以下提示框中，單擊是，所有工作表將按字母升序排序；然後點擊沒有，所有工作表將按字母降序排序。

使用Kutools for Excel按字母/字母數字順序對工作表進行排序

如果您不熟悉宏或喜歡其他方式，可以嘗試 Excel的Kutools. Excel的Kutools's 排序表 工具可以輕鬆地對所有工作表進行排序。

申請前 Excel的Kutools請 首先下載並安裝.

1。點擊 Kutools 加 > 下載學習單 > 排序表。看截圖：

2。在 排序表 對話框中，在右側窗格中選擇所需的一種排序類型，例如 字母排序, 字母數字排序，然後單擊 OK 按鈕。看截圖：

然後，根據指定的排序類型對所有工作表進行排序。看截圖：

文檔排序表6

Excel的Kutools's 排序表 工具可以快速重新排列活動工作簿中的所有工作表。它支持多種排序類型，包括 字母排序, 字母數字排序, 顏色分類 及逆轉。此外，您還可以在工作表中上/下移動並重置排序。

如果您想免費試用（30-day) 這個實用程序， 請點擊下載，然後按照上述步驟進行操作。

演示：按字母/字母數字順序對所有工作表進行排序

按顏色對工作表標籤進行排序

最佳辦公效率工具

Kutools for Excel 解決了你的大部分問題，並將你的生產力提高了 80%

重用: 快速插入 複雜的公式，圖表 以及您以前使用過的任何東西；加密單元帶密碼創建郵件列表並發送電子郵件...
超級公式欄（輕鬆編輯多行文本和公式）；閱讀版式（輕鬆讀取和編輯大量單元格）；粘貼到過濾範圍...
合併單元格/行/列不會丟失數據；拆分單元格內容；合併重複的行/列...防止細胞重複；比較範圍...
選擇重複或唯一行; 選擇空白行（所有單元格都是空的）；超級查找和模糊查找在許多工作簿中；隨機選擇...
確切的副本多個單元格，無需更改公式參考；自動創建參考到多張紙；插入項目符號，複選框等...
提取文字，添加文本，按位置刪除，刪除空間; 創建和打印分頁小計；在單元格內容和註釋之間轉換...
超級濾鏡（將過濾方案保存並應用於其他工作表）；高級排序按月/週/日，頻率及更多；特殊過濾器用粗體，斜體...
結合工作簿和工作表; 根據關鍵列合併表；將數據分割成多個工作表; 批量轉換xls，xlsx和PDF...
超過 300 項強大的功能. 支持 Office / Excel 2007-2021 和 365。支持所有語言。在您的企業或組織中輕鬆部署。完整功能 30 天免費試用。 60 天退款保證。