Row Hide in multiple sheets

[rusa31]

Hello,

I wanted to hide specific rows in multiple sheets.
I've sheet "Info" which have dropdown list (View,Hidden).
I also have sheets "Jan" to "Dec"

When i choose dropdown list "Hidden" in sheet "Info". It should hide all the specific rows (Example rows 1:10) in all sheets "Jan" to "Dec".

I have create the code but it doesnt work.

Really appreciate if someone can help me.

Thank you.

 

[Fluff]

Do all those sheets exist? Judging from your image you only have two of them.
Also in what way isn't it working?

 

[rusa31]

Do all those sheets exist? Judging from your image you only have two of them.
Also in what way isn't it working?

Hi Fluff,

So far i have created sheets Jan and Feb for testing. if the code works i will create the other sheets.

The codes doesnt work meaning when i choose "Hidden" in sheets "Info". The rows (1:44) in sheet Jan and Feb not Hide.
Its suppose to hide.

Thank you.

 

[Fluff]

How are you running the macro?

 

[rusa31]

How are you running the macro?

Im not sure how i running macro.
I just put the code in Excel Object "Sheet1(Info)".
then i just press "Alt-Q" to close. then i check if its works.

is this the rite way?

 

[Fluff]

is this the rite way?

Nope, that code will not run automatically.
To have it run automatically try

Private Sub Worksheet_Change(ByVal Target As Range)
   Dim Ary As Variant
   Dim i As Long
   
   If Target.CountLarge > 1 Then Exit Sub
   If Target.Address(0, 0) = "A4" Then
      Ary = Array("Jan", "Feb")
      For i = 0 To UBound(Ary)
         If Evaluate("isref('" & Ary(i) & "'!A1)") Then
            Sheets(Ary(i)).Rows("1:44").Hidden = Target.Value = "Hidden"
         End If
      Next i
   End If
End Sub

Just add the rest of the sheet names to the array

 

[rusa31]

Thank You Fluff.
Codes works good.

Thank you. :D

 

[Fluff]

You're welcome & thanks for the feedback.