ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 1753|回复: 7

[分享] 自定义函数--汉字拼音查询

[复制链接]

TA的精华主题

TA的得分主题

发表于 2013-9-18 17:33 | 显示全部楼层 |阅读模式
函数名 PinYinQP                                                              
作用  单元格中所有汉字的全拼                                                  
      单元格中所有汉字的简拼                                                  
      单元格中所有汉字的首字全拼后汉字均为简拼                                 
      取指定位数汉字全拼                                                     
      取指定位数汉字简拼                                                     
结果  函数最终的返回值为文本                                                  
补充说明    如果字符中出现非汉字将以文本零(0)替换,该函数未考虑多音字的问题
函数语法                                    PinYinQP(SelRng,[Only],[MidStr],[MoShi])      
PinYinQP具有以下4个参数                                                     
      SelRng                                必须参数,为工作表中的单元格      
      Only                                  可选参数,只有2个值 0 或不为 0 的值,用于是否引用单元中的所有字符,默认为0,即取全部字符
      MidStr                                当Only不为0时,输入数字为从左边取第几位字符,转换为拼音
      MoShi                                 选择转换为拼音的3中模式         
                                            1                               字符全拼
                                            2                               字符简拼
                                            3                               首字全拼后面简拼
                                            第3种模式只针对于第二个参数Only 模式为0,第四参数 MoShi 为3时才有效
示例

  
序号
  
  
汉字词组
  
  
1
  
  
微软科技
  
  
2
  
  
IT部落窝
  
  
3
  
  
无言的人
  
  
4
  
  
ITBLWLT
  
  
5
  
  
倚天屠龙记
  
  
6
  
  
我想要宏碁的笔记本
  
  
7
  
  
触屏的笔记本好还是超极本好呢
  

[td]  
   
公式
   
   
说明(结果)
   
   
模式说明
   
  =PinYinQP(C24)
  
  wei ruan ke ji
  
  当第2参数为0,第4参数默认为1,则取所有字符,并转换为全拼
  
  =PinYinQP(C27)
  
   
  
  当第2参数为0,则取所有字符,并转换为全拼,但单元格所有非汉字及将查找不到并未返回空值
  
  =PinYinQP(C24,,,2)
  
  W R K J
  
  当第2参数为0,第4参数为2时,则取所有字符,并转换为简拼
  
  =PinYinQP(C24,,,3)
  
  wei R K J
  
  当第2参数为0,第4参数为3时,则取所有字符转换为首字全拼后面全部简拼
  
  =PinYinQP(C27,,,2)
  
  0 0 0 0 0 0 0
  
  当第2参数为0,第4参数为2时,则取所有字符,并转换为简拼,但单元格所有非汉字及将查找不到每个字符都将返回字符 0 代替
  
  =PinYinQP(C24,-1,1,1)
  
  wei
  
  当第2参数不为0,第3参数不为0并小于字符数,第4参数为1,则取对应位置的字符转换为全拼
  
  =PinYinQP(C24,-1,1,2)
  
  W
  
  当第2参数不为0,第3参数不为0并小于字符数,第4参数为2,则取对应位置的字符转换为简拼
  
  =PinYinQP(C24,-1,1,3)
  
   
  
  当第2参数不为0,第3参数不为0并小于字符数,第4参数为3,则将返回空值
  

汉字拼音函数.rar (158.52 KB, 下载次数: 116)

TA的精华主题

TA的得分主题

发表于 2013-9-18 17:39 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
{:soso_e179:}{:soso_e163:}{:soso_e163:}{:soso_e163:}支持言头,言头好厉害

TA的精华主题

TA的得分主题

发表于 2013-9-18 17:57 | 显示全部楼层
{:soso_e163:}{:soso_e160:}言总是最优秀的!

TA的精华主题

TA的得分主题

发表于 2013-9-18 18:32 | 显示全部楼层
```言头你直接···上这边来呀···这边确实牛X很多··

TA的精华主题

TA的得分主题

发表于 2013-9-18 18:35 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2013-9-23 09:39 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
楼主能不能弄个实际应用的附件呢,不会用

TA的精华主题

TA的得分主题

 楼主| 发表于 2013-9-24 18:06 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
ty1015 发表于 2013-9-23 09:39
楼主能不能弄个实际应用的附件呢,不会用

附件里的就是啊

TA的精华主题

TA的得分主题

发表于 2024-4-7 11:29 | 显示全部楼层
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-5-13 04:45 , Processed in 0.034432 second(s), 12 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表