= 65 And iA <= 90) Or (iA >= 97 And iA <= 122) Then MsgBox "是英文" />
乔山办公网我们一直在努力
您的位置:乔山办公网 > excel表格制作 > <em>Excel</em> 请问如何判断字符串里是否有英文字母-excel 判断英文,exce

<em>Excel</em> 请问如何判断字符串里是否有英文字母-excel 判断英文,exce

作者:乔山办公网日期:

返回目录:excel表格制作


转换成ASCII就可以判断
Dim iA As Integer
iA = Asc(Range("a1").Value)
If (iA >= 65 And iA <= 90) Or (iA >= 97 And iA <= 122) Then
MsgBox "是英文字符"
Else
MsgBox "不是英文字符"
End If

用for 循环和zd mid函数结合,判断它的ascii码是不是 97至97+25或者,65至65+25

function check(a)
check =false
for i=1 to len(a)
t=asc(mid(a,i,1))
    if (t>=97 and t<=122) or (t>=65 and t<=90) then check=true
next i
end function

写在excel 的模块里

然后excel 可以用check 判断是否有字母了


如下图,zdB2中输入公式

=SUMPRODUCT((CODE(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1))>64)*(CODE(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1))<91))

下拉填充



你这个难度确实太高了,zd不自定义函数真没办法,下面出两个馊主意:

一、替换所有字母以后,看是否为空,比如判断A1的公式为:
=""=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(
UPPER(A1),"A",""),"B",""),"C",""),"D",""),"E","")
......

二、替换所有特殊字符以后,看是否和原来相同,比如判断A1的公式为:
=A1=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(
UPPER(A1),"0",""),"1",""),"2",""),"3",""),"4","")
......

相关阅读

  • sheet怎样发音-excel 出英文,excel英文翻译

  • 乔山办公网excel表格制作
  • 必须zhidao安装office的英语语言包才能改成英文版界面,否则改语言设置是不行的!在点语言设置界面最内下面的微软连接去下载相应的语言包,安装后再进语言设置界面后两项才会出来
关键词不能为空
极力推荐
  • <em>excel</em>个<em>位与</em>十位相加 如果只有个

  • 软件版本:Office2007方法如下:1.先把B列中的数字个位,十位,百位分别相zd加,再显示得到求和结果的个位数内字:2.输入公式容如下:=--RIGHT(--LEFT(RIGHT(B1,3))--LEFT(RIGHT(B1,2))--RIGHT(B1))公式

ppt怎么做_excel表格制作_office365_word文档_365办公网