This code works:
but I need to replace it with:Private Sub Worksheet_Change(ByVal Target As Range) Dim WS As Worksheet Dim RNG As Range Set RNG = Range("A28:A31") Set WS = Sheets("Sheet2") WS.Range("A28:A31").EntireRow.Hidden = True End Sub
And this doesnt work.Private Sub Worksheet_Change(ByVal Target As Range) Dim WS As Worksheet Dim RNG As Range Set RNG = Range("A28:A31") Set WS = Sheets("Sheet2") WS.RNG.EntireRow.Hidden = True End Sub
Any help ?
Thank you