以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- [求助]请问如何排除单元格重复数字并排序 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=109844) |
-- 作者:feiyu988 -- 发布时间:2017/11/21 11:33:00 -- [求助]请问如何排除单元格重复数字并排序 例如单元格数值为7522997,怎样才能去掉重复,赋值到另外单元格为2579 |
-- 作者:有点甜 -- 发布时间:2017/11/21 12:47:00 -- Dim str As String = "7522997" Dim ls As new List(Of String) For Each s As String In str If ls.Contains(s) = False Then ls.add(s) End If Next msgbox(String.Join("|", ls.ToArray)) |