EXCEL中如何根据某列找到重复的行，并将重复只保留一条其余的删除？

来源：百度知道 编辑：UC知道 时间：2024/09/23 12:11:42
注： countif 似乎找出的是重复的列，无法自动让重复的列保留一条，而是把所有重复的边数标出，这样

对于想将重复数据保留一条，而不是全部删除的我来说，不实用。
感谢各位的回答：也许我没说清楚。

我要的是： 要删除的是根据某一列求出的重复的列所在的那一 〔行〕数据，而不是只这一列。

下面几位朋友的方法好像都不行。

可用以下两种方法（假定数据在A列A1:A100）：
方法一：直接将不重复数据挑出。
1、在一空白列第一行输入公式：
=index(a:a,small(if(match(a$1:a$100,a$1:a$100,)=row($1:$100),row($1:$100),4^8),row(a1)))&"" 按组合键ctrl+shift+enter结束公式，下拉填充至出现空白。
2、选定下拉填充形成的数据，在其上点鼠标右键——“复制”，再在选定的单元格上点鼠标右键——“选择性粘贴”——“数值”，“粘贴”处选择“无”——“确定”。
3、删除原A列。
方法二：先标记重复数据，再一次性删除。
1、在一空白列第一行输入公式：
=if(countif(a$1:a1,a1)<>1,1,"") 下拉填充。
2、删除所有下拉值为1的行。

看看示范例子，打开的时候选择启动宏（数字证书），可以实现你要的目的的，如果有什么疑问，可以联系QQ 399001
http://www.win-club.net/ray/del.xls

－－－－－

用宏处理这样的问题相对方便一点，有兴趣试试：

一、按ALT+F11 打开VB编辑器

二、双击左边靠上的【工程资源管理器】中的【MS Excel 对象】中的ThisWorkbook，在右边的代码窗口贴入下面的代码：

Sub 删除重复数据()
'以col列为条件删除的重复行数据
'本例是删除标题为sheet1的EXCEL表中以A列（从A2单元格开始）为条件的重复韩国数据
Application.ScreenUpdating = False
'可根据实际情况修改下面三行的结尾值
Dim sheetsCaption As String