Home |
Search |
Today's Posts |
#1
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
I am looking to create a VBA function that allows you to
select a range of cells and will concatinate the values from that range into the next cell selected.. Any Ideas???? |
#2
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi
why not use a UDF for this. e.g. MCONCAT available in the free add-in Morefunc.xll (http://longre.free.fr/english/) -- Regards Frank Kabel Frankfurt, Germany Bob wrote: I am looking to create a VBA function that allows you to select a range of cells and will concatinate the values from that range into the next cell selected.. Any Ideas???? |
#3
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
On Fri, 23 Jul 2004 13:36:23 -0700, "Bob"
wrote: I am looking to create a VBA function that allows you to select a range of cells and will concatinate the values from that range into the next cell selected.. Any Ideas???? Perhaps this UDF will give you an idea. It requires entering the function into the cell where you want to see the concatenated result. The first entry is the number of spaces between each cell in the range. Arguments 2..n can be individual cells or contiguous range references. ===================== Function SetString(SpacesBetween As Integer, _ ParamArray rg() As Variant) As String Dim c As Variant Dim i As Long For i = 0 To UBound(rg) Select Case VarType(rg(i)) Case Is = vbArray + vbVariant For Each c In rg(i) SetString = SetString & Space(SpacesBetween) & c Next Case Is = vbString SetString = SetString & Space(SpacesBetween) & rg(i) End Select Next i SetString = Trim(SetString) End Function ============================== --ron |
#4
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Thank you Both, I've run out of time today, will get back
to it on Monday and post my results... thanks again.. very much -----Original Message----- I am looking to create a VBA function that allows you to select a range of cells and will concatinate the values from that range into the next cell selected.. Any Ideas???? . |
#5
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
On Fri, 23 Jul 2004 23:00:34 +0200, "Frank Kabel"
wrote: Hi why not use a UDF for this. e.g. MCONCAT available in the free add-in Morefunc.xll (http://longre.free.fr/english/) Frank, Can MCONCAT concatenate non-contiguous ranges? --ron |
#6
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
Hi Ron
just testing it and no it does not :-) -- Regards Frank Kabel Frankfurt, Germany Ron Rosenfeld wrote: On Fri, 23 Jul 2004 23:00:34 +0200, "Frank Kabel" wrote: Hi why not use a UDF for this. e.g. MCONCAT available in the free add-in Morefunc.xll (http://longre.free.fr/english/) Frank, Can MCONCAT concatenate non-contiguous ranges? --ron |
#7
![]()
Posted to microsoft.public.excel.programming
|
|||
|
|||
![]()
On Sat, 24 Jul 2004 06:50:28 +0200, "Frank Kabel"
wrote: Hi Ron just testing it and no it does not :-) Thanks. I was not aware of MCONCAT and had written SetString in order to take care of the issue of non-contiguous ranges. So I guess I did not waste my time :-). --ron |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
![]() |
||||
Thread | Forum | |||
Linked text boxes created in Excel 2007 are blank in Excel 2003? | Charts and Charting in Excel | |||
How do I used a big formula I created in Excel? | Excel Worksheet Functions | |||
User-defined functions created in Excel 2000 fail in Excel 2003 | Excel Discussion (Misc queries) | |||
Excel 2003 crashes loading excel files created Excel 2000 | Excel Discussion (Misc queries) | |||
Macros created in Excel 97 | Excel Programming |