EXCEL合并,如何用标点符号将数据合并(不进行计算)。请高手赐教公示,本人不会VBA代码,非常感谢!!!

例如
A1 111111 B1 a
A2 111111 B2 b
A3 111111 B3 c
如何变成
A1 111111 B1 a,b,c

用countif函数:
比如要统计A1到F1中有几个“△”,就在G1中输入:
=COUNTIF(A1:F1,"△")
要注意一点:*号是通配符,不能直接查找,要输入成"~*",即:
=COUNTIF(A1:F1,"~*")
另外,站长团上有产品团购,便宜有保证
温馨提示:答案为网友推荐,仅供参考
第1个回答  2011-06-28
如果不用vba,只能用笨办法 &
公式
=B1&","&B2&","&B3
因为CONCATENATE函数不支持数组。所以如果你的实际操作是很多合并,公式没办法。
或者C2
=B1&","&B2
下拉公式
最后一行是你要的结果。追问

A列有几千数据,B列也有几千数据,这样做的话会死人的!!

追答

嗯。我猜你不是几个数据那么简单。
正如我所说的,CONCATENATE不支持数组,所以你要求用公式,无法实现你要的效果。
提供一个自定义函数
用不用自己选择吧。
打开工作簿。
按alt+F11
,插入,模块,将下面的代码复制进右边的空白区
'-------------------------------------------------
Function 合并(符号 As String, ParamArray 区域() As Variant) As Variant
Dim tmptext As Variant, i As Variant, cellv As Variant
Dim cell As Range
合并 = ""
For i = 0 To UBound(区域)
If Not IsMissing(区域(i)) Then
Select Case TypeName(区域(i))
Case "Range"
For Each cell In 区域(i)
合并 = 合并 & cell & 符号 '合并
Next cell
Case "Variant()"
For Each cellv In 区域(i)
合并 = 合并 & cellv & 符号
Next cellv
Case Else
合并 = 合并 & 区域(i) & 符号
End Select
End If
Next i
合并 = Left(合并, Len(合并) - Len(符号))
End Function
'---------------------------------------------------------
然后存盘。
再重新打开,打开时选择启用宏,如果没有启用宏选项,按提示,进入工具,宏,安全性调为中。再重新打开
然后,如果你要合并B1:B100
就输入公式
=合并(",",B1:B100)
即可

第2个回答  2011-06-28
在C列对应位置输入标点符号,再用公式PHONETIC(B1:C3)即可得到想要的结果(注意默认计算方向是先行后列
第3个回答  2011-06-28
用countif函数:
比如要统计A1到F1中有几个“△”,就在G1中输入:
=COUNTIF(A1:F1,"△")
要注意一点:*号是通配符,不能直接查找,要输入成"~*",即:
=COUNTIF(A1:F1,"~*")
追问

这个不行,没有高手吗???

相关了解……

你可能感兴趣的内容

本站内容来自于网友发表,不代表本站立场,仅表示其个人看法,不对其真实性、正确性、有效性作任何的担保
相关事宜请发邮件给我们
© 非常风气网