2

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

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

有人可以帮我弄这个吗?

更新

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

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

4

2 回答 2

2

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

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

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

于 2013-08-11T17:48:05.913 回答
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="filter" 和 F2=TRUE

9)选择表(A2:D...),右键,高级筛选

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

于 2013-08-11T05:10:47.127 回答