excel 删除单元格内重复相同的字，只保留一个

1、首先打开excel表，很明显，在这张表的数据里面，有重复的英文字母。

2、首先点击菜单栏的“数据”选项卡。

3、然后用鼠标框选A1：A7单元格。

4、单击“删除重复项”会出现如图对话框，单击确定按钮。

5、excel会出现如图提示，“发现了1个重复值，已将其删除；保留了5个唯一值”。

6、得到需要的结果。

Sub LKJL()
    Set d = CreateObject("scripting.dictionary")
    For X = 1 To [A65536].End(3).Row
        SS = Cells(X, 1)
        For I = 1 To Len(SS)
            KK = Mid(SS, I, 1)
            d(KK) = ""
        Next
        SS = Join(d.KEYS, "")
        Cells(X, 1) = SS
        d.RemoveAll
    Next
    Set d = Nothing
End Sub

A列数据，批量去重

这种不是去重复的字，你直接查找替换就可以了，比如：选择对应列，ctrl+f，查找经验企业，然后选择全部替换为企业经验，确定就可以了。