excel表格多行重复如何删除

1.EXCEL中如何删除重复行?用简单的方法,删除表中多个重复行,A

将有修改标志的行中，把A改成相应的列号 1 ALT+F8，宏名输入“宏1”-》创建，把代码内容改成下面的代码，关闭 2 ALT+F8-》宏1-》选项，填入快捷键 a Sub 宏1（) ' ' 宏1 Macro ' Billgates 记录的宏 2006-1-5 ' ' 快捷键： Ctrl+a ' For l0 = 2 To 12 ' For l1 = 1 To l0 - 1 Range("A" & l1)。

Select '修改 dl1 = ActiveCell。FormulaR1C1 Range("A" & l0)。

Select '修改 dl0 = ActiveCell。FormulaR1C1 If dl1 = dl0 Then Range("Z" & l0)。

Select '修改成有空列的位置 ActiveCell。FormulaR1C1 = "重复第" & l1 l1 = l0 - 1 End If Next l1 Next l0 For l = 2 To 12 Range("Z" & l)。

Select '如果上面的Z修改了，这里的Z要和上面的相同 If ActiveCell。FormulaR1C1 > "" Then Rows(l & ":" & l)。

Select Selection。 Delete Shift:=xlUp l = l - 1 End If Next l End Sub。

2.Excle中如何删除两个表中相同的行(附件)

操作步骤： 1、打开Excel文件，按“Alt+F11”进入VBE编辑环境； 2、“插入”-》“模块”； 3、在右侧的代码编辑区域粘贴以下代码： Option Explicit Sub mark_rept() Application。

ScreenUpdating = False Dim k As Range, c As Range, rngSource As Range Dim strAdd As String With Sheets("sheet2") 。Cells。

Interior。ColorIndex = xlNone Set rngSource = Range(。

[A1], 。Cells(。

[A1]。End(xlDown)。

Row, 1)) End With With Sheets("sheet1") 。 Cells。

Interior。ColorIndex = xlNone For Each k In Range(。

[A1], 。Cells(。

[A1]。End(xlDown)。

Row, 1)) Set c = rngSource。Find(k, LookIn:=xlValues) If Not c Is Nothing Then strAdd = c。

Address Do Range(c, c。Offset(0, 4))。

Interior。Color = RGB(Int((254 * Rnd)), Int((254 * Rnd)), Int((254 * Rnd))) Range(k, k。

Offset(0, 4))。Interior。

Color = RGB(Int((254 * Rnd)), Int((254 * Rnd)), Int((254 * Rnd))) Set c = rngSource。FindNext(c) Loop While Not c Is Nothing And c。

Address strAdd End If Next End With Application。ScreenUpdating = True End Sub Sub delt_rept() Application。

ScreenUpdating = False Dim a As Range, b As Range With Sheets("sheet1") For Each a In Range(。 [A1], 。

Cells(。[A1]。

End(xlDown)。Row, 1)) If a。

Interior。ColorIndex xlNone Then Range(a, a。

Offset(0, 4))。Delete Shift:=xlUp Next End With With Sheets("sheet2") For Each b In Range(。

[A1], 。Cells(。

[A1]。End(xlDown)。

Row, 1)) If b。Interior。

ColorIndex xlNone Then Range(b, b。Offset(0, 4))。

Delete Shift:=xlUp Next End With Application。 ScreenUpdating = True End Sub 4、关闭VBE，返回Excel表格界面，添加两个文本框，分别右键指定宏，如附件所示。

使用时，先按“标记重复数据”把重复的数据用背景色标记出来，然后使用“删除重复数据”来删除这些数据。 由于删除数据时记录指针会随着数据的删除而产生偏差，所以点击一次按钮只能删除部分重复数据，可以多次点击以完成删除工作。

特别提醒，使用前注意留一份备份，以防出现意外情况时不至于造成不必要的损失，养成好的备份习惯，有利于保护数据的完整和安全。 祝好~~ 。

