#1   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 31
Default 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
  #2   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 791
Default 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

  #3   Report Post  
Posted to microsoft.public.excel.programming
external usenet poster
 
Posts: 31
Default 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

Reply
Thread Tools Search this Thread
Search this Thread:

Advanced Search
Display Modes

Posting Rules

Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are On



All times are GMT +1. The time now is 08:43 PM.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
Copyright ©2004-2024 ExcelBanter.
The comments are property of their posters.
 

About Us

"It's about Microsoft Excel"