Asking to Select a Range

[Irailson]

Hi people,

I´m trying to do a macro that asks the user to select a range. , and
then get the address selected. How can I display the select-range box
inside the program?
Thanks for any help

Irailson

 

[Ron de Bruin]

Small example from Help

Sub test()
Worksheets("Sheet1").Activate
Set mycell = Application.InputBox( _
prompt:="Select a cell", Type:=8)
mycell.Select
End Sub

 

[Dave Peterson]

You can put up an application.inputbox and retrieve the range:


dim myRng as range
set myrng = nothing
on error resume next
set myrng = application.inputbox(prompt:="Point and click", type:=8)
on error goto 0
if myrng is nothing then
'use cancelled.
exit sub '???
end if

msgbox myrng.address(external:=true)