企业网站系统源码wordpress 软件 主题

企业网站系统源码,wordpress 软件 主题,长虹电视网站建设中,得到app文章目录1秒#xff0c;真的只需要1秒代码来了#xff0c;复制就能用为什么这个宏比Excel自带的更好用#xff1f;这些场景#xff0c;你一定用得上想玩点花的#xff1f;可以改#xff01;写在最后上周五下午#xff0c;财务小美在群里哀嚎#xff1a;“救命#xff…文章目录1秒真的只需要1秒代码来了复制就能用为什么这个宏比Excel自带的更好用这些场景你一定用得上想玩点花的可以改写在最后上周五下午财务小美在群里哀嚎“救命这两张表对了我一下午眼睛都要瞎了还是没找出哪些交易是重复的”紧接着HR阿强也发来一张密密麻麻的花名册“你们看看这个员工名单同一个名字出现了三次我都不知道该信哪条记录……”那一刻我突然意识到重复数据简直是职场人的集体噩梦。作为一个常年和数据打交道的博主我其实早就被这种问题折磨过无数次。以前我也用过Excel的条件格式、高级筛选甚至试过肉眼一个个对——结果就是费时费力还容易漏。直到我写了这个VBA宏。1秒真的只需要1秒不管你选的是连续区域还是东一块西一块的多列数据只要运行这个宏所有重复的单元格都会自动变成浅红色。给你们看效果脑补一下动图原本杂乱无章的表格瞬间像被施了魔法重复项一目了然。代码来了复制就能用别怕不用懂编程跟着操作就行打开Excel按Alt F11进入VBA编辑器插入一个新模块把下面这段代码贴进去Sub 高亮重复数据() Dim rng As Range, cell As Range Dim dict As Object Dim cellValue As Variant On Error Resume Next Set rng Application.InputBox(请选择要检查重复的区域, Type:8) On Error GoTo 0 If rng Is Nothing Then MsgBox 您取消了选择。, vbExclamation Exit Sub End If rng.Interior.ColorIndex xlNone Set dict CreateObject(Scripting.Dictionary) For Each cell In rng cellValue cell.Value If Not IsError(cellValue) Then If dict.exists(cellValue) Then dict(cellValue) dict(cellValue) 1 Else dict.Add cellValue, 1 End If End If Next cell For Each cell In rng cellValue cell.Value If Not IsError(cellValue) Then If dict(cellValue) 1 Then cell.Interior.Color RGB(255, 204, 204) End If End If Next cell MsgBox 重复数据已标红, vbInformation End Sub关掉编辑器回到Excel。按Alt F8找到“高亮重复数据”点击“执行”框选你要检查的区域确认——见证奇迹的时刻到了。为什么这个宏比Excel自带的更好用我知道你们肯定会问Excel不是有“条件格式”里的“突出显示重复值”吗干嘛还要自己写宏问得好。Excel自带的功能确实方便但它有个硬伤不支持不连续区域。如果你同时选了A列和C列中间隔着B列条件格式要么报错要么只处理其中一块。而我的宏随便你选几块它都能一起查。另外自带功能只能标记重复项但无法先清除旧颜色再重新标记。用这个宏每次运行都会自动清空之前的填充色不会搞混。这些场景你一定用得上我把这个宏分享给财务小美之后她惊喜地发现原来不止对账能用财务对账从银行导出的流水和自己记账的记录混在一起一键标出两边都有的交易剩下的就是单边异常项。HR整理花名册不同部门上报的员工名单合并后同一员工可能被重复录入高亮后轻松合并。销售客户去重多个渠道收集的潜在客户名单用手机号或邮箱列判断重复避免重复跟进。库存盘点商品编码输错了导致重复高亮后立刻修正。活动报名统计检查是否有同一人重复提交报名表防止名额被占。甚至有个做数据分析的粉丝告诉我他用这个宏来检查日志数据里的重复记录比写SQL还快。想玩点花的可以改如果你觉得浅红色不够显眼可以把代码里的RGB(255, 204, 204)改成你喜欢的颜色比如RGB(255, 255, 0)是亮黄色RGB(0, 255, 0)是绿色。如果想高亮整行而不是单个单元格也很简单把第二个循环里的cell.Interior.Color改成cell.EntireRow.Interior.Color就行。写在最后说实话写这个宏的初衷纯粹是想让自己少加点班。没想到分享出去之后收到了好多留言说“太好用了”“求多分享一些这种实用小工具”。其实职场里的很多烦恼往往就差一个“偷懒”的思路。与其埋头苦干不如花10分钟研究一下怎么让Excel帮你干活。这个宏我已经用了两年每次运行都觉得自己赚到了时间。如果你试了之后有什么问题或者想让我帮你定制其他功能直接在评论区留言。我不保证秒回但保证每个都会看。如果这篇这篇文章对您有帮助关注、点赞、收藏三连支持一下。有疑问或想法评论区见。我们下期再见。