VBA - Hide/Unhide based on IF

[fjacruz]

Hi

Unfortunately I was not able to perform VBA code correctly (based on onter postings). I'm trying to unhide rows when cell A13 is 1 otherwise rows 15:100 are hidden. The idea behind is basically change some parameters that affect cell A13.

I wrote the code like that:
"
Private Sub Worksheet_SelectionChange(ByVal Target As Range)

If Range("A13").Value > 0 Then
Range("15:100").EntireRow.Hidden = True
Else
Range("15:100").EntireRow.Hidden = False
End If

End Sub
"

Thanks in advance for your help.

 

[Fluff]

In what way isn't your code working?

 

[fjacruz]

In what way isn't your code working?

I tried to setup a questionnaire. when all asnwers were replied cell A13 returns 1 or 0. When this cell changed, hidden rows remained unchanged (whenever excel workbook opens, range 15:100 is hidden)

 

[Fluff]

Your code will only work if you select another cell, otherwise it will do nothing.

 

[fjacruz]

Your code will only work if you select another cell, otherwise it will do nothing.

Due "worksheet_selection change" header?
I did not pretend that...i desire code works due A13 cell driver changing

 

[Fluff]

If A13 is a formula, then you would need to use the worksheet_calculate event, but that will run whenever any formula in that sheet is re-calculated

 

[fjacruz]

If A13 is a formula, then you would need to use the worksheet_calculate event, but that will run whenever any formula in that sheet is re-calculated

Got It. Any alternative suggestion?

 

[Fluff]

Does the formula in A13 only look at other cells on the same sheet?
If yes are all those cells hard values, or are some formulae?

 

[fjacruz]

Does the formula in A13 only look at other cells on the same sheet?
If yes are all those cells hard values, or are some formulae?

A13 comes from A7 A9 and A11 all formulas depending on dropwdown list on C7, C9 and C11.
No hard values on A column. Just in C column

 

[Fluff]

In that case the calculate event is your only real option if you want it to be automatic.