在 Excel 的一个单元格中添加单元格区域的文本答案

【问题标题】：Add text of cell range in one cell in Excel在 Excel 的一个单元格中添加单元格区域的文本
【发布时间】：2011-11-17 15:24:13
【问题描述】：

我想将一系列单元格连接到一个单元格中，没有宏/vbscript。

公式CONCATENATE() 获取单个单元格。

【问题讨论】：

标签： excel string-concatenation

【解决方案1】：

这并不容易，但我最终得到了一个效果惊人的解决方案！

A1: 要搜索的文本

B1:BN: 结果范围内会去

B5：分隔符文本

=MID($A$1,LEN(CONCAT($B$1:B1))+COUNTA($B$1:B1)*LEN($B$5)+1,
    SEARCH(
        $B$5,
        $A$1,
        LEN(
           CONCAT($B$1:B1)) + COUNTA($B$1:B1)*LEN($B$5)+1)
           -(LEN(CONCAT($B$1:B1))+COUNTA($B$1:B1)*LEN($B$5)+1))

就目前而言，它完美无缺。请注意，您可以使用任何文本作为分隔符。就我而言，它是“逗号 + 空格”。

Concat 是一个连接一系列单元格的简单函数：

Function Concat(myRange As Range) As String
  Dim r As Range
  Application.Volatile
  For Each r In myRange
    If Len(r.Text) Then
      Concat = Concat & IIf(Concat <> "", "", "") & r.Text
    End If
  Next
End Function

【讨论】：

【解决方案2】：

您可以使用CONCATENATE() 或& 加入单元格。除非您使用诸如MCONCAT 之类的UDF，否则您无法一次获取所有范围。

【讨论】：