ExcelBanter

ExcelBanter (https://www.excelbanter.com/)
-   Excel Programming (https://www.excelbanter.com/excel-programming/)
-   -   VBA or VBE (https://www.excelbanter.com/excel-programming/397353-vba-vbe.html)

Louis

VBA or VBE
 
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

Michael

VBA or VBE
 
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


--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Louis" wrote:

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


Louis

VBA or VBE
 
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






"Michael" wrote:

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


--
If this posting was helpful, please click on the Yes button.
Regards,

Michael Arch.




"Louis" wrote:

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



All times are GMT +1. The time now is 12:17 AM.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
ExcelBanter.com