Làm cách nào để nhanh chóng đóng tất cả các sổ làm việc ngoại trừ một sổ đang hoạt động?

Nếu có nhiều sổ làm việc được mở trong máy tính của bạn và bây giờ, bạn muốn đóng tất cả nhưng để lại sổ đang hoạt động. Có cách nào nhanh chóng để bạn giải quyết công việc này ngoại trừ việc đóng từng sổ làm việc khác không? Bài viết này, tôi sẽ nói về một số cách dễ dàng để bạn giải quyết nó bằng một cú nhấp chuột.

Đóng tất cả các sổ làm việc ngoại trừ một sổ làm việc đang hoạt động với mã VBA

Đóng tất cả các sổ làm việc ngoại trừ sổ làm việc đang hoạt động với Tab Office

Đóng tất cả các sổ làm việc ngoại trừ một sổ làm việc đang hoạt động với mã VBA

Với mã VBA sau, bạn có thể nhanh chóng đóng tất cả các sổ làm việc đã mở ngoại trừ sổ đang hoạt động, vui lòng thực hiện như sau:

1. Kích hoạt sổ làm việc của bạn mà bạn muốn tiếp tục mở.

2. Giữ ALT + F11 phím để mở Cửa sổ Microsoft Visual Basic for Applications.

3. Nhấp chuột Chèn > Mô-đunvà dán mã sau vào Cửa sổ mô-đun.

Mã VBA: Đóng tất cả các sổ làm việc ngoại trừ một sổ đang hoạt động

Private Sub CloseOtherWorkbook()
'Updateby Extendoffice
Dim xWB As Workbook
Application.ScreenUpdating = False
For Each xWB In Application.Workbooks
    If Not (xWB Is Application.ActiveWorkbook) Then
        xWB.Close
    End If
Next
Application.ScreenUpdating = True
End Sub

4. Sau đó nhấn F5 để chạy mã này, và sau đó tất cả các sổ làm việc khác đã được đóng cùng một lúc, nhưng chỉ để lại sổ đang hoạt động.

Đóng tất cả các sổ làm việc ngoại trừ sổ làm việc đang hoạt động với Tab Office

Nếu bạn quan tâm đến một sản phẩm mới - Tab văn phòng, nó có thể giúp bạn mở nhiều tài liệu / tệp trong một cửa sổ theo thẻ duy nhất, với nó, bạn có thể đóng tất cả các sổ làm việc nhưng để lại một sổ làm việc đang hoạt động chỉ bằng một cú nhấp chuột. Bạn có thể biết nhiều hơn và tải xuống Tab Office.

Sau khi cài đặt Tab văn phòng, bạn sẽ thấy tất cả các sổ làm việc đã mở được hiển thị trong một cửa sổ theo thẻ đơn, xem ảnh chụp màn hình:

Sau đó bấm vào tên sổ làm việc bạn muốn mở và bấm chuột phải vào tab tên, sau đó chọn Đóng Khác từ menu ngữ cảnh, xem ảnh chụp màn hình:

Và sau đó, bạn chỉ có thể thấy sổ làm việc đang hoạt động của mình được mở.

Bài viết liên quan:

Làm cách nào để đóng nhanh tất cả các sổ làm việc trong Excel?