怎么取消在excel的一个单元格中重复的文字 只保留一份 有大量的数据...
发布网友
发布时间:2天前
我来回答
共3个回答
热心网友
时间:2天前
用查找替换不就行了啊。
热心网友
时间:2天前
重复的文字固定吗?如果是固定的,可以使用查找替换的功能来做;如果不固定,需要判断重复的文字,则需要编写宏了。
热心网友
时间:2天前
按下ALT+F11,菜单:插入-模块,然后复制下面代码 假设你在A1中输入字符串,那就在B1中输入=ORDER(A1) 这样B1就是你要得到的数字
Public Function order(ByVal m As String) As String
Dim s As String, dd As Boolean, xx As Integer
dd = False
For i = 1 To Len(m)
s = Left(m, i)
If InStr(i, m, s) >= 1 Then
dd = True
xx = i
Else
Exit For
End If
Next
If dd Then
order = Mid(m, xx + 1, Len(m))
Else
order = m
End If
End Function