Hide rows if...

[Guest]

Can anyone help please

I want to hide row10 on sheet 2 if sheet1 A1=Yes,
but every time I make a copy of sheet1 the same requirement is needed to the
new sheet. Always hide the same row (possibly rows) on each sheet

Any takers

Thanks in advance
Saintsman

 

[JE McGimpsey]

Your question is rather ambiguous - I'll assume you mean that row 10 on
any sheet other than Sheet1 needs to be hidden if Sheet1!A1 = Yes...

Put this code in our ThisWorkbook code module:

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
If Sh.Name <> "Sheet1" Then
Sh.Rows(10).Hidden = Sheets("Sheet1").Range("A1") = "Yes"
End If
End Sub

 

[Guest]

Sorry for any ambiguity!
It is not for every sheet except sheet1
The sheet will be 1 of many similar calculation sheets, each of which needs
the function to hide specific rows if sheet1 A1 = Yes (same rows in each case)
There are other sheets which should not have the function.
My plan was to have a sort of template sheet with the function on, which is
then available every time a copy of that sheet is made