Hide Rows In Range With Headers

With my searches i manage to make this working code:

Code:

Sub Hide_Rows()
Application.ScreenUpdating = False
Dim Rng, os1, os2, os3, os4, os5, os6, os7, os8, os9, os10, os11 As Range
Set os1 = Range("B11:E63")
Set os2 = Range("B64:E116")
Set os3 = Range("B117:E169")
Set os4 = Range("B170:E222")

[Code]...

In any range (os1 to os11) all empty rows are hidden... ok! But, every range have 2 first rows as headers that i want to hide (in case of no data below) before print!