Thread: Print Selection
View Single Post
  #1   Report Post  
Posted to microsoft.public.excel.programming
MikeF[_2_] MikeF[_2_] is offline
external usenet poster
 
Posts: 173
Default Print Selection


Hello,

The same range needs to be printed for one or sometimes more sheets in a
workbook.
This *should* be easy, but can't seem to make it happen properly.

Can anyone please correct the following code apppropriatlely?
Thanx in advance.
- Mike


Sub PrintDetail()
Range("B7:Y40").Select
For Each Sh In ActiveWindow.SelectedSheets
Sh.PageSetup.PrintTitleRows = "$1:$6"
Sh.Selection.PrintOut Collate:=True
Next
Next
End Sub