A more general solution if you use a macro:
Function ConcatRange(r As Range) As String
    Dim s As String
    Dim c As Range

    For Each c In r
        s = s & c.Value & ","
    Next

    ConcatRange = Mid(s, 1, Len(s) - 1)
End Function

Tom

On Fri, Jan 23, 2009 at 2:34 AM, TEAMPL <chupachup...@gmail.com> wrote:

>
>  if you want it done macro
>
> range("b1") = range("a1") & "," & range("a2") & "," & range("a3")
>
>
>
> On 1월22일, 오후7시05분, Tobi Hammet <speich...@gmail.com> wrote:
> > This does not have to be a makro, if its possible.
> >
> > Source:
> >
> > A1:5
> > A2:7
> > A3:7
> >
> > what i want from this:
> >
> > B1: 5,7,7
> >
> > (those values seperated by kommas)
> >
> > so can it be done without a makro?
>
> >
>

--~--~---------~--~----~------------~-------~--~----~
Visit the blog to download Excel tutorials at 
http://www.excel-macros.blogspot.com

To post to this group, send email to excel-macros@googlegroups.com
For more options, visit this group at 
http://groups.google.com/group/excel-macros?hl=en

Visit & Join Our Orkut Community at 
http://www.orkut.com/Community.aspx?cmm=22913620

To Learn VBA Macros Please visit http://www.vbamacros.blogspot.com

To see the Daily Excel Tips, Go to:
http://exceldailytip.blogspot.com
 
If you find any spam message in the group, please send an email to Ayush @ 
jainayus...@gmail.com
-~----------~----~----~----~------~----~------~--~---

Reply via email to