关于excel如何删除重复项的问题
答案:2 悬赏:40 手机版
解决时间 2021-03-18 22:13
- 提问者网友:浪荡绅士
- 2021-03-18 16:46
我把很多单词放在excel的一列,用删除重复项为什么删不完全
最佳答案
- 五星知识达人网友:执傲
- 2021-03-18 17:08
是有空格造成的,可以先去除空格然后再删除
假定单词在A列,从第一行开始
b1输入
=SUBSTITUTE(A1," ","")
公式中第1个引号内输入一个空格(用空格键),第2个没有
公式下拉,
复制B列>右键>选择性粘贴>数值
删除A列
此后再删除重复项应该没有问题,试试看吧。
假定单词在A列,从第一行开始
b1输入
=SUBSTITUTE(A1," ","")
公式中第1个引号内输入一个空格(用空格键),第2个没有
公式下拉,
复制B列>右键>选择性粘贴>数值
删除A列
此后再删除重复项应该没有问题,试试看吧。
全部回答
- 1楼网友:慢性怪人
- 2021-03-18 17:43
这个问题我以前也回答过。由于数据繁多,用筛选功能也不方便。所以,推荐用宏实现。 用宏的话必须清楚你到底什么样的行才算重复的行。上次的一位网友abcd四列相同就算重复。我的回答如下: == == == == == == == == == == == == == == == == == == == == == == 不知道你有没有用过宏,所以,我先说怎么启用宏。 默认情况下,宏是被禁用的。打开excel,在菜单栏点击“工具”->“宏”->“安全性”,在打开的对话框中,选择“中”或“低”。建议选“中”。 下面,写入宏以实现该功能。步骤如下: “工具”->“宏”->“visual basic编辑器”,在打开的vb编辑器中左侧有“工程”窗口,在这里的“模块”上点右键,“插入”->“模块”,此时,生成了“模块1”,双击“模块1”,在打开的窗口里写入需要的宏代码。要实现你所需要的功能的宏代码我已经为你写好,代码如下: sub sub1() activecell.specialcells(xllastcell).select datarows = selection.row if datarows <> 1 then for i = 1 to datarows if range("a" & cstr(i)) & range("b" & cstr(i)) & range("c" & cstr(i)) & range("d" & cstr(i)) <> "" then j = datarows do while j > i if range("a" & cstr(i)) = range("a" & cstr(j)) and range("b" & cstr(i)) = range("b" & cstr(j)) and range("c" & cstr(i)) = range("c" & cstr(j)) and range("d" & cstr(i)) = range("d" & cstr(j)) then rows(j).delete shift:=xlup datarows = datarows - 1 end if j = j - 1 loop end if next i end if end sub 代码写好了,关闭vb编辑器。只要运行该宏就可以实现删除重复的项目的操作。“工具”->“宏” ->“宏”,选中“sub1”,点执行。 我写的这个代码实现了如下功能:查找a列b列c列d列都相同的数据(区分大小写)并删除至只剩一行(即无重复),考虑到你可能使用空行来使数据更具结构性,因此,这里我设置了不删除空行。由于宏操作不可撤消,请在使用该宏前备份数据。 == == == == == == == == == == == == == == == == == == == == == == 你可以参照上面的代码进行修改,以适合你的需要。当然,你也可以找我帮忙,我的qq号:840465
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
推荐资讯