Thread: Printing A Range
View Single Post
  #2   Report Post  
Posted to microsoft.public.excel.programming
Jim Cone Jim Cone is offline
external usenet poster
  
Posts: 3,290
Default Printing A Range
Bob,
How about...

Range("A52:I67").Select
Selection.PrintOut

Regards,
Jim Cone
San Francisco, CA

"Bob" wrote in message
...
Is there a way to print this range without page set up.
If [I55] 0 Then
Range("A52:I67").Select
ActiveSheet.PageSetup.PrintArea = "$A$52:$I$67"
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True
ActiveSheet.PageSetup.PrintArea = ""
End If


Reply With QuoteReply With Quote