Dzwebs.Net

撰写电脑技术杂文十余年

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

Admin | 2010-8-17 15:29:36 | 被阅次数 | 10938

温馨提示!

如果未能解决您的问题,请点击搜索;登陆可复制文章,点击登陆

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

  先看下表吧。

  要实现的功能就是这样,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)


该杂文来自: Excel杂文

上一篇:Excel统计文字个数的函数公式

下一篇:EXCEL按姓名求总分平均分的综合应用

网站备案号:

网站备案号:滇ICP备11001339号-7

版权属性:

Copyright 2007-2021-forever Inc. all Rights Reserved.

联系方式:

Email:dzwebs@126.com QQ:83539231 访问统计