数据去重复_字典应用实例（每行每列都要去重复值）

我的目标：让中国的大学生走出校门的那一刻就已经具备这些office技能，让职场人士能高效使用office为其服务。支持我，也为自己加油！

前面两节课中的去重复，不论是单张表里的去重复还是多张表里的去重复，需要去重复的数据都在一列，如果一个区域内有很多行数据，每行都需要去重复，该怎么办呢？

案例如下：

上图中上面部分的数据，每行姓名都有重复的，现在要求每行中重复的姓名只保留一个，如果肉眼挑，数据多的话那是超级费劲的。

有的同学可能会想到，数据选项里有删除重复项，删除重复项只能针对一列数据，所以要先要把每行数据转置成列，删除重复项，然后再转置。

当然我们可以把原始数据集体转置后，逐列删除重复项，然后再转置，如下：

条条大道通罗马，怕的是一条道都找不到！

下面我们看下用字典如何实现每行去重复的效果呢？

具体代码如下：

Sub 去重复()  Dim arr1, arr2(1 To 17), i%, m%, d As Object  arr1 = Range("b2:r7")  Set d = CreateObject("scripting.dictionary")  For i = 1 To UBound(arr1)          For m = 1 To UBound(arr1, 2)            arr2(m) = arr1(i, m)            d(arr2(m)) = ""          Next         Cells(i + 8, 2).Resize(1, d.Count) = d.keys         d.RemoveAll  NextEnd Sub

向右滑动可以查看完整代码

上面的循环类似与九九乘法表中的循环，FOR循环中嵌套FOR循环，先循环某一行，然后循环该行的所有列，这样就可以循环完整个区域的数据。

这个例子是数组与字典结合的应用，大家可以练练手。

本节的分享就到这里，鹏哥祝大家每天都有进步。

聚米为谷

博学宏才

如果对VBA感兴趣

手机端请扫描

电脑端请登录

www.mihong.top

找到《带你走进VBA的世界》

跟着我一步步学习VBA

您点的每个赞，我都认真当成了喜欢

数据去重复_字典应用实例（每行每列都要去重复值）相关推荐

oracle怎样统计多列是否重复,Oracle FORM Bulider 校验多行多列数据重复的一种方法...
FORM Bulider开发过程中,有些界面在输入时,经常要判断输入的数据是否有重复. 本文介绍一种在多列多行校验数据的方法. 如下,完成界面上所有输入的工单不能重复的功能. 分析: 因为 FORM ...
bootstarp js设置列隐藏_隐藏工作表的行、列（第一种简单，第二种很坑，第三种最坑）...
各位朋友,你们好. 今天和你们分享怎样将工作表的行.列进行隐藏.我将分享两种方法: 一.直接隐藏通过选中行.列或者单元格,对行列进行隐藏效果见下图: 隐藏行,可以使用:右键菜单.Ctrl+9.开始选 ...
mysql行转列函数_一个小知识点-Hive行转列实现Pivot
前言传统关系型数据库中,无论是Oracle(11g之后)还是SQLserver(2005之后),都自带了Pivot函数实现行转列功能,本文主要讲述在Hive中实现行转列的两种方式. 传统数据库方式 ...
mysql 复杂行转列_有趣的SQL(四) 行转列的复杂应用和优化思想
原标题:有趣的SQL(四) 行转列的复杂应用和优化思想导读本文节选自松华老师<SQL优化专栏> 大家好,我是知数堂SQL 优化班老师网名:骑龟的兔子在之前的的系列文章:有趣的SQL ...
mysql 复杂行转列_有趣的SQL(4) 行转列的复杂应用和优化思想
大家好,我是知数堂SQL 优化班老师网名:骑龟的兔子在之前的的系列文章中,有意思的SQL(3) 行转列,列转行和复制已经给大家介绍了,行转列,列转行,复制等方法. 在这篇文章中,对其进行更深一层 ...
mysql 大量数据更改索引_一文看懂ICP原理--MySQL用索引去表里取数据的一种优化...
概述今天主要介绍一下mysql的ICP特性,可能很多人都没听过,这里用一个实验来帮助大家加深一下理解. 一.Index_Condition_Pushdown Index Condition Push ...
mysql 联查字段名重复_查询数据库多个字段名时的结果有重复的解决办法_MySQL
bitsCN.com 查询数据库多个字段名时的结果有重复的解决办法查询数据库的结果有重复,怎么办? 在使用mysql时,有时需要查询出某个字段不重复的记录,虽然mysql提供有distinct这个关 ...
go数组去除重复_让我们一起啃算法----删除排序链表中的重复元素
删除排序链表中的重复元素(Remove-Duplicates-From-Sorted-List) 题干: 给定一个排序链表,删除所有重复的元素,使得每个元素只出现一次. 示例 1: 输入: 1-> ...
python列表去空值_如何在Python列表中的列表中删除nan / null值？ - python
因此,我有一个具有NaN值的数据框,并将该数据框中的所有行转换为一个列表,然后将其添加到另一个列表中. Index 1 2 3 4 5 6 7 8 9 10 ... 71 72 73 74 75 76 ...

数据去重复_字典应用实例（每行每列都要去重复值）

数据去重复_字典应用实例（每行每列都要去重复值）相关推荐

最新文章

热门文章