Snasui Excel Forum

Hi Dear,
I got this code from my friend.
Those code is use print from selected any range in a sheet thru inputbox but it is no luck.
Sub PrintIt()
Dim rRange As Range
Set rRange=Application.InputBox("Please select the range",Type:=8)
With Sheets(Application.InputBox("Input Sheet Name"))
.PageSetup.PrintArea=rRange.Address
.PrintOut Copies:=Inputbox("Number of copies:"), Collate:=True
End With
End Sub


Best wishes

Your code should be show with code style, begin with [code] and end with [/code] like show as below.
I have tested this code and it worked properly not show any problem.

Hi Dear
This code seems conflict .how do I edit code to
select sheet first then range for printing?

Best wishes

This statement show input box for fill in with your target sheet name for print.
Please adjust for your task first and if it has any problem please post here with adjusted code.