Excel辦公技巧：巧用vba程式碼將工作表標籤進行倒序排列

大家好，今天跟大家分享如何利用vba程式碼在Excel工作簿中將工作表標籤進行倒序排列。

應用案例

在下圖所示的Excel工作簿“工作簿1。xlsx”中有6張工作表，工作表標籤從左到右依次為“6月”“5月”“4月”“3月”“2月”“1月”，接下來我們想將所有工作表標籤順序倒過來，使從左到右依次為“1月”“2月”“3月”“4月”“5月”“6月”。

操作步驟

1 開啟Excel工作簿“工作簿1。xlsx”，在“開發工具”選項卡“程式碼”功能組中單擊“Visual Basic”按鈕。

2 在彈出的VBA編輯器視窗中，單擊“插入”按鈕，在彈出的選單中選擇“模板”選項，此時，視窗中會新增一個“工作簿1。xlsx-模組1（程式碼）”視窗。

3 在新增的“工作簿1。xlsx-模組1（程式碼）”視窗中輸入如下程式碼：

Sub 工作表倒序排列（）

Dim ws As Excel。Sheets， w As Object， i As Integer

Set ws = ActiveWorkbook。Sheets

For i = 1 To ws。Count

Set w = ws（ws。Count）

w。Move Before：=ws（i）

Next i

End Sub

4 單擊視窗上方的“執行子過程/使用者窗體”按鈕（方向向右的綠色三角符號）執行程式碼。

5 此時，可見工作簿中原有6張工作表已全部進行了倒序排列，變成了我們想要的從左到右“1月”“2月”“3月”“4月”“5月”“6月”依次排列的順序。

今天的分享就到這裡，感謝閱讀，歡迎關注，一起學習更多職場辦公技能！

掌握常用Excel函式，提高辦公效率，少加班！

靜心辦公

購買專欄