如何将数据从列转置为Excel中的单个单元格？

当您需要将数据列表转置到工作表中的单个单元格中时，通常可以应用 CONCATENATE 函数可以将单元格列表合并为一个单元格，但是，如果需要合并大量数据，将很复杂。 本文，我将为您介绍一些快速技巧来解决Excel中的此任务。

使用用户定义函数将数据从列转置到一个单元格中

使用 Kutools for Excel 将列中的数据转置到一个单元格中

使用用户定义函数将数据从列转置到一个单元格中

除了合并功能以合并单元格值列表之外，您可以应用以下VBA代码以尽快获得结果。

1。 按住 ALT + F11 键，然后打开 Microsoft Visual Basic应用程序 窗口。

2。 点击 插页 > 模块，然后将以下代码粘贴到 模块 窗口。

VBA代码：将列中的数据转置为一个单元格

Function transposeRange(Rg As Range)
'updateby Extendoffice
    Dim xCell As Range
    Dim xStr As String
    For Each xCell In Rg
        If Not IsEmpty(xCell.Value) Then
            xStr = xStr & xCell.Value & ","
        End If
    Next
    transposeRange = Left(xStr, Len(xStr) - 1)
End Function

3。 然后保存并关闭此代码，返回工作表，并输入以下公式： = transposerange（A1：A10） 放入空白单元格以放入结果，然后按 输入 键，您将获得列中的所有单元格值都位于单个单元格中，请参见屏幕截图：

备注：在上面的代码中， A1：A10 是您要转置为一个单元格的列表范围，而且，您可以通过仅更改脚本中的逗号来将合并的内容与其他定界符（例如，逗号，破折号，空格等）分开。 xStr = xStr＆xCell.Value＆“，”.

使用Kutools for Exce将列中的数据转换为一个单元格

如果你有 Kutools for Excel，其功能强大的工具-结合，您可以将列，行或范围内的数据合并到一个单元格中。

安装后 Kutools for Excel，请执行以下操作： 立即免费下载Kutools for Excel！ )

1。 选择要合并到一个单元格中的数据列。

2。 点击 库工具 > 合并与拆分 > 合并行，列或单元格而不会丢失数据，请参见屏幕截图：

3。 在弹出的对话框中，选择 合并成单个单元格 在下面 根据以下选项合并选定的单元格，然后指定分隔符以分隔合并的内容，请参见屏幕截图：

4。 然后点击 Ok or 申请 按钮，您将根据需要获得以下结果：

立即下载和免费试用Excel的Kutools！

演示：使用Kutools for Exce将列中的数据转换为一个单元格