here is the syntax for the InputBox Method

expression.InputBox(Prompt, Title, Default, Left, Top, HelpFile, HelpContextId, Type)

0 formula
1 number
2 string
4 logical (True or False)
8 cell reference in the form of a Range object
16 error value, such as # N / A
64 array of values


Dim rng As Range, dataname As String

Set rng = Application.InputBox(prompt:="Do your selection in the summary page", Type:=8)
dataname = Application.InputBox(prompt:="type the name of data", Type:=2)

Me.TextBox1 = dataname
Me.TextBox2 = rng.Parent.Name& "!"& rng.Address

but i do not see why you can not used directly a texbox on userform


--
isabelle