VBA ẩn các dòng giữa 2 dòng có điều kiện xác định !

[thanhdoan6693]

Chào anh chị !
Mình có 01 file excel , mình muốn viết VBA ẩn tất cả các dòng giữa dòng GIỮA 2 dòng có chứa điều kiện C9="###LOAIMONG" và dòng C77="###ENDMONG" . Ô C9 và C77 có thể thay đổi do thêm dòng , điều kiện cố định là các text nằm trong ô đó . Cám ơn các A, C !

 

[phulien1902]

Chào anh chị !
Mình có 01 file excel , mình muốn viết VBA ẩn tất cả các dòng giữa dòng GIỮA 2 dòng có chứa điều kiện C9="###LOAIMONG" và dòng C77="###ENDMONG" . Ô C9 và C77 có thể thay đổi do thêm dòng , điều kiện cố định là các text nằm trong ô đó . Cám ơn các A, C !

Thử:

Sub abc()
Range("C7:C217").AutoFilter 1, "<>###LOAIMONG", xlAnd, "<>###ENDLOAIMONG"
End Sub

 

[thanhdoan6693]

Thử:

Sub abc()
Range("C7:C217").AutoFilter 1, "<>###LOAIMONG", xlAnd, "<>###ENDLOAIMONG"
End Sub

Lệnh này chỉ ẩn dòng ###LOAIMONG", và"<>###ENDLOAIMONG" . Cần ẩn thêm tất cả các dòng nằm giữa . Có nghĩa là từ ###LOAIMONG đến ###ENDLOAIMONG" là ẩn hết .
Thanks anh !

 

[Ba Tê]

Lệnh này chỉ ẩn dòng ###LOAIMONG", và"<>###ENDLOAIMONG" . Cần ẩn thêm tất cả các dòng nằm giữa . Có nghĩa là từ ###LOAIMONG đến ###ENDLOAIMONG" là ẩn hết .
Cảm ơn anh !

Thêm 1 cột phụ J, trong cột này bạn muốn "thấy" dòng nào thì gõ chữ x vào.
Filter cột J.

 

[thanhdoan6693]

Thêm 1 cột phụ J, trong cột này bạn muốn "thấy" dòng nào thì gõ chữ x vào.
Filter cột J.

Em hiểu cách này , tuy nhiên khi người dùng thêm dòng thì phải đánh dấu X vào dòng mới .File được chia sẻ cho nhiều người sử dụng nên ko thể áp dụng cách Filter được . Ở đây em muốn ẩn trực tiếp từ ###LOAIMONG đến ###ENDLOAIMONG" ... Code sẽ hiểu tất cả các dòng nằm trong ###LOAIMONG đến ###ENDLOAIMONG" sẽ ẩn
Cảm ơn anh !