Tạo nút Marco lọc Ẩn và Không ẩn (2 người xem)

[satthuvae]

Hi Các anh chị.
Em có báo cáo tài chính, hàng ngày em mở ra nhưng nhiều khi em lọc rất thủ công những dòng mà em muốn ẩn. Anh chị có cách nào tạo ra marco ấn nút chỉ hiện theo điều kiện đã đặt trước " Ẩn" " Không" giúp em với.
Em gửi File đính kèm
Em xin cám ơn.

 

[Kiều Mạnh]

Hi Các anh chị.
Em có báo cáo tài chính, hàng ngày em mở ra nhưng nhiều khi em lọc rất thủ công những dòng mà em muốn ẩn. Anh chị có cách nào tạo ra marco ấn nút chỉ hiện theo điều kiện đã đặt trước " Ẩn" " Không" giúp em với.
Em gửi File đính kèm
Em xin cám ơn.

Hôm trước mình làm cho rồi ....giờ muốn chi nữa

 

[satthuvae]

Vẫn không được anh à. Thật sự em rất cần. Em gửi lại anh bản anh làm, em ấn được, anh xem giúp em.
Cám ơn anh.

 

[Kiều Mạnh]

Vẫn không được anh à. Thật sự em rất cần. Em gửi lại anh bản anh làm, em ấn được, anh xem giúp em.
Cám ơn anh.

Túm lại bây giờ cụ thể làm như thế nào

 

[satthuvae]

Dạ, bản em gửi đó, em không thực hiện được lệnh Marco, em nhờ anh xem giùm.

 

[Kiều Mạnh]

Dạ, bản em gửi đó, em không thực hiện được lệnh Marco, em nhờ anh xem giùm.

khả năng bạn chưa Enable Macro
tải file sau của Be09 thành viên GPE về tập làm theo nha

 

[Quang_Hải]

Vẫn không được anh à. Thật sự em rất cần. Em gửi lại anh bản anh làm, em ấn được, anh xem giúp em.
Cám ơn anh.

Cái file có vấn đề mà mình không tìm ra nguyên nhân. Mình thử chèn thêm 1 nút CommandButton mới và thử code vẫn không tác dụng.

 

[satthuvae]

Vâng, đúng rùi ah, em cũng không hiểu tại sao, chứ marco của em vẫn chạy ngon. Anh Quang Hải, Anh Kieu Manh xem giúp em với ạ.

 

[satthuvae]

Các anh thử tạo cái marco mới trên File ban đầu em tạo xem có được không a. Em lăn tăn mãi vì bác Kieu Manh làm code nhưng mà không chạy được.

 

[Ba Tê]

Các anh thử tạo cái marco mới trên File ban đầu em tạo xem có được không a. Em lăn tăn mãi vì bác Kieu Manh làm code nhưng mà không chạy được.

Tải file này coi sao.
Không xài code cũ luôn.

 

[Kiều Mạnh]

Các anh thử tạo cái marco mới trên File ban đầu em tạo xem có được không a. Em lăn tăn mãi vì bác Kieu Manh làm code nhưng mà không chạy được.

tôi mới thử 2 máy ở nhà tôi chạy tốt mà...+ cả file Anh Bate nữa cũng chạy tốt luôn Bạn coi lai xem nha

 

[satthuvae]

Em cám ơn anh nhiều lắm. Anh ơi, anh giúp em được cái code đơn giản và dễ hiểu hơn không vì em có nhiều sheet cần Ẩn và Không. Em không thể tự sửa giống với anh được.
Anh có thể xem giúp em được không.

 

[satthuvae]

@ Kieu Manh, anh Quang Hải cũng bảo không mở chạy được mà, em thấy cái code của anh gọn nhẹ, em có thể xử lý được sang các sheet khác. Anh có thể xem giúp em lại được không.

 

[Kiều Mạnh]

@ Kieu Manh, anh Quang Hải cũng bảo không mở chạy được mà, em thấy cái code của anh gọn nhẹ, em có thể xử lý được sang các sheet khác. Anh có thể xem giúp em lại được không.

