大众计算机学习网欢迎诸位!收藏本站注 册登 陆
常用教程:基础知识网络知识操作系统WPS网页制作数据库算法网页成功之路网络安全最新技术古典mid流行midmid背景下载中心
您现在的位置:首页 > 教程 > 文章页

Excel返回单元格英文的函数公式

Admin | 2010-8-17 15:29:36 | ReadNums | 5733 | 标签 Excel教程 | 打印本页
     

  本文的示例,讲述的是如何使用公式函数,返回单元格里面的混合中英文中的英文字母。

  先看下表吧。

  要实现的功能就是这样,A列是混合列,B列返回的是中文;C列返回的是英文。下面我们开始吧!

  一、返回中文

  由于B列所使用的公式比较长,本文就不再贴出图片了,直接给出函数公式了,选中B2单元格,在FX函数输入框中,输入如下公式代码。

  =MID(A2,MATCH(2,LENB(MID(A2,ROW(INDIRECT("1:"&LEN(A2))),1)),0),LENB(A2)-LEN(A2))

  注意,输入函数公式之后,必须同时按下Ctrl+Shift+Enter组合键方能生效,因为这是数组公式,不是普通公式。

  二、返回英文

  由于已经使用数组公式返回中文了,接下来,要返回中文就比较容易了,直接使用普通函数就行了。

  选中B2单元格,在FX函数输入框中输入如下公式代码:

  =TRIM(SUBSTITUTE(A2,B2,""))

  按下回车键即可生效。

  C3单元格的公式如下图,都是类似的。

  一切都弄好了,其它的单元格,就不用输入了,直接使用填充工具往下来,结果就出来了,如此如此。

  三、使用自定义函数返回中英文

  Function SplitStringChs(TheString)
  Dim n, Chs
  For n = 1 To Len(TheString)
  If Asc(Mid(TheString, n, 1)) < 0 Then
          Chs = Chs & Mid(TheString, n, 1)
        End If
  Next
  SplitStringChs = Chs
  End Function

  Function SplitStringEng(TheString)
  Dim n, Eng
  For n = 1 To Len(TheString)
  If Asc(Mid(TheString, n, 1)) >= 0 Then
   Eng = Eng & Mid(TheString, n, 1)
  End If
  Next
  SplitStringEng = Trim(Eng)
  End Function

  返回中文的用法,函数公式如下:

  =SplitStringChs(A2)

  返回英文的用法,函数公式如下:

  =SplitStringeng(A2)


问题未解决:在线咨询

网友评论

(访客)
内容实用原创,讲得很好。
20xx年x月x日
(站长)
有问题请在线咨询。
20xx年x月x日