various printing from a hiden sheet
It might help if I added my code (I want this to print out on my printer):
Sheets("Stepdown3").Select Sheets("Letter").Visible = True Columns("B:B").Select For Each Cell In Selection.SpecialCells(xlConstants, 23) If Cell.Value < 0 Then Cell.Select With Sheets("Letter") .Range("C13").Value = Selection.Value .Range("E13").Value = Selection.Offset(0, -1).Value .Range("C14").Value = Selection.Offset(0, 1).Value .Range("I24").Value = Selection.Offset(0, 8).Value .Range("I27").Value = Selection.Offset(0, 7).Value .Range("I30").Value = Selection.Offset(0, 10).Value .PrintOut Copies:=1 End With With Sheets("Sheet2") .Visible = True .AutoFilter Field:=2, Criteria1:=Sheets("Letter").Range("C13").Value .PrintOut Copies:=1 End With End If Next Cell "Shawn" wrote: I have a hidden sheet with a table of data. Column B:B has various employee names in it in desending alphabetical order. I would like a macro that would, without selecting the page if possible, print out all rows of data with employee A, then, on another sheet, print out all rows of data with employee B, then employee C and so on. For example, if Smith, Tom is repeated in Rows B2, B3, B4, I would want it to print Rows 2, 3 and 4 on a sheet of paper. Then if Thompson, Jill is repeated in B5, B6, B7, I would want it to print rows 5, 6 and 7 on the next sheet. Please help. -- Thanks Shawn |
All times are GMT +1. The time now is 02:02 AM. |
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
ExcelBanter.com