excel利用自定义函数去掉字符串中的重复字符

办公教程导读

收集整理了【excel利用自定义函数去掉字符串中的重复字符】办公软件教程，小编现在分享给大家，供广大互联网技能从业者学习和参考。文章包含648字，纯文字阅读大概需要1分钟。

办公教程内容图文

如果要在Excel中将单元格内字符串中的重复字符去掉，重复的字符仅保留一个，如将字符串“1232345667”变成“1234567”，可以用自定义函数实现。

    步骤如下：

    1.按Alt+F11，打开VBA编辑器。

    2.单击菜单“插入→模块”，在代码窗口中粘贴代码：

    Function RemoveDupChar(theString As String) As String
    Dim i As Integer
    For i = 1 To Len(theString)
      If InStr(RemoveDupChar, Mid(theString, i, 1)) = 0 And _
         Mid(theString, i, 1) <> " " Then _
        RemoveDupChar = RemoveDupChar & Mid(theString, i, 1)
    Next
    End Function

    3.返回Excel工作表界面。

    假如字符串在A1单元中，在B1单元格中输入公式：

    =RemoveDupChar(A1)

    该自定义函数还可以将多个单元格中的字符串合并后去重复，如A6单元格为“12345”，A7单元格为“23456”，在B6单元格输入公式：

    =RemoveDupChar(A6&A7)

    公式返回“123456”。

办公教程总结

以上是为您收集整理的【excel利用自定义函数去掉字符串中的重复字符】办公软件教程的全部内容，希望文章能够帮你了解办公软件教程excel利用自定义函数去掉字符串中的重复字符。
如果觉得办公软件教程内容还不错，欢迎将网站推荐给好友。