I want to create a userform that can string a selected range of cells to a
textbox. I can do it on predifend cells, but I want it to be flexible so
that you can highlight the cells and then click a button that will string it.
Can anybody help me with a link to a page that explain how to string from
highlighted cells?

Dim rng As Range
Dim cell As Range
Dim str

Set rng = Application.InputBox("Use mo=use to select cells", Type:=8)
For Each cell In rng
str = str & cell.Value & " "
Next cell
TextBox1.Text = str


--
HTH

Bob

(there's no email, no snail mail, but somewhere should be gmail in my addy)

"JJ" <(E-Mail Removed)> wrote in message
news:0E05FF67-0986-4672-BC18-(E-Mail Removed)...
>I want to create a userform that can string a selected range of cells to a
> textbox. I can do it on predifend cells, but I want it to be flexible so
> that you can highlight the cells and then click a button that will string
> it.
> Can anybody help me with a link to a page that explain how to string from
> highlighted cells?