1.
ActiveWindow.SelectedSheets.PrintOut From:=1, To:=1, Copies:=1

2.
Range("A1:B5").Select
Selection.PrintOut Copies:=1

Mike F
"amirstal" wrote in message
oups.com...
What is the code I need to write in order to:
1. Print the first page of an active worksheet?
2. Print a selected range (A1:B5 for example) of an active worksheet?

Thanks.