Ẩn / bỏ ẩn các hàng dựa trên giá trị ô trong Excel hai hoặc nhiều nguyên

Tôi đang sử dụng đoạn mã sau để ẩn hàng nếu giá trị ô là 0:

Private Sub Worksheet_Calculate()
Dim LastRow As Long, c As Range
Application.EnableEvents = False
LastRow = Cells(Cells.Rows.Count, "I").End(xlUp).Row
On Error Resume Next
For Each c In Range("I9:I48")
   If c.Value = 0 Then
        c.EntireRow.Hidden = True
    ElseIf c.Value > 0 Then
        c.EntireRow.Hidden = False
    End If
Next
On Error GoTo 0
Application.EnableEvents = True
End Sub

Nó hoạt động hoàn hảo, nhưng tôi muốn mã cũng kiểm tra cột K (cùng phạm vi K9: K48), nếu cả hai ô trong một hàng chỉ bằng 0 thì hàng phải được ẩn. Làm thế nào tôi có thể thay đổi mã để làm điều này?

Ví dụ: hiện I9 = 1000 K9 = 0 không bị chặn, I10 = 0 K10 = 1000 bị ẩn

Tôi cần K10 = 1000 cũng chưa mở