Bỏ qua nội dung chính

Làm cách nào để chuyển đổi giữa các trang tính ẩn và hiện trong Excel?

Giả sử bạn có một số trang tính có dữ liệu quan trọng mà bạn không muốn người khác nhìn thấy, ẩn trang tính có thể là một cách đơn giản để bảo vệ dữ liệu trong Excel. Nhưng đôi khi, bạn cần hiện các sheet đã ẩn rồi lại ẩn chúng đi, thông thường bạn cần phải bỏ ẩn từng sheet một, nếu thường áp dụng thao tác này sẽ rất phiền phức và mất thời gian. Trong bài viết này, tôi sẽ giới thiệu cho bạn một số cách nhanh chóng để chuyển đổi các trang tính giữa ẩn và hiện.

Chuyển đổi các trang tính giữa ẩn và hiện bằng mã VBA

Chuyển đổi các trang tính giữa ẩn và hiện với Kutools cho Excel


mũi tên màu xanh bong bóng bên phải Chuyển đổi các trang tính giữa ẩn và hiện bằng mã VBA

Giả sử bạn có một sổ làm việc với Sheet1, Sheet2 và Sheet3 bị ẩn, mã VBA sau có thể giúp bạn nhanh chóng hiển thị chúng và nhấp chuột thứ hai sẽ ẩn chúng lại. Vui lòng làm như sau:

1. Nhấp chuột Nhà phát triển > Visual Basic, Và một cái mới Microsoft Visual Basic cho các ứng dụng cửa sổ sẽ hiển thị, nhấp vào Chèn > Mô-đun, rồi nhập mã sau vào mô-đun.

Sub ToggleHideUnhideDataSheets()
Application.ScreenUpdating = False
Dim wb As Workbook
Dim ShtNames() As Variant
Set wb = ActiveWorkbook
ShtNames = Array("Sheet1", "Sheet2", "Sheet3")
For i = 0 To UBound(ShtNames)
wb.Sheets(ShtNames(i)).Visible = Not wb.Sheets(ShtNames(i)).Visible
Next i
Application.ScreenUpdating = True
End Sub

Trong đoạn mã trên, ShtNames = Array ("Sheet1", "Sheet2", "Sheet3") là một biến, bạn có thể thay đổi tên trang tính ẩn khi cần.

2. Sau đó nhấn F5 để chạy mã, và các trang tính ẩn đã được hiển thị, nếu bạn muốn ẩn lại, vui lòng nhấn F5 phím một lần nữa.


mũi tên màu xanh bong bóng bên phải Chuyển đổi các trang tính giữa ẩn và hiện với Kutools cho Excel

Với Chuyển đổi Chế độ hiển thị Trang tính Ẩn chức năng của Kutools cho Excel, bạn có thể dễ dàng chuyển đổi các trang tính giữa ẩn và hiện bằng cách nhấp vào lệnh Worksheets.

Kutools cho Excel bao gồm hơn 300 công cụ Excel tiện dụng. Dùng thử miễn phí không giới hạn trong 30 ngày. Lấy nó ngay.

Khi bạn đã cài đặt Kutools cho Excel, bạn có thể thực hiện theo các bước sau:

1. Mở sổ làm việc phải chứa một số trang tính ẩn.

2. Nhấp chuột Kutools > Các bảng tính, xem ảnh chụp màn hình:

doc-toggle-hidden-sheet1

Khi bạn nhấp vào Các bảng tính lệnh một lần, tất cả các trang tính ẩn đã được hiển thị, nếu bạn muốn ẩn chúng một lần nữa, hãy nhấp vào Các bảng tính lệnh với lần thứ hai. Xem ảnh chụp màn hình:

doc-toggle-hidden-sheet2
-1
doc-toggle-hidden-sheet3
-1
doc-toggle-hidden-sheet2

Chú thích: Chức năng này cũng áp dụng cho các trang tính ẩn không liên tục.

Nếu bạn muốn biết thêm về chức năng này, vui lòng nhấp vào Chuyển đổi Chế độ hiển thị Trang tính Ẩn.


Bài viết liên quan:

