网站首页 > 资源文章 正文
一些数据会重复出现在表格的不同行列中。如老师任课表,由于一些老师会在多个班级任教,因此其姓名会在表中重复出现,现在需要将所有一线任课老师的姓名从表中提取出来,这就会涉及去重问题。如何实现去重呢?下面笔者以Excel 2019为例介绍具体的操作方法。假设学校无重名的老师,若有则需要先标注以示区别(如张三1,张三2)。
文| 俞木发
○ 方法1. 删除重复值法
用Excel内置的“删除重复值”去重很方便。不过,这个方法要求数据均在一列才行。因此对于多行多列的数据,需要先将去重数据归集在一列中。比如下面是某校老师任课表,现在需要在J列中列出所有任课老师的去重名单(图1)。
定位到B10单元格并输入公式“=C2”,然后向右填充到H10单元格,选中B10:H10数据区域,向下填充公式,直到B列单元格中出现数字0为止,这样在B列中便可以引用全部老师的姓名(图2)。
公式解释:
这里使用“=”在B10单元格中开始引用下一列的数据,公式下拉后B10:H10就会依次引用各自下一列的数据,直到没有数据为止(单元格显示0),所以最终在B列中可以引用所有任课老师的数据。
继续选中B2:B57区域(总共56条数据,B58单元格中的数字为0)中的数据并复制,接着定位到J2单元格,依次点击“开始→粘贴→值”,选中J列中的数据,依次点击“数据→删除重复值”,在弹出的窗口中勾选“列J”,点击“确定”(图3)。
这样J列中的重复值就自动被剔除,在该列中就可以保留不重复的老师名单了(图4)。如果后续名单发生了变化,只要重复上述操作,然后再次执行去重操作即可。
○ 方法2. 函数法
上述方法是手动去重,如果名单发生变化,还需要再次去重。如果要实现去重的自动化,可以借助于函数来实现。
定位到K2单元格并输入公式“=OFFSET(B$2,MOD(ROW(A1)-1,8),INT((ROW(A1)-1)/8))”,然后下拉填充到单元格显示数字0为止(图5)。
公式解释:
先使用MOD函数对“(行数-1)”值和除数“8”(对应原始数据包含老师名单的行数,如本例是8行,第2行-第9行)取余,然后将其作为OFFSET函数偏移的列号。因为原始数据为8行,所以每8行会向右偏移1列引用。接着使用INT函数对“(行数-1)/8”数值向下取整,将其作为OFFSET函数偏移的行号数据。引用的基准是B$2(行锁定),这样下拉公式时,OFFSET就会在K列依次引用B2:H10区域中的数据。
继续定位到L2单元格,输入公式“=IFERROR(INDEX($K$2:$K$100,MATCH(,COUNTIF($L$1:L1,$K$2:$K$100),)),"")”,然后定位到公式地址栏,按下“Ctrl+Shift+Enter”组合键完成数组公式的输入,接着下拉填充公式,直到单元格显示为0,完成去重名单的提取(图6)。
公式解释:
先使用COUNTIF函数以“$L$1:L1”为计数条件,计数区域是“$K$2:$K$100”。这里K100数字至少要比图5中OFFSET函数引用时出现的数字0单元格行号的数字要大。然后将这个计数作为MATCH函数的引用数值,再将其作为INDEX函数引用的行号值。最后在外层嵌套IFERROR函数,对没有引用数值的单元格显示为空。这样作为数组公式使用时,就可以对$K$2:$K$100区域的数据完成去重操作。
○ 方法3. VBA法
多行多列数据去重,实际操作是先将数据组成一列,然后去重,在VBA中可以借助于RemoveDuplicates函数来快速实现。
先到“
https://share.weiyun.com/BYDj7Qhx”下载所需的代码,接着按下“Alt+F11”快捷键打开VBA编辑窗口,依次点击“插入→模块”,将下载的代码粘贴到代码框中(图7)。
代码解释:
先设置行列变量,列内容是第2列→第8列(即B:H列),行内容是第2行→第9行(请根据实际单元格内容设置)。然后遍历这些行列中的内容,将其提取到I列中保存,最后使用RemoveDuplicates函数对I列的内容去重。
返回到Excel窗口中,依次点击“开发工具→宏→去重”,点击“执行”,这样VBA代码就会将所有老师的数据复制到I列并完成去重操作了(图8)。CF
原文刊登于2022 年 10 月 1 日出版《电脑爱好者》第 19 期
猜你喜欢
- 2025-05-02 Windows11 a problem has been detected and windows怎么解决?
- 2025-05-02 模拟飞行 DCS F-14B Tomcat雄猫战斗机 中文指南 3.4警告指示灯
- 2025-05-02 不会用list的程序员不是好程序员,C++标准容器list类实例详解
- 2025-05-02 FTP删除文件夹时提示550 Remove directory operation failed
- 2025-05-02 随便说说removeFromSuperview方法
- 2025-05-02 Changzheng Hospital urges Novartis China to remove medical representatives amidst nationwide anti-corruption drive
- 2025-05-02 Ubuntu 系统安装NVIDIA 驱动(ubuntu 20.04安装nvidia驱动)
- 2025-05-02 自拍恶搞短片《How to Remove Your Mustache》
- 2025-05-02 usb safely remove v6.2.1.1284 使用7年还是那么好用分享给大家
- 2025-05-02 Futu and Tiger to remove apps from Chinese app stores
你 发表评论:
欢迎- 最近发表
- 标签列表
-
- 电脑显示器花屏 (79)
- 403 forbidden (65)
- linux怎么查看系统版本 (54)
- 补码运算 (63)
- 缓存服务器 (61)
- 定时重启 (59)
- plsql developer (73)
- 对话框打开时命令无法执行 (61)
- excel数据透视表 (72)
- oracle认证 (56)
- 网页不能复制 (84)
- photoshop外挂滤镜 (58)
- 网页无法复制粘贴 (55)
- vmware workstation 7 1 3 (78)
- jdk 64位下载 (65)
- phpstudy 2013 (66)
- 卡通形象生成 (55)
- psd模板免费下载 (67)
- shift (58)
- localhost打不开 (58)
- 检测代理服务器设置 (55)
- frequency (66)
- indesign教程 (55)
- 运行命令大全 (61)
- ping exe (64)
本文暂时没有评论,来添加一个吧(●'◡'●)