Hide Row With Zero Values

NoSparks · #1 03-18-2020, 06:00 AM

There are numerous ways to do accommodate that, have a look at
Loop Through Worksheets / Sheets with Excel VBA — Excel Dashboards VBA and more

Marcia · #2 03-18-2020, 07:08 AM

Thank you. I inserted a line that I copied from the link for the selection of sheets then I got this error message.

Quote:

Sub HideZeroValueRows()
Dim ws As Worksheet, rng As Range, cel As Range
For Each ws In ThisWorkbook.Sheets
Select Case ws.Name
Case Is = "TB..GF 101", "TB..GF 20%", "TB..SEF", "TB..REG TF"
End Select
Set rng = ws.Range("EG9", ws.Cells(Rows.Count, "EH").End(xlUp).Offset(-1))
For Each cel In rng
If cel.HasFormula And cel.Value = 0 Then cel.EntireRow.Hidden = True
Next cel
Next ws
End Sub

Similar Threads
Thread	Thread Starter	Forum	Replies	Last Post
Table with values from several locations and years - need to find comp values	Ricardo Sousa	Excel	9	07-27-2018 02:06 AM
Table with values from several locations and years - need to find comp values	Ricardo Sousa	Excel	6	06-09-2018 10:51 PM
Display multiple values as new values based on selection from template.	MvdB	Excel	2	09-29-2015 08:51 PM
Hide rows in multiple columns based on zero values	Deane	Excel Programming	19	06-23-2015 11:24 PM
How to Hide/Un-hide a worksheet based on cell on another sheet.	easton11	Excel Programming	1	06-02-2015 12:07 PM