欢迎访问江门电脑培训-短期零基础速成学电脑!
语言选择: 繁體中文

办公软件教程

首页>专业知识>办公软件教程>office excel 提取不重复数据,五种方法

office excel 提取不重复数据,五种方法

两天江门office培训和大家分享了如何按照指定次数重复项目的问题,那么,提取不重复的数据又有哪些方法呢?

下面咱们就分别用技巧法、公式法、透视表法以及VBA的方法来为大家做以分享。

高级筛选法

此方法主要利用【数据】选项卡下的【高级筛选】功能,下面大家来看演示:1、  选择要筛选的数据源,然后选择【数据】选项卡下【高级】命令。

image.png

2、  在弹出的对话框中,勾选选择不重复的记录,列表区域即你想要筛选的区域。选择【确定】就OK啦。

image.png

数据透视表法

1、单击数据区域任意单元格,选择【插入】选项卡下的数据透视表命令

image.png

2、在弹出的【创建数据透视表】对话框中保持默认设置,生成一个透视表。

3、拖拽字段到数据透视表的行区域就OK啦

image.png

数组公式法

在随便一个单元格中输入数组公式=INDEX(A:A,SMALL(IF(MATCH(A$1:A$12,A$1:A$12,)=ROW($1:$12),ROW($1:$12),""),ROW(A1)))&""

按Shift+Ctrl+回车,然后向下拖动就完活喽。


VBA法

按Alt+F11键,打开VBE窗口,在代码对话框中输入以下代码,点击【运行】按钮即可:

Sub 合并()

    Dim irow&, iroww&

    irow = 1

    iroww = 1

    Range("d1") = Range("a1")

    Do

        If Cells(irow, 1) <> Cells(irow + 1, 1) Then

            iroww = iroww + 1

            Cells(iroww, 4) = Cells(irow + 1, 1)

            irow = irow + 1

        Else

            irow = irow + 1

    End If

    Loop Until Cells(irow, 1) = ""

End Sub    

这个代码中,数据源是A列,存放结果位置是D1单元格,大家使用时可以根据实际数据自行修改。




SQL语句法

1、选择【数据】选项卡下的【获取外部数据】→【现有连接】

image.png

2、在弹出的【现有连接】对话框中选择【浏览更多】

3、依次选择存放数据的工作簿和工作表。

4、在弹出的对话框中选择【属性】

image.png

5、在命令对话框里输入代码,点击确定:select distinct * from[Sheet1$]

image.png

代码中的Sheet1是工作表名称,使用时注意修改。

在线留言


用手机扫描二维码关闭
二维码