In essense, I want to tell a cell to capture the info in a3 through a27
with
a space in-between data/value returned.

If your data is just one column, here's another option...

Function GlueIt(rng) As String
GlueIt = Join(WorksheetFunction.Transpose(rng), Space(1))
End Function

--
HTH. :)

Dana DeLouis
Windows XP, Office 2003



"Gary''s Student" wrote in message
...
Try this small macro:


Function glue_it(R As Range) As String
Dim rr As Range
glue_it = ""
For Each rr In R
glue_it = glue_it & " " & rr.Value
Next
End Function

Use it as =glue_it(A3:A27)
--
Gary''s Student


"Hatman" wrote:

I want to copy over text from various fields into a single field.
Here is the only solution (my limited time and my limited programing
savy) I
have found so far. Is there a way to minimise or shorten this
equation/formula:

=A3&" "&A4&" "&A5&" "&A6&" "&A7&" "&A8&" "&A9&" "&A10&" "&A11&" "&A12&"
"&A13&" "&A14&" "&A15&" "&A16&" "&A17&" "&A18&" "&A19&" "&A20&" "&A21&"
"&A22&" "&A23&" "&A24&" "&A25&" "&A26&" "&A27

In essense, I want to tell a cell to capture the info in a3 through a27
with
a space inbetween data/value returned.

Thanks