如何在Excel中将列中的多行合并成一个单元格?
如何在Excel中将列中的多行合并成一个单元格?
例如:
A1:I A2:am A3:a A4:boy
我想将它们合并为单个单元格“Iamaboy”
这个例子展示了4个单元格合并为1个单元格,但是我有很多单元格(超过100个),我不能使用A1&A2&A3&A4
一个一个地输入它们,我该怎么办?
admin 更改状态以发布 2023年5月22日
我向你展示我的ConcatenateRange VBA函数(感谢Jean的命名建议!)。它将取一个单元格范围(任何维度,任何方向等)并将它们合并为单个字符串。作为第三个可选参数,您可以添加一个分隔符(例如空格或逗号分隔符)。
在这种情况下,您会写下如下内容来使用它:
=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