How to merge cells (combine cells contents) in Excel without losing data?

We may combine cells and their contents in Microsoft Excel frequently. However, do you find out the easiest way to combine cell contents? Here we will talk about how to combine cell contents in Excel easily and quickly.

Combine multiple cells into one cell with Merge Command

Combine multiple cells into one cell with VBA code

Combine multiple cells into one cell with Kutools for Excel without losing data

Kutools for Excel: add 120 new features in Excel. Save one hour every day.
Classic Menu for Office: brings back classic menus to Office 2010 and 2013 (includes Office 365).
Office Tab: brings tabbed interface to Office as the use of web browser Chrome, Firefox and Internet Explorer.

arrow blue right bubble Combine multiple cells into one cell with Merge Command

Hot
Amazing! Using Tabs in Excel like Firefox, Chrome, Internet Explore 10!

In Microsoft Excel, we always use Merge command to merge selected cells into one cell.

1. Select the range of cells that you want to combine.

2. Click Home > Merge & Center > Merge Cells. See screenshot:

3. Then all selected cells will be merged into one cell, but only the contents in upper-left cell of selected cell range will be remained. See screenshots:

Most of us may not want this result, we need to merge the cell contents without losing the data. The following method can help you.


Combine multiple cells into one cell with VBA code

The following VBA code can help you to combine multiple cells into one cell, and you can apply the code with following steps:

1. Select the range of cells that you want to combine.

2. Click Developer >Visual Basic, a new Microsoft Visual Basic for applications window will be displayed, click Insert > Module, and input the following code into the Module:

Sub MergeOneCell()
'Updateby20140128
Dim Rng As Range
Dim WorkRng As Range
Dim Sigh As String
On Error Resume Next
xTitleId = "KutoolsforExcel"
Set WorkRng = Application.Selection
Set WorkRng = Application.InputBox("Range", xTitleId, WorkRng.Address, Type:=8)
Sigh = Application.InputBox("Symbol merge", xTitleId, ",", Type:=2)
xOut = ""
Application.DisplayAlerts = False
For Each Rng In WorkRng
xOut = xOut & Rng.Value & Sigh
Next
With WorkRng
.Merge
.Value = VBA.Left(xOut, VBA.Len(xOut) - 1)
End With
Application.DisplayAlerts = True
End Sub

3. Then click doc-multiply-calculation-3 button to execute the code. A dialog pop up for your to select a range to work with the VBA. See screenshots:

doc-combine-cell-contents10

4. Click Ok, another dialog is displayed for you to specify the seperator, in default, the seperator is comma. See screenshot:

doc-combine-cell-contents11

5. Click Ok, then the cell contents in the selected range are combined into a cell. See screenshot:

doc-combine-cell-contents2doc-merge-multiple-workbooks-arrow2doc-combine-cell-contents12

arrow blue right bubble Combine multiple cells into one cell with Kutools for Excel without losing data

If you have Kutools for Excel installed, you can combine cell contents of multiple columns or rows conveniently without using formulas. You can:

Kutools for Excel: with more than 120 handy Excel add-ins, free to try with no limitation in 30 days. Get it Now

1. Select the cells that you want to merge the data. And apply this utility by clicking Kutools > Combine.

2. In the Combine Columns & Rows dialog box, specify the options that you need. See screenshot:

  • Select Into single cell under Merge selected cells.
  • Specify a separator for the combined data. You can separated each content with space, nothing, semicolon, or specific text. And you can also display the combined content in a new line.

3. Then click OK or Apply, all of the data in multiple cells have been merged into one cell. See screenshots:

Use Space as separator No separator (Nothing) Other separator (\)
doc-combine-cell-contents7doc-combine-cell-contents8doc-combine-cell-contents9

The Combine feature of Kutools for Excel can be much more helpful. Know more about the Combine feature...


Related Articles

How to Merge Columns without Losing Data in Excel?

How to Merge Rows without Losing Data in Excel?


Kutools for Excel

More than 120 Advanced Functions for Excel 2013, 2010, 2007 and Office 365.

screen shot

btn read more     btn download     btn purchase

Comments  

-2#Damon R2013-11-25 15:01
Very helpful thank you took me a while to find it but was just what I needed. Note in the VBA code if you want to seperate data with a semicolon, comma or some other charater in the "delim = " "
" field put you charater betwen the quotes example: delim = ";".

Thanks again.
Reply | Reply with quote | Quote
-2#Romilla W2013-12-07 06:48
Thamks a lot for the code. Was very helpful.
Reply | Reply with quote | Quote
0#Tom2014-04-03 11:43
Thanks very much - was a big help!
Reply | Reply with quote | Quote

Add comment


Security code
Refresh