Edwin,

Try something like the following:

Dim Rng As Range
On Error Resume Next
Set Rng = Application.InputBox(prompt:="Select a range", Type:=8)
On Error GoTo 0
If Not Rng Is Nothing Then
Rng.Select
End If


--
Cordially,
Chip Pearson
Microsoft MVP - Excel
Pearson Software Consulting, LLC
www.cpearson.com


"Edwin Merced" wrote in message
...
I need to open an uinput box that should ask the user to type
in a range.
When the user types the range and clicls a button the range
shoud appear
selected. How difficult is this??