Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
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
Posted to microsoft.public.excel.programming
|
|||
|
|||
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
Posted to microsoft.public.excel.programming
|
|||
|
|||
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 |
Display Modes | |
|
|