删除所有包含2个以上数字的行

时间:2013-08-11 04:44:04

标签: excel

我想删除A列中包含2个以上数字的所有行。

如果A列中的值包含多于2个数字,那么我想将其删除。

有人可以帮我这个吗?

更新

A           b      C      D
12tech
1pics
google9
panda555
jer9gf666
9tom

我想删除示例中的第1行,第4行,第5行,因为每行包含2个以上的数字。

2 个答案:

答案 0 :(得分:2)

假设第1行是标题行,而实际数据从第2行开始,请将此公式放在单元格B2中并复制下来:

=SUM(LEN(A2)-LEN(SUBSTITUTE(A2,{1,2,3,4,5,6,7,8,9,0},"")))>1

然后在B列上过滤TRUE,删除这些行,并删除过滤器

答案 1 :(得分:1)

没有纯公式方法来删除行(你可以使用正则表达式编写VBA宏,但是因为你没有说使用宏我会避免使用它们),但这里有一个查找的过程和删除行:

1)让B1为以下公式:

= MIN(
IFERROR(FIND("0",A1),999999),
IFERROR(FIND("1",A1),999999),
IFERROR(FIND("2",A1),999999),
IFERROR(FIND("3",A1),999999),
IFERROR(FIND("4",A1),999999),
IFERROR(FIND("5",A1),999999),
IFERROR(FIND("6",A1),999999),
IFERROR(FIND("7",A1),999999),
IFERROR(FIND("8",A1),999999),
IFERROR(FIND("9",A1),999999)
)

2)填写B栏

3)让C1为公式

= MIN(
IFERROR(FIND("0",A1,B1+1),999999),
IFERROR(FIND("1",A1,B1+1),999999),
IFERROR(FIND("2",A1,B1+1),999999),
IFERROR(FIND("3",A1,B1+1),999999),
IFERROR(FIND("4",A1,B1+1),999999),
IFERROR(FIND("5",A1,B1+1),999999),
IFERROR(FIND("6",A1,B1+1),999999),
IFERROR(FIND("7",A1,B1+1),999999),
IFERROR(FIND("8",A1,B1+1),999999),
IFERROR(FIND("9",A1,B1+1),999999)
)

4)填写C栏

5)让D1成为公式

=C1<999999

6)填写D栏

7)在顶部数据行上方插入一行,并设置新的A1 =“name”和D1 =“filter”

8)让F1 =“过滤”,F2 = TRUE

9)选择表格(A2:D ...),右键单击,高级过滤器

10)将Criteria范围设置为F1:F2并点击OK