VBA Hide/Unhide Multiple Sheets based on Column of Data

[woodbutcher]

I have 100 sheets in a workbook that have dynamic names.

The sheet numbers are static and start in G14 and continue to G113
in column H starting at H14:H113 is a "NO" "YES" designator to say if the sheet should be visible or not.

I would like the sheets to hide or unhide on the selection of the next sheet.

I'm new to VBA so any help would be greatly appreciated.

Thanks

 

[KennyGreens]

Hi there, I'm not exactly sure what you mean by hide or unhide on the selection of the next sheet, but you can try this (this assumes that the sheet with yes and no on it is sheet 1):

Dim cell As Range
Dim rng as Range

Set rng = Sheets(1).Range("H14:H113")

For Each cell in rng
    If InStr(cell.Value, "NO") Then
        Sheets(cell.Offset(0, -1).Value).Visible = False
            Else
        Sheets(cell.Offset(0, -1).Value).Visible = True
    End If
Next cell

 

[woodbutcher]

I may not be using it correctly but I just get an error message