3.excel中如何删除有多项重复的行?

1.先选中单元格区域，然后选择excel中上方的“数据”菜单，然后在其中找到“数据工具”中的删除重复项，点击进入。

2.在弹出的“删除重复项”窗口中，能看到有列的属性等参数设置，全部选择（意思就是所有属性都相同的行才给予删除）。

3.点击确定，就弹出了一个新的窗口，上面统计了删除的内容和重复的行。同时也能看到excel表中已经少了一行，表示结果已经完成了。

相关链接：

4.EXCEL表格有没有自动删除重复的一行这个功能

1.在Excel2003中须用高级筛选来实现。选中需要删除重复项的区域，单击菜单“数据”→“筛选/高级筛选”，打开“高级筛选”对话框（此前若有提示“不能确定标题行”请单击“确定”）此时在列表区域中自动显示选中的区域。我们只要单击选中“选择不重复记录”复选项，再单击“条件区域”的输入框，在工作表中随意单击选中一个空白的单元格作为条件区域，在此选择F3，单击确定后即可隐藏重复项。

提示：若在“高级筛选”对话框中选中“将筛选复制到其他位置”单选项，再指定要复制到的位置，则可在不影响原表的情况下把筛选的无重复项复制到所需位置。

2.在Excel2007中实现筛选功能则简单得多，Excel2007已经提供了删除重复项的工具。只要选中需要删除重复项的区域，单击“数据→删除重复项”，打开“删除重复项”窗口，占“确定”后即可把所选区域中 重复值删除。

注意，若选中区域左右还有数据，会弹出一个警告窗口，对此只要选中“以当前选定区域排序”单选项单击“删除重复项”按钮继续即可。若此时按默认的“扩展选定区域”方式进行删除重复项，则将自动选中整个表格，那么在打开“删除重复项”窗口的列表中，还得再选中含重复值的列进行删除才行，不过这样删除的就不只是重复值了，而是把表格中重复值所在的行整行删除。紫外，若选中的区域不只一列，则进行“删除重复项”操作时是把同行各选中列单元格数据并在一起判断重复的，假设选中A:C三列删除重复项，则必须A1=A2、B1=B2、C1=C2三个条件同时成立时，A2:C2才会被视为重复项删除。

提示：在Excel2003中操作虽然比较复杂，但可以在不影响原表格的情况下把不重复项复制到其他位置。而Excel2007中的删除重复项则必须先把要处理的数据重制到其他位置再进行删除重复项操作，才不会影响原表。

5.excel中几个编码重复,怎样才可以快捷删除多余的编码

假如你编码重复的是列是B列，第一行为项目，第二行起为编码。

在空白列第二行输入如下公式：

=IF(ISERROR(VLOOKUP(B2,B$1:B1,1,0)），""，"重复"）

（将此公式复制后粘贴也可）

如果编码不在“B”列，则将公式中的“B”改为编码所在列的列标，然后将公式拖下去，这时重复的编码对应的行就会出现“重复”字样，如下图：

要查出全部的重复项，其操作如下：

光标放在表格内，点“数据”—“筛选”—“自动筛选”，然后点检查是否重复的列的三角尖（如上图是C1，选“非空白”，则如下图：

找出了重复的编码，删除应该没有问题了！

不知我说清楚了没有，不清楚的话，可与我联系：QQ917632584

6.在excel中删除重复项并记录有多少项重复

方法：

1、选中表格中的需要查找重复值的一列或区域的数据；

2、单击“开始”选项卡，然后单击“样式”组中的“条件格式”；

3、在弹出的下拉菜单中依次选择“突出显示单元格规则”，“重复值”；

4、在弹出的重复值对话框中，设置为中任选一项；

5、单击“数据”选项卡，然后单击“排序和筛选”组中的“筛选”；

6、选择数据标题行的某一列的下三角，“按颜色排序”，颜色为上述设置的重复数据的单元格的颜色；

7、删除掉重复的数据，即可。