Row Hide

[psamu]

If I want to hide row a15 when cell value in k5=1 and also if cell value in k5=2 then hide row A16. Please help me with the vba code.

Thanks.

 

[psamu]

Thanks. awesome. It is working. Thank you so much.

 

[psamu]

Thanks. Woking.

 

[psamu]

Thanks. When the sheet is protected then it is not working.

 

[Michael M]

You will need to put

ActiveSheet.unprotect "password"

at the beginning of your code
AND

ActiveSheet.protect "password"

at the end of your code.

Change the "password" to suit

Regards
Michael M

 

[psamu]

Thanks again. It is working even with the protected worksheet, but when K5 cell changes with a formula, then it is not working. ( ie, I have a formula in K5 is =K10) Please help on this. Thanks.

 

[Scott Huish]

Take out that code, try this instead:

Private Sub Worksheet_Calculate()
ActiveSheet.Unprotect "password"
Application.ScreenUpdating = False
    Rows(15).Hidden = Range("K5") = 1
    Rows(19).Hidden = Range("K5") = 1
    Rows(16).Hidden = Range("K6") = 2
    Rows(20).Hidden = Range("K6") = 2
Application.ScreenUpdating = True
ActiveSheet.Protect "password"
End Sub

 

[psamu]

Thanks. it works!

 

[psamu]

Combo box Properties Linked to Cell K5
When combo box droped down list changes make cell K5 to 2 or 1 , then code does not work properly. It started to flicker and give error. Please help. Thanks.

 

[Scott Huish]

I thought you said it was changing with a formula.

 

[psamu]

Sorry, I was thinking to do that way, but I have to change the scenario to this way. Thanks