View Single Post
  #5   Report Post  
Posted to microsoft.public.excel.misc
abdulie
 
Posts: n/a
Default How to remove rows for printing


Thanks for your suggestions...much appreciated!

I ended up solving it by creating a command buttin with the following
code attached:

Private Sub CommandButton1_Click()


Dim cell As Range
Application.ScreenUpdating = False
Application.StatusBar = "Please be patient while we prepare your order
for printing...This should take approximately 1 minute"
With Sheets("ORDER FORM - MASTER")
For Each cell In .Range("A29:A1000")
If cell.Value = "" Then cell.EntireRow.Hidden = True
Next cell
.Cells.PageBreak = xlPageBreakNone

.PrintOut preview:=True
.Range("A29:1000").EntireRow.Hidden = False
End With
Application.ScreenUpdating = True
End Sub


Cheers
:-)


--
abdulie
------------------------------------------------------------------------
abdulie's Profile: http://www.excelforum.com/member.php...o&userid=30538
View this thread: http://www.excelforum.com/showthread...hreadid=501930