Đau đầu quá đi thui người ơi muốn như thế nào úp file giả lập lên mình coi nếu được làm cho_) () (-

 

[satthuvae]

Em úp file lên rùi mà, anh xem giúp em.

 

[Kiều Mạnh]

Em úp file lên rùi mà, anh xem giúp em.

Bài này hăng hắc thế nào ý...thật sự ngoài vùng phủ sóng của mình .bạn hãy chờ các thành viên khác hổ trợ xem sao nha...
mình sẽ lên núi tu luyên thêm code trưởng thần công xem sao nếu được mình úp lên cho nha
thân

 

[Quang_Hải]

@ Kieu Manh, anh Quang Hải cũng bảo không mở chạy được mà, em thấy cái code của anh gọn nhẹ, em có thể xử lý được sang các sheet khác. Anh có thể xem giúp em lại được không.

Xem file thử xem xài được không
Bấm Ctrl+Shift +H khi muốn hiện
Bấm Ctrl+Shift +A khi muốn ẩn

 

[satthuvae]

Cám ơn anh Quang Hải, Anh ơi, em chỉ muốn tạo nút marco để cho mọi người có thể dễ dàng sử dụng ạ. Anh xem giúp em tạo nút maro như lúc đầu anh làm đó à.

 

[Hong.Van]

Cám ơn anh Quang Hải, Anh ơi, em chỉ muốn tạo nút marco để cho mọi người có thể dễ dàng sử dụng ạ. Anh xem giúp em tạo nút maro như lúc đầu anh làm đó à.

Hãy tham khảo
http://www.giaiphapexcel.com/forum/showthread.php?67530-Ẩn-hàng-theo-điều-kiện

 

[satthuvae]

Em vẫn đang trong giai đoạn tìm h
iểu, nếu bác thành thạo bác làm giúp em với ah, em cám ơn ah

 

[Quang_Hải]

Em vẫn đang trong giai đoạn tìm h
iểu, nếu bác thành thạo bác làm giúp em với ah, em cám ơn ah

Cũng ráng thêm chút nữa, biết đâu chiều nay trúng đề.

 

[satthuvae]

Em cám ơn anh a, File đó chạy rùi. Anh ơi cho em hỏi một chút những điều kiện cột I sao không thấy đâu nhỉ, Vì em đang lọc theo điều kiện đó à.

 

[satthuvae]

@ Hy vọng bác Quang Hai chúng đề và lô tô nữa ah.

 

[Ba Tê]

Cũng ráng thêm chút nữa, biết đâu chiều nay trúng đề.

Là sao ta?
Bài #10 không xài được vì cái nút IN -ALL?
Bài này thì ẨN - HIỆN, chạy tuốt?

 

[satthuvae]

Không ah, bài #10 chảy ngon anh ah, tại vì cái marco cuả anh dài quá, em ko biết cách sửa cho các sheet khác em cũng có điều kiện đó. Em post bài #12 Anh xem giúp em ah.
Cám ơn anh

 

[Ba Tê]

Không ah, bài #10 chảy ngon anh ah, tại vì cái marco cuả anh dài quá, em ko biết cách sửa cho các sheet khác em cũng có điều kiện đó. Em post bài #12 Anh xem giúp em ah.
Cám ơn anh

Các Code khác là của ai đó.
Code trong file chỉ có mấy dòng như vầy mà nói dài quá, không hiểu làm sao cho ngắn hơn:

Private Sub CommandButton1_Click()
Dim Cll As Range
Application.ScreenUpdating = False
    If CommandButton1.Caption = "IN" Then
        For Each Cll In Range("H10:H29")
            If Cll.Value = 0 Then Cll.EntireRow.Hidden = True
        Next Cll
        CommandButton1.Caption = "ALL"
    Else
        Cells.Hidden = False
        CommandButton1.Caption = "IN"
    End If
Application.ScreenUpdating = True
End Sub

Bỏ 2 dòng Application.ScreenUpdating =... thì bớt được 2 dòng.
Các chỉ số xác định vùng như Range("H10:H29") thì tự chỉnh lại.
Híc!

 

[satthuvae]

Em cám ơn anh nhiều, còn một vấn đề nhỏ nữa là tham số H10:H29, vì bài toán ở đây là cả cột H10:H29 và cột J10:J29 nữa à, vì khi mà cột H không có dữ liệu thì cột J có dữ liệu thì vẫn để In, còn lại khi mà hai cột đó không có thì mới ẩn. Mong anh chỉ giùm.

 

[Ba Tê]

Em cám ơn anh nhiều, còn một vấn đề nhỏ nữa là tham số H10:H29, vì bài toán ở đây là cả cột H10:H29 và cột J10:J29 nữa à, vì khi mà cột H không có dữ liệu thì cột J có dữ liệu thì vẫn để In, còn lại khi mà hai cột đó không có thì mới ẩn. Mong anh chỉ giùm.

Tải lại file này coi sao.
Quýnh lại STT "nuôn", không đúng ý thì bỏ.

 

[satthuvae]

Em cám ơn anh nhé. Có gì thắc mắc em xin được hỏi anh tiếp.

 

[satthuvae]

Hi anh Ba Tê, Anh ơi, em cũng có một bảng như vậy nhưng phức tạp hơn một chút, và em có thể thay nút marco bằng cách nhập vào một ô em đã bôi mầu, Nếu gõ N hiện toàn bộ, gõ Y nó lọc theo điều kiện những cột có chữ Y.
Em File đính kèm, anh xem giúp em.
Em cám ơn anh.

 

[satthuvae]

Anh Ba Tê ơi, xem giùm em với ạ. Mong anh chỉ giáo.
Cám ơn anh.