Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Hide, Print, Unhide Rows
I am looking for a macro to hide rows with zero values (all cells in the row must equal zero), it should skip blank rows, print, then unhide the rows. The attached file is a sample and the data range I am focusing on is = D10:P154. Thanks! +-------------------------------------------------------------------+ |Filename: Book3.zip | |Download: http://www.excelforum.com/attachment.php?postid=2802 | +-------------------------------------------------------------------+ -- pfosz ------------------------------------------------------------------------ pfosz's Profile: http://www.excelforum.com/member.php...o&userid=16792 View this thread: http://www.excelforum.com/showthread...hreadid=319893 |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Hide, Print, Unhide Rows
Hi
Try this example for the activesheet Sub Example() Dim Lrow As Long Dim CalcMode As Long Dim StartRow As Long Dim EndRow As Long With Application CalcMode = .Calculation .Calculation = xlCalculationManual .ScreenUpdating = False End With With ActiveSheet .DisplayPageBreaks = False StartRow = 10 EndRow = 154 For Lrow = EndRow To StartRow Step -1 If Application.CountIf(Range(.Cells(Lrow, "D"), _ .Cells(Lrow, "P")), "0") = 13 Then .Rows(Lrow).Hidden = True Next .PrintOut .Range("A1:A154").EntireRow.Hidden = False End With With Application .ScreenUpdating = True .Calculation = CalcMode End With End Sub -- Regards Ron de Bruin http://www.rondebruin.nl "pfosz" wrote in message ... I am looking for a macro to hide rows with zero values (all cells in the row must equal zero), it should skip blank rows, print, then unhide the rows. The attached file is a sample and the data range I am focusing on is = D10:P154. Thanks! +-------------------------------------------------------------------+ |Filename: Book3.zip | |Download: http://www.excelforum.com/attachment.php?postid=2802 | +-------------------------------------------------------------------+ -- pfosz ------------------------------------------------------------------------ pfosz's Profile: http://www.excelforum.com/member.php...o&userid=16792 View this thread: http://www.excelforum.com/showthread...hreadid=319893 |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
Enabling option „Format rows“ to hide/unhide rows using VBA-code? | Excel Discussion (Misc queries) | |||
How to Hide and Unhide Rows | Excel Discussion (Misc queries) | |||
hide or unhide rows with button | Excel Discussion (Misc queries) | |||
Hide Unhide Rows | Excel Discussion (Misc queries) | |||
How to hide and unhide rows | Excel Programming |