Tạo điều kiện để ẩn đi các dòng mong muốn

[tvxdgt]

Tôi muốn viết một điều kiện khi chọn ví dị tại ô A1=0 thì ẩn đi các dòng cần ẩn, và A1=1 thì hiện lại các dòng đó.

 

[Luc Van]

Tôi muốn viết một điều kiện khi chọn ví dị tại ô A1=0 thì ẩn đi các dòng cần ẩn, và A1=1 thì hiện lại các dòng đó.

Bạn thử code này thử

 Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Address = "$A$1" Then
    Range("2:2, 4:4").EntireRow.Hidden = (Target = 0)
  End If
End Sub

Bạn xem thêm file đính kèm nhé

 

[tvxdgt]

Cảm ơn bác Luc vân, bây giờ tôi muốn làm thêm một điều kiện nữa ví dụ: Tại ô A1=0 thì Sheet2 ẩn đi còn A1=1 thì Sheet2 hiện ra

 

[hungken82]

bay gio to muon ẩn các cột EGHI. cậu viết lệnh giúp tơ nhé LucVan. tk ban nhieu

 

[tvxdgt]

Bạn chỉ cần thay đổi code một chút là ẩn cột được thôi. bạn có thể xem file đính kèm.