| Home |
| Search |
| Today's Posts |
|
#1
|
|||
|
|||
Hiding rows
We would like to be able to enter a value in a cell and if it meets our
predefined criteria the entire row would automatically hide. Is this possible in excel? Thanks |
|
#2
|
|||
|
|||
|
Hiding rows
You can use and event procedure to do this (see
http://www.cpearson.com/excel/events.htm for more info about events). Right click the sheet tab and choose View Code. In the VBA code module that appears, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then 'change cell as desired If Target.Value 10 Then ' change criteria as desired Target.EntireRow.Hidden = True Else Target.EntireRow.Hidden = False End If End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... We would like to be able to enter a value in a cell and if it meets our predefined criteria the entire row would automatically hide. Is this possible in excel? Thanks |
|
#3
|
|||
|
|||
|
Hiding rows
Thank you Chip
"Chip Pearson" wrote: You can use and event procedure to do this (see http://www.cpearson.com/excel/events.htm for more info about events). Right click the sheet tab and choose View Code. In the VBA code module that appears, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then 'change cell as desired If Target.Value 10 Then ' change criteria as desired Target.EntireRow.Hidden = True Else Target.EntireRow.Hidden = False End If End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... We would like to be able to enter a value in a cell and if it meets our predefined criteria the entire row would automatically hide. Is this possible in excel? Thanks |
|
#4
|
|||
|
|||
|
Hiding rows
Chip,
How would you set this to a range of cells in column A "Chip Pearson" wrote: You can use and event procedure to do this (see http://www.cpearson.com/excel/events.htm for more info about events). Right click the sheet tab and choose View Code. In the VBA code module that appears, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then 'change cell as desired If Target.Value 10 Then ' change criteria as desired Target.EntireRow.Hidden = True Else Target.EntireRow.Hidden = False End If End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... We would like to be able to enter a value in a cell and if it meets our predefined criteria the entire row would automatically hide. Is this possible in excel? Thanks |
|
#5
|
|||
|
|||
|
Hiding rows
David,
Change If Target.Address = "$A$1" Then to If Not Application.Intersect(Target, Range("A1:A100")) Is Nothing Then -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... Chip, How would you set this to a range of cells in column A "Chip Pearson" wrote: You can use and event procedure to do this (see http://www.cpearson.com/excel/events.htm for more info about events). Right click the sheet tab and choose View Code. In the VBA code module that appears, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then 'change cell as desired If Target.Value 10 Then ' change criteria as desired Target.EntireRow.Hidden = True Else Target.EntireRow.Hidden = False End If End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... We would like to be able to enter a value in a cell and if it meets our predefined criteria the entire row would automatically hide. Is this possible in excel? Thanks |
|
#6
|
|||
|
|||
|
Hiding rows
One way...
Private Sub Worksheet_Change(ByVal Target As Range) if target.cells.count 1 then exit sub if intersect(target,me.range("a1:a25")) is nothing then exit sub If Target.Value 10 Then ' change criteria as desired Target.EntireRow.Hidden = True Else Target.EntireRow.Hidden = False End If End Sub Davidjc52 wrote: Chip, How would you set this to a range of cells in column A "Chip Pearson" wrote: You can use and event procedure to do this (see http://www.cpearson.com/excel/events.htm for more info about events). Right click the sheet tab and choose View Code. In the VBA code module that appears, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then 'change cell as desired If Target.Value 10 Then ' change criteria as desired Target.EntireRow.Hidden = True Else Target.EntireRow.Hidden = False End If End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... We would like to be able to enter a value in a cell and if it meets our predefined criteria the entire row would automatically hide. Is this possible in excel? Thanks -- Dave Peterson |
|
#7
|
|||
|
|||
|
Hiding rows
Thank You Chip. That was perfect. Your website is a great source of
information. David Curlis "Chip Pearson" wrote: David, Change If Target.Address = "$A$1" Then to If Not Application.Intersect(Target, Range("A1:A100")) Is Nothing Then -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... Chip, How would you set this to a range of cells in column A "Chip Pearson" wrote: You can use and event procedure to do this (see http://www.cpearson.com/excel/events.htm for more info about events). Right click the sheet tab and choose View Code. In the VBA code module that appears, paste the following code: Private Sub Worksheet_Change(ByVal Target As Range) If Target.Address = "$A$1" Then 'change cell as desired If Target.Value 10 Then ' change criteria as desired Target.EntireRow.Hidden = True Else Target.EntireRow.Hidden = False End If End If End Sub -- Cordially, Chip Pearson Microsoft MVP - Excel Pearson Software Consulting, LLC www.cpearson.com "Davidjc52" wrote in message ... We would like to be able to enter a value in a cell and if it meets our predefined criteria the entire row would automatically hide. Is this possible in excel? Thanks |
| Reply |
| Thread Tools | Search this Thread |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Forum | |||
| Hiding rows based on choice in a listbox | Excel Discussion (Misc queries) | |||
| Hiding of rows and columns | Excel Discussion (Misc queries) | |||
| HIDING ROWS IN PROTECTED WORKSHEETS | Excel Discussion (Misc queries) | |||
| Hiding Rows if the linked rows are blank | Excel Discussion (Misc queries) | |||
| Copying Rows when hiding other rows | Excel Worksheet Functions | |||
Linear Mode
