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

德州火车东站（高铁火车站）有哪几路公共汽车？

现下只有106路 106路公交线路查询接触沪宁城际高铁德州东站和德州火车站，末班隔15分。106路公交路线汽车行驶网络线路以东风路主要，时间间隔近18公里左右，共装置22处同行公司网站，从上到下为火车站、小汽车總站、人民儿童公园、医疗机械办公大楼、东苑风景区有哪些、二十八局大医院、汽车配件城、锦绣川风景区有哪些、德多家居方通、杏园了路口、市道路交通局、市行政机构中心点、澳德乐置地广场、德百国际物流批发城（小汽车东站）、太阳谷、燕子岛、大皇庄、朱庄、四秀沐歌珍禽真空管营造军事基地、中傲中路、牟庄、沪宁城际高铁德州东站。此网络线路共财政投入12部电动小汽车，均颁布无人售票，票价查询2元，可用到公交路线卡。106路为双重汽车行驶网络线路，带宽测速由沪宁城际高铁德州东站发往火车站，首车末班时间是为7:45，末班为22:35；上下行由火车站发往沪宁城际高铁德州东站，首车末班时间是为6:45，末班为21:20，营运几小时15分。信息提示：106路公交路线赶到沪宁城际高铁德州东站后将最远到接人到以东。如有存在疑虑，紧急呼叫公交路线增值服务热线客服2321111实现咨询员。

只有106路，在接人到以东有公交站点。106路为双重汽车行驶网络线路，带宽测速由沪宁城际高铁德州东站发往火车站，首车末班时间是为7:45，末班为22:35；上下行由火车站发往沪宁城际高铁德州东站，首车末班时间是为6:45，末班为21:20，营运几小时15分。

106路 火车站 汽车东站登机均可

106就是干线