Solved

Excel:  concatenate data into 1 cell

Posted on 2011-03-02
4
348 Views
Last Modified: 2012-06-27
Experts,  

Can someone show me how to take a range of data and insert it into 1 cell.  I would like to have it seperate the words with a comma and a space..  Is this possible?

Please see attached. Data.xlsm
0
Comment
Question by:Maliki Hassani
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
  • 2
4 Comments
 
LVL 23

Accepted Solution

by:
redrumkev earned 500 total points
ID: 35022042
LANCE S P

How are you doing?

I inserted a function, see code and workbook below.

The function is called by the following:

=CONCAT1(cell:cell) the range of cells you want.

In your case: =CONCAT1(A1:A429)

You can add/change the delimited by putting it after the range such as:

=CONCAT1(A1:A429,",")

I placed the above in cell C3

Hope this helps,
Kevin

Function Concat1(myRange As Range, Optional myDelimiter As String)
    Dim r As Range

    Application.Volatile
    For Each r In myRange
        Concat1 = Concat1 & r & myDelimiter
    Next r
    If Len(myDelimiter) > 0 Then
        Concat1 = Left(Concat1, Len(Concat1) - Len(myDelimiter))
    End If
End Function

Open in new window

Data.xlsm
0
 
LVL 23

Expert Comment

by:redrumkev
ID: 35022053
LANCE S P,

Reference for the above:

http://excel.tips.net/Pages/T003062_Concatenating_Ranges_of_Cells.html

Regards,
Kevin
0
 
LVL 81

Expert Comment

by:zorvek (Kevin Jones)
ID: 35022057
The easiest way is to copy the cells into a text editor, change the carriage returns to spaces, copy the resulting text, and paste into the desired cell in your workbook.

Kevin
0
 

Expert Comment

by:nithai
ID: 35022114
First Of all you will have to get the MoreFunc.dll for excel. Here is the link for it

http://download.cnet.com/Morefunc/3000-2077_4-10423159.html

 Once you install it, there is a  "MCONCAT()" Function . This will help you concatenate a range of cells and you can use your desired separator.

eg : =MCONCAT(A1:A10,",")

Hope this solves your problem.
0

Featured Post

Independent Software Vendors: We Want Your Opinion

We value your feedback.

Take our survey and automatically be enter to win anyone of the following:
Yeti Cooler, Amazon eGift Card, and Movie eGift Card!

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

A little background as to how I came to I design this code: Around 5 years ago I designed an add-in that formatted Excel files to a corporate standard, applying different cell colours and font type depending on whether the cells contained inputs,…
Access developers frequently have requirements to interact with Excel (import from or output to) in their applications.  You might be able to accomplish this with the TransferSpreadsheet and OutputTo methods, but in this series of articles I will di…
The viewer will learn how to use the =DISCRINV command to create a discrete random variable, use this command to model a set of probabilities and outcomes in a Monte Carlo simulation, and learn how to find the standard deviation of a set of probabil…
Excel styles will make formatting consistent and let you apply and change formatting faster. In this tutorial, you'll learn how to use Excel's built-in styles, how to modify styles, and how to create your own. You'll also learn how to use your custo…

717 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question