Solved: Prompt user for a range of cells to copy

[pcollins]

How could you prompt a user to select a range of cells to copy have them hit enter or something to signify that those are the cells that they want copied and continue on with macro?

[mikerickson]

Dim inputRange As Range
On Error Resume Next
Set inputRange = Application.InputBox("Choose A Range, with the mouse", Type:=8)
On Error GoTo 0
If Nothing Is inputRange Then
MsgBox "Cancel was pressed."
Else
MsgBox inputRange.Address & " was chosen."
End If

[TonyJollans]

Set YourRange = Application.InputBox(Prompt:="Select Range", Type:=8)

[TonyJollans]

Beaten to it - and a more comprehensive post :)

[lucas]

Mike is hard to beat but too many correct answers is always better...cheers Tony