Auto Hide and Unhide Rows Based

Hi, I am on this project which needs a VB code which automatically hide or unhide rows based from a value on a certain cell. I have to admit that I am not that proficient in VB Codes and Macro and any help would be highly appreciated. I have tried the following code below:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Range("C12").Value = CVErr(xlErrNum) Then
Rows("1:13").EntireRow.Hidden = True
Else
Rows("1:13").EntireRow.Hidden = False
End If
End Sub


Unfortunately, I am only successful in hiding the rows and not in unhiding it after I input data on another sheet (TallySheet). I attached a file of my project, and the worksheet I am working on is named Summary. Hoping for your help guys. Thanks in advance.

Originally Posted by moonsaga

Hi,
Am i correct in guessing that the C12 cell with the value is on the Tally sheet and the rows you want to hide and unhide is on the Summary sheet?

Hi, thanks for the clarification C12 Cell is also in the Summary sheet. All sheets are somewhat dependent on each other except for the TallySheet. All I need to change is the TallySheet and the rest will just automatically calculate everything from there. However I want to hide some rows on the Summary Sheet which have the #Num! error from which I choose C12 which is the General Average, thereby hiding its entire table. If I get the correct VB code I'll also be using it so I can use it for the remaining tables below C12. Again thanks for the clarification.

Moonsaga thanks for the code, however, I need to apply the VB Code on the same sheet or in the Summary Sheet where C12 Cell is located and Entire Rows 1 to 13 hidden whenever the result in C12 = #NUM!. Thanks again.

hmm.. I see that C12 on the summary sheet is linked to C83 on the median sheet and the median C83 is linked to C108 - BJ108 on the Tally sheet.
so if one of the questions is not answered then the summary sheet will have the #NUM! in C12. so you want to hide the entire table in summary due to this error?

I will have to work on this some more .. just cant seem to get the code to unhide when a value is in cell C12..

Originally Posted by moonsaga

I will have to work on this some more .. just cant seem to get the code to unhide when a value is in cell C12..

Thanks! That's also my problem whenever a value is present in C12 it does not unhide. That is why I posted it here for possible solutions.

I think i got it working now...

Private Sub worksheet_SelectionChange(ByVal Target As Range)
    Dim cn As Range
    Set cn = Range("C12")
    On Error GoTo endbit:
        If cn.Value = CVErr(xlErrNum) Then
         Rows("1:13").EntireRow.Hidden = True
        Exit Sub
endbit:
        On Error Resume Next
        Rows("1:13").EntireRow.Hidden = False
End If
End Sub

the above code will hide the row range when there is the #NUM! error in C12 of the Summary sheet and if there is no #NUM! error in C12 on the Summary sheet it will unhide the row range.
I hope this works for you. let me know.

Wow this is great thanks a lot. It worked like a charm! Thanks for your assistance.

Your welcome.