Arguments box on form

[Greshter]

Hi All

I'd like to know how you can have an arguments box on a form. I need to
select a cell range directly from a spreadsheet and would like to see
them preferably entered in a text box on a form like you get when you
create formulas with the function arguments box. If anybody has got any
ideas I would like to hear them.

Cheers,
Mike

 

[Dave Peterson]

Like with a macro?

Option Explicit
sub testme()
dim myRng as range
set myrng = nothing
on error resume next
set myrng = application.inputbox(prompt:="Select a range with the mouse", _
type:=8)
on error goto 0

if myrng is nothing then
'use hit cancel
exit sub '???
end if

'do something with the range
msgbox myrng.address(external:=true)
end sub

 

[Greshter]

Again Dave that's just what I'm after ... I'll have to start sending
you a cut of my wages.

Cheers,
Mike

 

[Dave Peterson]

Woohoo!!!

I'm in the money!

Again Dave that's just what I'm after ... I'll have to start sending
you a cut of my wages.

Cheers,
Mike