VBA를 사용하여 행 숨기기

Question

셀 값을 기준으로 행 숨기기에 관한 이전 질문을 따르려고 했습니다(E19).

Sub HideIR()

If Range("$E$19").Value = "2" Then
        Rows("20:26").EntireRow.Hidden = True
    ElseIf Range("$E$19").Value = "1" Then
        Rows("20:26").EntireRow.Hidden = False
    End If

End Sub
Private Sub Worksheet_Change(ByVal Target As Range)
    If Range("$E$19").Value = "2" Then
        Rows("20:26").EntireRow.Hidden = True
    ElseIf Range("$E$19").Value = "1" Then
        Rows("20:26").EntireRow.Hidden = False

    End If
End Sub

셀을 숨기지만 매크로를 다시 실행하지 않고 값을 변경하면 새로 고쳐지지 않습니다.

Answer 1

코드를 삽입해야 합니다.Sub Worksheet_change시트의 코드 모듈(일반 모듈뿐만 아니라)이므로 시트의 값을 변경한 후에 실행됩니다.