求助！如果将表中重复的姓名及相关信息都删除

/wx天街小雨

原文档 原文档中姓名那一列刘世菊出现了两行，周厚贵出现了2行，现在整个文档中出现重复两行的数据很多，求个简单的办法把重复的那一行删除掉，变成这样的 ，因为文档实在是太多了，用最笨的办法一行一行的删除工作量太大了，而且容易出错，求助各位高手给帮个忙，先多谢了！！！！附件上传在下面 原文档.rar (2.39 KB, 下载次数: 11)

2014-7-16 21:10 上传

点击文件名下载附件

李兴德

筛选不重复记录就好了　　

/wx天街小雨

不会操作，麻烦大虾给出详细的操作

/wx天街小雨

其他的操作步骤都会了，效果也做出来一部分，只是那个筛选条件的公式还有点问题，我现在用的公式是这样的=MATCH($C2,$C$2:$C$177,)=ROW(A1)-1，效果也出来了，但是如果其中没有重复的姓名的那一行就会被筛选掉了，，比如说王三，在表格里只有一行记录，那用上面这个公式就会把王三这一行的数据全部都筛掉了，麻烦哪位大吓指教指教啊

lpzxhjp

1. Sub test()
   
2.   Dim d As Object
   
3.   Dim r%, i%, col
   
4.   col = InputBox("请输入要删除重复数据的一列的列标（必须是英文字母）！", "输入列标", Split(ActiveCell.Address, "$")(1))
   
5.   If col = "" Then Exit Sub
   
6.   Set d = CreateObject("scripting.dictionary")
   
7.     r = Cells(Rows.Count, col).End(xlUp).Row
   
8.     For i = r To 1 Step -1
   
9.       If Not d.Exists(Cells(i, col).Value) Then
   
10.         d(Cells(i, col).Value) = "'"
    
11.       Else
    
12.         Rows(i).Delete
    
13.       End If
    
14.     Next
    
15. End Sub
    

复制代码

/wx天街小雨

哪位大虾能指点一下使用高级筛选中--筛选不重复选项的办法，我已经懂了怎么用，重要的是那个条件不会用函数

U9中文

用旋转透视表，直接把所有要素全部拉进去，如果重复项是完全一样的话，是会自动合并成1条记录的

杜小月

/wx天街小雨 发表于 2014-7-17 08:24
不会操作，麻烦大虾给出详细的操作

EXCEL 2007 数据选项那里有个 删除重复项