[Excle如何查找重复值]2选中指定区域后,在开始菜单中,找到条件格式。3点击条件格式,选择 突出显示单元格规则---》重复值,点击确认。4在弹出的提示框中点击确认,或者也可以选择设置为其他颜色。5这...+阅读
请仔细阅读并修改相关数据。
1、打开有重复数据的EXCEL
2、Alt+F11 打开宏编辑器
3、左边双击:ThisWorkBook
4、贴入以下代码并运行即可:
Sub 删除重复数据()
'删除col列的重复数据
'本例是删除标题为sheet1的EXCEL表中A列(从A2单元格开始)的重复数据
Application.ScreenUpdating = False
'可根据实际情况修改下面三行的结尾值
Dim sheetsCaption As String: sheetsCaption = "Sheet1"
Dim Col As String: Col = "A"
Dim StartRow As Integer: StartRow = 2
'以下不需要修改
Dim EndRow As Integer: EndRow = Sheets(sheetsCaption).Range(Col & "65536").End(xlUp).Row
Dim Count_1 As Integer: Count_1 = 0
Dim count_2 As Integer: count_2 = 0
Dim i As Integer: i = StartRow
With Sheets(sheetsCaption)
Do
Count_1 = Count_1 + 1
For j = StartRow To i - 1
If .Range(Col & i) = .Range(Col & j) Then
Count_1 = Count_1 - 1
.Range(Col & i).EntireRow.Delete
EndRow = Sheets(sheetsCaption).Range(Col & "65536").End(xlUp).Row
i = i - 1
count_2 = count_2 + 1
Exit For
End If
Next
i = i + 1
Loop While i< EndRow + 1
End With
MsgBox "共有" & Count_1 & "条不重复的数据"
MsgBox "删除" & count_2 & "条重复的数据"
Application.ScreenUpdating = True
End Sub
5、按F5键运行即可
以下为关联文档:
如何在Word中添加删除线2选中想要添加删除线的文字内容。3切换到开始选项卡。4在字体区域中找到删除线按钮。5点击按钮即可给选定内容添加删除线。6想要删除删除线的话,只需要再次选中添加了线...
当孩子爱上重复:爸妈最应该做这件事这是第多少次讲这个故事了,大人讲都讲烦了,孩子为什么还要听呢?其实等孩子感觉自己已经“熟练掌握”这项技能时,就会自动转移注意力,而在此之前还是会不断重复。重复对孩子来说...
有个严重的问题,手足口病可重复感染吗近期,气温忽高忽低,此时也是手足口病的高发季节。暑假即将来临,孩子们将在家中度过炎炎夏日,手足口病散发形势会否更加严峻?现象医院儿科感染科多见手足口病一连几天,我们门诊部...
21分钟生下宝宝,医生重复说这句话,让宝妈开心不已!文好孕姐小莉早起六点去厕所见红,但是量不多,就赶紧喊上老公和婆婆去医院,当时老公带着她去医院,婆婆在家煮了一些鸡蛋,说吃了有力气生孩子。到了医院后做了胎心监护,然后回屋里...
孩子总是重复读一本书是什么原因?家长要怎么做爱听故事是每个宝宝的天性,讲故事是每个家长的天职。早期阅读启蒙,亲子阅读是必不可少的方式,孩子爱上读书,应该是件好事情,但是很多妈妈不禁疑虑,宝宝总是喜欢反复阅读一本书,不愿...
宝宝做重复性动作时,你是否急着打断他有的家长说7-9个月这个时期自家的宝宝会不断的把给他的玩具扔出去,或者说吃饭的时候把勺子扔了,捡起来又扔,有的家长说捡2-3次还好,可是最多的时候10次以上那是常事呀!让家长疲惫...
重复投递简历,一定会被HR封杀职场上关于求职方面的传闻有许多,例如,有人说重复投简历只会被HR列入黑名单……事实真如传闻吗?这么做一定会招致求职失败吗? 有不少求职者曾在前程无忧论坛(bbs.51job.)上发帖表...
解析小孩子喜欢重复事情的缘由前言:相信和孩子的时间呆得长久了,父母就会发现宝宝特别爱重复的做一些事情,一遍又一遍不厌其烦的去做,当然许多的妈妈也是不会懂得孩子为什么会这样,下面就由育儿专家来为我们详...
拒绝你的公司,可以重复投递简历吗求职者迫切想要得到某职位的心情可以理解,但凡事过犹不及,一个职位重复投递不仅不会提高获得面试的机会,反而是增加了HR的工作量。 有不少求职者曾在前程无忧论坛(bbs.51job.)上...