当前位置: 代码迷 >> Office >> Excel表中 962687245810 如何样变成 96287451? 即去掉重复值 后取前8位
  详细解决方案

Excel表中 962687245810 如何样变成 96287451? 即去掉重复值 后取前8位

热度:5935   发布时间:2013-02-26 00:00:00.0
Excel表中 962687245810 怎么样变成 96287451? 即去掉重复值 后取前8位.
将A列中的   字符962687245810

变成96287451.

即先将962687245810去掉重复值,   再取前8位保留?   用什么函数或宏吗?

谢谢

------解决方案--------------------------------------------------------
可以建个自定义函数来解决.

按住ALT后依次按F11,I,M
粘贴下面的代码
Function X(a)
t = Format(a, "0 ")
X = Left(t, 1)
For i = 2 To Len(t)
y = Mid(t, i, 1)
If InStr(X, y) = 0 Then X = X & y
Next i
X = Left(X, 8)
End Function


使用方法:
假设原始数据存放在A1单元格,在其他单元格输入公式 =X(A1) 就可以得到你需要去掉重复数字后的前8位.
或者直接在单元格输入公式 =X( "962687245810 ")也行.
  相关解决方案