Sắp xếp các sheet theo abc trong excel

Bình thường, bạn có thể sắp xếp hoặc sắp xếp thứ tự các tab bảng tính trong Excel bằng cách kéo và thả các tab sheet trên thanh sheet tab. Nhưng đối với việc này được thực hiện với nhiều bảng tính, bạn có thể xem xét những cách khó khăn sau đây để nhanh chóng sắp xếp bảng trong thứ tự chữ cái / chữ số trong một bảng tính lớn.
 
Có một vĩ mô để phân loại bảng bởi alpha đăng trong các trung tâm hỗ trợ của Microsoft. Chúng ta có thể áp dụng nó với các bước sau:
Bạn chi tiết hơn xem video : sắp xếp abc trong excel
 
Bước 1 : Giữ phím ALT + F11 phím, và nó mở Microsoft Visual Basic cho các ứng dụng cửa sổ.
 
Bước 2 : Nhấp vào Insert > Mô-đun , và sau đó dán macro sau trong cửa sổ mô-đun .
 
VBA: Xếp theo thứ tự tờ.
 
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
 
Bước 3: Nhấn F5 chìa khóa để chạy macro này. Trong hộp nhắc sau, bấm Yes , tất cả các bảng tính sẽ được sắp xếp theo thứ tự tăng dần theo thứ tự abc; và nhấp vào Không , tất cả các bảng tính sẽ được sắp xếp theo thứ tự giảm dần theo thứ tự abc.
 
sap-xep-sheet
 
 
sap-xep-sheet1.gif
 
Chúc bạn thành công
184.73.14.222

Bình luận

Các bài viết mới

Các tin cũ hơn