VBA or VBE

[Guest]

Hello

I need some help. In a sheet i have around 350 rows.
how can i hidde the rows from 1 to 35 or 70 to 105 to get just what i need
to see and not all the other cells.

Is there a VBA or vbe programming code available ?

Thanks for your help

louis

 

[Guest]

Do one of two things:
Use from the Main Menu Bar
Data -> Filter and select autofilter
Then click on the dropdown box and select your criteria.
Or
Rows("1:35").EntireRow.Hidden = True

 

[Guest]

Sorry i have forgotten to explain what i did, my code is as follow

Private Sub Worksheet_Change(ByVal Target As Excel.Range)
If Not Intersect(Target, [I12]) Is Nothing Then _
sheet6.Activate
sheet6.[AH:BN].EntireColumn.Hidden = LCase(Sheet1.[I12]) = "no"

If Not Intersect(Target, [b8]) Is Nothing Then _
Sheet6.Activate
Sheet6.[a36:a385].EntireRow.Hidden = LCase(sheet1.[b8]) = "2"

If Not Intersect(Target, [b8]) Is Nothing Then _
Sheet6.Activate
Sheet6.[a1:a315].EntireRow.Hidden = LCase(Sheetl1.[b8]) = "11"
Sheet6.[a351:a385].EntireRow.Hidden = LCase(Sheet1.[b8]) = "11"

The code does work for the the last position if i selected
nLCase(Sheetl1.[b8]) = "11"
But it does't work if i select LCase(Sheetl1.[b8]) = "2"or"3" up to "12"
Sheet6.[a1:a35].EntireRow.Hidden = LCase(Sheetl1.[b8]) = "3"
Sheet6.[a71:a385].EntireRow.Hidden = LCase(Sheet1.[b8]) = "3"

I hope you understand now ?

Your help is most appreciated

Louis