Excel一列中有很多数据，有以字母开头的，也有以数字开头的，如何将以字母开头的筛选出来，

function abc(s as string)if left(s,1) like "#" thenabc="数字开头"elseabc="字母开头"end ifend function其实可以真接食用已有的公式来防止这个困难假说数据在A列在B1输进展示=if(and(left(a1)>="0",left(a1)<="9"),"数字开头","其它")

公式编新挺好，若数据在A列，则在A列后多一助手列，B2中输进展示=abc(A1)，而后可以B2的值手动筛选。

你真接将二楼的展示剪贴到一列必须

=IF(AND(LEFT(A1,1)>=48,LEFT(A1,1)<=57),"数字",IF(OR(AND(LEFT(A1,1)>=65,LEFT(A1,1)<=90),AND(LEFT(A1,1)>=97,LEFT(A1,1)<=122)),"字母","其他"))

'措施1Function abc(S As String)Dim I%, Y%For I = 1 To Len(S)If Mid(S, I, 1) Like "[0-9]" ThenY = Y + 1End IfNextIf Y > 0 Thenabc = "存有数字"Elseabc = "不存有数字"End IfEnd Function'措施2Function abc2(S As String)With CreateObject("VBScript.regexp") '正则表达式.Global = True.Pattern = "\d+"If .test(S) Thenabc2 = "存有数字"Elseabc2 = "不存有数字"End IfEnd WithEnd Function

亳州公交车线路查询，从五中到康美西门，有哪几路车

公交车时刻表：6路，分钟约10.91500米1、从亳州五中慢跑约890米,抵达福润活动站2、乘飞机6路,经过20站, 抵达二十一中站3、慢跑约900米,抵达康美中药材城西门