在工作中,Excel的运用十分广泛,我们在处理大量数据的时候,经常将单元格中重复的亨蚂擤缚字符删除,并且只保留一个如何快徽革蕖颖速而高效的进行操作,提高工作效率,是我们每一个职场人都关心的问题。这里小编就将自己在工作中使用的一种有效方法介绍给大家。
工具/原料
excel2007
方法/步骤
1、我们打开要进行数据处理的表格
2、我们会发现,C列每个单元格里边的字母都有个别是重复的,下面我们来说先我们的目的:把C列字符串中的字符保留唯一值,去掉多余重复的值
3、我们按ALT+f11,进入VBE程序操作页面
4、将鼠标下移,右键弹出如图
5、选择插入-模块
6、鼠标向右移动,将如下代码写入:Subtest()DimdA衡痕贤伎sObjectDimr%,i%DimarrSetd=惺绅寨瞀CreateObject("scripting.dictionary")WithWorksheets("sheet1")r=.Cells(.Rows.Count,3).End(xlUp).Rowarr=.Range("c2:d"&r)Fori=1ToUBound(arr)d.RemoveAllForj=1ToLen(arr(i,1))ch=Mid(arr(i,1),j,1)d(ch)=""Nextarr(i,2)=Join(d.Keys,"")Next.Range("d2").Resize(UBound(arr),1)=Application.Index(arr,0,2)EndWithEndSub
7、按F5,运行代码,后返回工作表,我们会发现单元格中的重复字符已经被去掉