Tạo nút lọc dữ liệu

[congnhat94]

Các Anh, Chị giúp em tạo nút lệnh Comamd bttion khi bấm vào dó thì Sổ cái xẽ lọc dữ liệu theo điều kiện từ E7 đến E70 nếu ô nào =0 thì ẩn cả dòng dó đi, như File en gửi kèm theo.
en xin cảm ơn nhiều.

 

[nghiaphuc]

Các Anh, Chị giúp em tạo nút lệnh Comamd bttion khi bấm vào dó thì Sổ cái xẽ lọc dữ liệu theo điều kiện từ E7 đến E70 nếu ô nào =0 thì ẩn cả dòng dó đi, như File en gửi kèm theo.
en xin cảm ơn nhiều.

Thử phương án khác xem sao nào! Mình thay CommandButton bởi 1 Checkbox Chk1 và sử dụng code như sau:

Private Sub Chk1_Click()
    [K2] = IIf(Chk1, "<>0", "")
    [E6:E70].AdvancedFilter xlFilterInPlace, [K1:K2]
End Sub

Bạn tham khảo trong file nhé.

 

[congnhat94]

Cảm ơn anh Nghiaphuc nhiều lắm em toại nguyện rồi