Excel VBA to unhide specific rows across multiple sheets

[Stuepef]

I am looking to construct a VBA that unhides specific rows across different sheets in a workbook. I can write separate VBA for each sheet/row combination, but was wondering if I can put them all together instead?

3 sheets need the same rows unhidden that I already have code for:

Sub Test()
Application.ScreenUpdating = False
      Dim wsMySheet As Worksheet
      For Each wsMySheet In Sheets(Array(Sheet6.Name, Sheet7.Name, Sheet8.Name))
      With wsMySheet
         .Rows("26:75").EntireRow.Hidden = False
      End With
      Next wsMySheet
   Application.ScreenUpdating = True
End Sub

But I am looking to incorporate these sheets/rows into the code above if possible:
Sheet3 - Rows 11:239
Sheet5 - Rows 23:146
Sheet4 - Rows 11:60
Sheet10 - Rows 28:77

Thank you!

 

[Fluff]

How about

Sub Stuepef()
Application.ScreenUpdating = False
   Dim Ary As Variant
   Dim i As Long
   
   Ary = Array(Sheet6, "26:75", Sheet7, "26:75", Sheet8, "26:75", Sheet3, "11:239")
   For i = 0 To UBound(Ary) Step 2
      Ary(i).Rows(Ary(i + 1)).Hidden = False
   Next i
End Sub

Just add the rest of the sheet codenames & rows to the array

 

[Stuepef]

@Fluff - Thank you!

 

[Fluff]

You're welcome & thanks for the feedback