Tự động ẩn dòng khi có giá trị = 0

Liên hệ QC

khanhdq88

Thành viên mới
Tham gia
11/6/22
Bài viết
7
Được thích
2
Mong các cao nhân giúp đỡ ạh.
ACE có cách nào có thể tự động ẩn dòng khi ô có giá trị = 0 ko ạh. Ví dụ như trên file, khi B2 ở sheet Menu = 0 thì dòng số 2 sẽ tự động ẩn dòng, và sẽ tự động hiện lại dòng khi có giá trị khác. B2 ở sheet Menu được tham chiếu từ sheet Data sang
Mong ace giúp đỡ ạk. Thanks....!
 

File đính kèm

Bạn có thể tham khảo mã ở chủ đề này và sửa lại để phù hợp với yêu cầu của bạn
 
Bạn có thể tham khảo mã ở chủ đề này và sửa lại để phù hợp với yêu cầu của bạn
Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
      If Not Intersect([H1], Target) Is Nothing Then
            If [G15].Value = 0 Then
                Rows("15:15").EntireRow.Hidden = True
            Else: Rows("15:15").EntireRow.Hidden = False: End If
      End If
End Sub
M để ẩn khi 1 ô trên dòng có tham số = 0 thôi, nãy thử của bạn mà k đc. Đoạn code trên mình thử thì ok nhưng khi tham chiếu dữ liệu động cho G15 từ sheet khác sang thì lệnh lại k hoạt động. Bạn biết cách khắc phục ko chỉ giúp mình vs
 
Tự động ần hay hiện dòng theo giá trị nào đó không thể xài công thức nào mà đạt được;
Nên chủ bài đăng nên nhờ MODs hay SMOD dời bài vô ngăn thích hợp.
Tạm biệt bạn nha!
 

File đính kèm

  • C610.jpg
    C610.jpg
    66.9 KB · Đọc: 5
Tự động ần hay hiện dòng theo giá trị nào đó không thể xài công thức nào mà đạt được;
Nên chủ bài đăng nên nhờ MODs hay SMOD dời bài vô ngăn thích hợp.
Tạm biệt bạn nha!
Rõ là #2 em viết bằng Hàm UDF mà Bác SA_DQ
 
Mã:
Private Sub Worksheet_Change(ByVal Target As Range)
      If Not Intersect([H1], Target) Is Nothing Then
            If [G15].Value = 0 Then
                Rows("15:15").EntireRow.Hidden = True
            Else: Rows("15:15").EntireRow.Hidden = False: End If
      End If
End Sub
M để ẩn khi 1 ô trên dòng có tham số = 0 thôi, nãy thử của bạn mà k đc. Đoạn code trên mình thử thì ok nhưng khi tham chiếu dữ liệu động cho G15 từ sheet khác sang thì lệnh lại k hoạt động. Bạn biết cách khắc phục ko chỉ giúp mình vs
Bạn tham khảo mã bên bài viết này:

 
Web KT

Bài viết mới nhất

Back
Top Bottom