Chuyển đổi giữa các cột ẩn và cột hiển thị trong Excel

Công cụ năng suất văn phòng tốt nhất

🤖 Trợ lý AI của Kutools: Cách mạng hóa việc phân tích dữ liệu dựa trên: Thực thi thông minh   |  Tạo mã  |  Tạo công thức tùy chỉnh  |  Phân tích dữ liệu và tạo biểu đồ  |  Gọi các hàm Kutools...
Các tính năng phổ biến: Tìm, đánh dấu hoặc xác định các bản sao   |  Xóa hàng trống   |  Kết hợp các cột hoặc ô mà không làm mất dữ liệu   |   Vòng không có công thức hữu ích. Cảm ơn !
Siêu tra cứu: Nhiều tiêu chí VLookup    VLookup Nhiều Giá Trị  |   VLookup trên nhiều trang tính   |   Tra cứu mờ ....
Danh sách thả xuống nâng cao: Tạo nhanh danh sách thả xuống   |  Danh sách thả xuống phụ thuộc   |  Danh sách thả xuống nhiều lựa chọn ....
Trình quản lý cột: Thêm một số cột cụ thể  |  Di chuyển cột  |  Chuyển đổi trạng thái hiển thị của các cột ẩn  |  So sánh dãy và cột hữu ích. Cảm ơn !
Các tính năng nổi bật: Tiêu điểm lưới   |  Chế độ xem thiết kế   |   Thanh công thức lớn    Trình quản lý sổ làm việc & trang tính   |  Thư viện tài nguyên (Văn bản tự động)   |  Bảng chọn ngày   |  Kết hợp các bảng tính   |  Mã hóa/Giải mã ô    Gửi email theo danh sách   |  Siêu lọc   |   Bộ lọc đặc biệt (lọc in đậm/nghiêng/gạch ngang...) ...
15 bộ công cụ hàng đầu12 bản văn CÔNG CỤ (thêm văn bản, Xóa ký tự,...)   |   50 + Biểu đồ Các loại (Biểu đồ Gantt,...)   |   40+ Thực tế Công thức (Tính tuổi dựa trên ngày sinh,...)   |   19 chèn CÔNG CỤ (Chèn mã QR, Chèn ảnh từ đường dẫn,...)   |   12 Chuyển đổi CÔNG CỤ (Số thành từ, Chuyển đổi tiền tệ,...)   |   7 Hợp nhất & Tách CÔNG CỤ (Các hàng kết hợp nâng cao, Chia ô,...)   |   ... và nhiều hơn nữa

Nâng cao kỹ năng Excel của bạn với Kutools for Excel và trải nghiệm hiệu quả hơn bao giờ hết. Kutools for Excel cung cấp hơn 300 tính năng nâng cao để tăng năng suất và tiết kiệm thời gian.  Bấm vào đây để có được tính năng bạn cần nhất...

Mô tả


Tab Office mang lại giao diện Tab cho Office và giúp công việc của bạn trở nên dễ dàng hơn nhiều

  • Cho phép chỉnh sửa và đọc theo thẻ trong Word, Excel, PowerPoint, Publisher, Access, Visio và Project.
  • Mở và tạo nhiều tài liệu trong các tab mới của cùng một cửa sổ, thay vì trong các cửa sổ mới.
  • Tăng 50% năng suất của bạn và giảm hàng trăm cú nhấp chuột cho bạn mỗi ngày!
Comments (3)
No ratings yet. Be the first to rate!
This comment was minimized by the moderator on the site
Works great, but how would you modify this to use the sheet's CodeNames instead of "Sheet" names?

That way user can still change the Tab name and Tab order as needed.

Thanks!
This comment was minimized by the moderator on the site
At the end of the code you forgot to put Application.ScreenUpdating = True to turn back on the screen updating. :-)
This comment was minimized by the moderator on the site
[quote]At the end of the code you forgot to put Application.ScreenUpdating = True to turn back on the screen updating. :-)By Greg[/quote] Thanks for your feedback. We will change it soon. :lol:
There are no comments posted here yet
Please leave your comments in English
Posting as Guest
×
Rate this post:
0   Characters
Suggested Locations