congnhat94
Thành viên mới

- Tham gia
- 26/4/11
- Bài viết
- 15
- Được thích
- 3
- Nghề nghiệp
- Kế toán
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: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.
Private Sub Chk1_Click()
[K2] = IIf(Chk1, "<>0", "")
[E6:E70].AdvancedFilter xlFilterInPlace, [K1:K2]
End Sub