如何将列中的行合并为Excel中的一个单元格?

内容来源于 Stack Overflow,并遵循CC BY-SA 3.0许可协议进行翻译与使用

  • 回答 (2)
  • 关注 (0)
  • 查看 (9)

例如

A1:I
A2:am
A3:a
A4:boy 

我想把它们合并到一个“Iamaboy”

这个例子显示了4个单元格合并成一个单元格,但是我有许多单元格(超过100个),我不能使用A1 & A2 & A3 & A4我能做什么

提问于
用户回答回答于

可以编写这个来使用它:

=ConcatenateRange(A1:A4)
Function ConcatenateRange(ByVal cell_range As range, _
                    Optional ByVal separator As String) As String

Dim newString As String
Dim cell As Variant

For Each cell in cell_range
    If Len(cell) <> 0 Then
        newString = newString & (separator & cell))
    End if
Next

If Len(newString) <> 0 Then
    newString = Right$(newString, (Len(newString) - Len(separator)))
End If

ConcatenateRange = newString

End Function
用户回答回答于

如果喜欢在不使用VBA的情况下这样做,可以尝试以下方法:

  1. 将数据保存在单元格A1:A 999(或类似的)中。
  2. 将单元格B1设置为“=A1”
  3. 将单元格B2设置为“=B1&A2”
  4. 将单元格B2一直复制到B 999(例如复制B2、选择单元B3:B99并粘贴)

单元格B 999现在将包含要查找的级联文本字符串。

扫码关注云+社区