Cách ẩn các dòng qua VBA nếu một ô có nội dung nhất định
Bạn có muốn tự động ẩn tất cả các dòng có một nội dung nhất định bằng macro không? Hãy tưởng tượng bạn muốn ẩn tất cả các dòng nếu văn bản "hide" xuất hiện ở bất kỳ ô nào trong dòng tương ứng. Đây có thể là một ứng dụng hữu ích để dọn dẹp dữ liệu. Hãy xem tình huống ban đầu trong bảng sau:
Trong bảng này, chúng tôi muốn ẩn tất cả các hàng có chứa ô chứa số không. Sử dụng macro sau:
Ẩn các dòng cụ thể ()
Làm mờ ô dưới dạng phạm vi
Đối với mỗi ô trong ActiveSheet.UsedRange
Nếu Cell.Value = 0 Và Hàng (Cell.Row) .Hidden = False _
Sau đó, hàng (ô.Row) .Hidden = True
Ô tiếp theo
Kết thúc Sub
Nếu bạn bắt đầu macro bằng, một số dòng sẽ bị ẩn hoàn toàn, như thể hiện trong hình sau
Trong mỗi dòng này, văn bản "ẩn" xuất hiện trong một số cột. Nếu bạn muốn kiểm tra tiêu chí khác thay vì nội dung này, hãy điều chỉnh so sánh tương ứng trong macro.
Để hiển thị lại tất cả các ô, nhấn tổ hợp phím CTRL A rồi chọn chức năng START - FORMAT - FADE OUT & FADE IN - SHOW LINES (Excel 2007 và Excel 2010) hoặc ĐỊNH DẠNG DÒNG - FADE IN (Excel đến phiên bản 2003). Ngoài ra, bạn có thể sử dụng macro sau để làm mờ dần:
Hiển thị Sub Tất cả
Cells.Rows.Hidden = Sai
Kết thúc Sub
Để nhập một trong các macro, hãy nhấn tổ hợp phím ALT F11 trong Excel. Điều này sẽ gọi trình soạn thảo VBA. Sử dụng lệnh INSERT - MODULE để chèn một trang mô-đun trống. Để bắt đầu một trong các macro, hãy nhấn tổ hợp phím ALT F8 trong Excel.
