Excel.VBA 快速删除重复记录
来源:互联网 发布:安装软件乱码 编辑:程序博客网 时间:2024/06/01 09:10
Excel.VBA 快速删除重复记录
日常工作中的工作表中经常会有重复记录,清除这些重复记录是一个繁琐的工作,即使在排序之后再进行手工筛选,也经常会出现遗漏,而使用VBA代码就可以快速准确地删除重复记录。
待处理数据如下:
列1列2111223233536
功能实现步骤如下:
1、快捷键Alt+F11打开VBA界面,打开"插入"菜单,插入模块,输入如下代码:
Sub RemoveDuplicateRecord()
' 快速删除重复记录
Dim Row0 As Long, Row1 As Long
With ActiveSheet
Row0 = .Cells(1048576, 1).End(xlUp).Row
.UsedRange.RemoveDuplicates Columns:=Array(1, 2), Header:=xlYes
Row1 = .Cells(1048576, 1).End(xlUp).Row
End With
MsgBox "共删除" & Row0 - Row1 & "(" & Row0 & "-" & Row1 & ")" & "条记录", vbInformation, "提示"
End Sub
2、"开发工具"选项卡"控件"中"插入"按钮控件,指定宏为RemoveDuplicateRecord然后确定退出对话框
3、修改按钮控件显示名为"删除重复"
到现在一起准备妥当,单击"删除重复"按钮试试。执行结果如图
或者快捷键 Alt+F8 直接运行宏
- Excel.VBA 快速删除重复记录
- 快速删除重复记录
- 快速删除Excel重复数据
- 快速删除ORACLE重复记录
- 快速删除重复的记录
- Oracle 快速删除重复记录
- 快速删除oracle重复记录
- 快速删除ORACLE重复记录
- 快速删除重复记录(Oracle)
- 快速删除ORACLE重复记录
- Excel中删除重复数据(用VBA代码)
- oracle-快速删除重复的记录
- oracle快速删除重复的记录
- oracle-快速删除重复的记录
- oracle-快速删除重复的记录
- 如何快速删除Oracle中的重复记录??
- oracle-快速删除重复的记录
- oracle-快速删除重复的记录
- USB枚举过程
- 输出双精度数的不同值
- 输出整数
- Flume-ng生产环境实践(二)flume-ng 测试过程中event丢失部分body数据
- java jdbc 连接 数据库
- Excel.VBA 快速删除重复记录
- 在pdf中增加签名
- JAVA线程同步锁机制分析
- python mysqldb模块
- 经典的01背包问题
- CSDN社区运营午餐会第1期 – 人在驴途
- JavaSE基础复习五:集合和集合框架
- turnigy和zippy电池
- 从今以后就是奋斗了