如何从EXCEL中快速提取中文(汉字)?

本文阅读 2 分钟
首页 EXCEL函数 正文

给你一个自定义函数吧,操作如下:按ALT+F11,或依次点工具,宏,VB编辑器,弹出的编辑器中点插入模块,
新弹出的空白窗口中输入以下代码:

Function getchn(MyValue As Range)
Dim i As Integer
Dim chn As String
For i = 1 To Len(MyValue)
If Asc(Mid(MyValue, i, 1)) < 0 Then
chn = chn & Mid(MyValue, i, 1)
End If
Next
getchn = chn
End Function

截图1
关闭VB编辑器窗口,回到表格中,

选中你要显示中文字符的单元格,如B1,点插入,函数,选择自定义函数,这时函数列表中有一个“getchn”这样的函数,这就是你刚才编辑的那段VB编码代表的一个自定义函数。其用法和EXCEl中函数用法是一样的,其参数就是你包含中中文那个单元格,比如A1单元格,就是你的“”字符串。结果是经理两个字显示在B1中,

写以上过程是让你明白,刚才编辑的这个函数是什么意思,其实,你可以直接在A1中输入:=getchn(A1)

截图2

解压密码: detechn或detechn.com

免责声明

本站所有资源出自互联网收集整理,本站不参与制作,如果侵犯了您的合法权益,请联系本站我们会及时删除。

本站发布资源来源于互联网,可能存在水印或者引流等信息,请用户自行鉴别,做一个有主见和判断力的用户。

本站资源仅供研究、学习交流之用,若使用商业用途,请购买正版授权,否则产生的一切后果将由下载用户自行承担。

《侠盗鲁平探案全集(套装共26册)》Azw3+Mobi+Epub
« 上一篇 05-04
《川菜:尝到了川菜,也就尝到了生活》Azw3+Mobi+Epub
下一篇 » 05-04

发表评论

惪特博客
  • 文章总数:
    18474 篇
  • 评论总数:
    53215 条
  • 标签总数:
    8841 个
  • 总浏览量:
    20811978 次
  • 最后更新:
    12月7日

最多点赞

随便看看

标签TAG