Excel字符串连接的函数怎么写

Excel字符串连接的函数怎么写
第一行连续的有100多个字符串现在要写一个函数,把这些字符串连接起来,中间要用“&”隔开。比如:1,2,3,4,5,6....,做好后要变成1&2&3&4&......
假设数据在第一行。
点A2――在编辑栏输入:
=
再选第一行数据区域(如A1~A100)――编辑栏变成:
=A1:A100
不要回车!――按F9―物芹春―编辑栏变成={1,2,3,4,5,6....}
删首盯除等号“=”和大括号“{}”――回车――A2单元格变成:
1,2,3,4,5,6....
选A2――Ctrl+H――查找内容:
,
替换为:
&
替换(完成了罩耐)。
如果你是想把每个单指缓元格内的字符连接起凯逗孙来,下面的自定义函数能帮到你
打开VBA
插盯链入
模块1
复制下面代码
Function HB(if_range, Optional criteria, Optional hb_range, Optional separator)
If IsMissing(separator) Then separator = " "
If IsMissing(hb_range) Then Set hb_range = if_range
If IsMissing(criteria) Then
For Each c In hb_range.Cells
t = t & "&" & c
Next
Else
If Left(criteria, 1) = "F" Then
For i = 1 To if_range.Cells.Count
If InStr(if_range.Cells(i), Mid(criteria, 2)) Then t = t & "&" & hb_range.Cells(i)
Next i
Else
For i = 1 To if_range.Cells.Count
If Application.Evaluate(if_range.Cells(i) & criteria) Then t = t & "&" & hb_range.Cells(i)
Next i
End If
End If
HB = Mid(t, 2)
End Function
在A2输入
=A1
在笑念腊B2输入
=A2&"&"&B1
鼠标移到B2右下角,出现一“+”碰滑,按着它往右一直拖到最后一字符的下面一格。高中
选中最后一格,右键,复制,右键,选择性粘贴,数值。
完成。
=CONCATENATE(A1,"&",B1,"&",C1)
← 上一篇: 下一篇: →