09-12-2019 09:47 PM - edited 09-12-2019 09:52 PM
09-12-2019 10:03 PM
Hi @Marvin Oco
You can use Concatenate() formula to merge text in different columns.
File is attached for your reference.
09-12-2019 10:15 PM
@tauqeeracmaneed result like below using formula (not copy paste as we have thousands of columns that need to merge)
09-12-2019 10:35 PM
09-12-2019 11:05 PMSolution
If you are open to a VBA Solution, please find the attached and click the button called "Merge Multiple Columns Into One" on Sheet1 to merge all the columns with data on Sheet1 and get the data in a single column in the next empty column. e.g. if the sheet has 3 columns, the code will combine all the data and place the output in 4th column i.e. column D. Similarly if the sheet has 10 columns, the code will combine all the data and place the output in 11th column i.e. column K.
Sub MergeMultipleColumnsIntoOne() Dim lr As Long Dim lc As Long Dim i As Long Dim j As Long Dim k As Long Dim x As Variant Dim y() As Variant lr = Cells.Find("*", SearchOrder:=xlByRows, SearchDirection:=xlPrevious).Row lc = Cells(1, Columns.Count).End(xlToLeft).Column x = Range(Cells(1, 1), Cells(lr, lc)).Value ReDim y(1 To UBound(x, 1) * UBound(x, 2), 1 To 1) For j = 1 To UBound(x, 2) For i = 1 To UBound(x, 1) If x(i, j) <> "" Then k = k + 1 y(k, 1) = x(i, j) End If Next i Next j Cells(1, lc + 1).Resize(k, 1).Value = y End Sub
by cswshaun on May 29, 2020
by ShereenLavi on May 29, 2020
by Ingeborg Hawighorst on May 13, 2020
by Brian Jones (OFFICE) on May 06, 2020
by cuong on April 22, 2020
Posted in Microsoft Ignite The Tour 2019 on February 14, 2020