首页 办公 正文

excel怎么筛选连号(excel如何筛选出连续的数字)

EXCEL筛选后将序号自动编号的步骤为:四、然后在单元格内输入完整公式=subtotal(3,Excel筛选指定尾数手机号码方法例一:"00"))公式输入完毕按Ctrl+Shift+Enter结束。...

EXCEL筛选后怎么把序号自动编号?

EXCEL筛选后将序号自动编号的步骤为:

一、首先打开excel中其中的一个表格,接着按住ctrl连续序号。

二、然后筛选一些人名后,会发现时序号不是连续的。

三、接下来再点击右侧重新创建一个序号列,在此单元格内输入=subtotal,然后选择3。

四、然后在单元格内输入完整公式=subtotal(3,B$2:B2)。

五、选中序号后,然后按住键盘上的ctrl+enter快捷键后刷新序号,就可以设置成自动编号了。

Excel筛选指定尾数手机号码方法

例一:筛选出最后两个数字相同的.号码

如要筛选出尾数为“00”、“11”、“22”、“33”……“88”、“99”的号码。

假如要筛选的手机号在A2:A125区域中,以B列为辅助列,在B2单元格中输入数组公式:

=OR(RIGHT(A2,2)=TEXT(11*(ROW($1:$10)-1),"00"))

公式输入完毕按Ctrl+Shift+Enter结束,然后向下填充公式。这样,A列中凡是结尾两个数字相同的手机号,在B列中都显示为“TRUE”。

然后筛选B列中值为的TRUE的单元格即可。例如在Excel 2010中选择A1:B1区域, 单击功能区“数据”选项卡,在“排序和筛选”组中点击“筛选”,再单击B2单元格中的下拉箭头,选择“TRUE”。

例二:筛选出最后三个数字为连号的手机号

如筛选出尾数为“012”、“123”……“678”、“789”的号码。

在B2单元格中输入数组公式:

=OR(RIGHT(A2,3)=MID("0123456789",ROW($1:$8),3))

向下填充公式后再筛选“TRUE”即可。

例三:同时筛选尾数为多种指定号码的手机号

如筛选尾数为“66”、“88”、“99”、“123”、“456”、“789”的手机号。

在B2单元格中输入公式:

=OR(--RIGHT(A2,{2,3})={66;88;99;123;456;789})

该公式为普通公式,输入完毕直接回车即可,无需按三键结束。然后向下填充公式,再筛选“TRUE”即可。

公式说明:RIGHT函数的第二个参数为1行2列数组“{2,3}”,函数也返回1行2列的数组,如B2单元格“--RIGHT(A2,{2,3})”返回“{23,123}”,该数组的两个元素将与6行1列的垂直数组“{66;88;99;123;456;789}”中的每个元素逐一对比,返回仅包含“TRUE”和“FALSE”的6行2列的数组:

{FALSE,FALSE;FALSE,FALSE;FALSE,FALSE;FALSE,TRUE;FALSE,FALSE;FALSE,FALSE}

如果其中包含“TRUE”(即手机号的尾数为指定号码之一),则OR函数返回“TRUE”,否则返回“FALSE”。

EXCEL中自动筛选后,如何能让序号连续拖下去

EXCEL中自动筛选后让序号连续拖下去步骤如下:(演示使用WIN10系统,其他Windows版本操作大致相同)

1丶打开要操作的Excel文件

2丶同时按ctrl + L打开创建表格的提示框。单击框中的“确定”按钮

3丶系统将自动生成如下所示的表格

4丶输入A2单元格=subtotal(103,B$2:B2)*1。

5丶然后按回车键,系统自动填写序列号。

6丶执行此步骤即可进行筛选。筛选贵州内容显示,如本例所示。

7丶筛选成功后,第一列的序列号仍然是连续的。

excel如何筛3连号

假如你的数据区域在A1:A10,在B1中输入

=IF(SUMPRODUCT((A$1:A$10=A1+1)*1+(A$1:A$10=A1-1)*1)=2,"三连号","")

向下复制公式到B10

用这个方法,可以显示出三连号的中值。

求大神指点EXCEL筛选连号方法

要是标出来的话,条件格式应该可以,

删除就得筛选后再删除了

用Excel对比三个数ABC,如何实现过滤连号、顺子的功能呢?

可以使用自定义函数实现,代码:

Option Explicit

Function 最大连号数(rng As Range)

    Dim arr, i, j, k, n, m, t, r As Range

    '复制区域值到数组中,跳过空单元格、文本单元格,个数存入n

    ReDim arr(1 To rng.Cells.Count)

    i = 1

    For Each r In rng.Cells

        arr(i) = r.Value

        If arr(i)  "" And VarType(arr(i))  vbString Then i = i + 1

    Next r

    n = i - 1

    '数组升序排序

    For i = 1 To n - 1

        k = i

        For j = i + 1 To n

            If arr(j)  arr(k) Then k = j

        Next j

        If k  i Then

            t = arr(k): arr(k) = arr(i): arr(i) = t

        End If

    Next i

    '计算连号数量

    m = 1

    For i = 1 To n - 1

        If arr(i) + 1 = arr(i + 1) Then m = m + 1

    Next i

    最大连号数 = m

End Function

代码窗口(模块中):

示例窗口:

可以支持任意矩形区域,跳过文本和空白。

本文转载自互联网,如有侵权,联系删除