getpy函数用不了怎么办?
发布时间:2022-02-17 04:50:12
getpy函数用不了?
getpy函数用不了是因为Excel没有添加成功。
excel添加getpy函数的方法:
1、打开Excel,同时按下Alt+F11键,打开VBE界面,单击图片中所示的左上角空白处,选择“插入“,”模块“;
2、此时,就插入了一个模块,后面的代码就要放到这个模块中,保证右侧空白区域是模块代码的编辑区(最保险的做法是双击模块),然后执行下一步;
3、将下面的代码全部复制粘贴到空白区域;
Function pinyin(p As String) As String
i = Asc(p)
Select Case i
Case -20319 To -20284: pinyin = "A"
Case -20283 To -19776: pinyin = "B"
Case -19775 To -19219: pinyin = "C"
Case -19218 To -18711: pinyin = "D"
Case -18710 To -18527: pinyin = "E"
Case -18526 To -18240: pinyin = "F"
Case -18239 To -17923: pinyin = "G"
Case -17922 To -17418: pinyin = "H"
Case -17417 To -16475: pinyin = "J"
Case -16474 To -16213: pinyin = "K"
Case -16212 To -15641: pinyin = "L"
Case -15640 To -15166: pinyin = "M"
Case -15165 To -14923: pinyin = "N"
Case -14922 To -14915: pinyin = "O"
Case -14914 To -14631: pinyin = "P"
Case -14630 To -14150: pinyin = "Q"
Case -14149 To -14091: pinyin = "R"
Case -14090 To -13319: pinyin = "S"
Case -13318 To -12839: pinyin = "T"
Case -12838 To -12557: pinyin = "W"
Case -12556 To -11848: pinyin = "X"
Case -11847 To -11056: pinyin = "Y"
Case -11055 To -2050: pinyin = "Z"
Case Else: pinyin = p
End Select
End Function
Function getpy(str)
For i = 1 To Len(str)
getpy = getpy & pinyin(Mid(str, i, 1))
Next i
End Function
4、关闭这个新界面,返回Excel,然后就可以像Excel自带的函数一样使用这个自定义的Getpy函数了,它只有一个参数,参数可以直接指定单元格,也可以直接输入字符。
getpy函数用不了怎么办?的下载地址:


猜你喜欢
- Epic平台在开启2021假日特卖活动的同时也开启了为期15日的每天神秘游戏免费送的活动,不过还是有很多小伙伴都不清楚要如何领取这个神秘游戏
- 用U盘来安装系统,需要进入BIOS后找到U盘启动选项进行设置,但有些网友说主板不支持U盘启动,进入BIOS后找不到U盘启动选项,这是怎么一回
- Win8系统中onedrive云服务如何禁用?在电脑中是存在onedrive云服务功能的,这个onedrive云服务能够用户同步用户文件,存
- 许多用户因为某些特殊需求,在使用电脑的时候会把自己的电脑安装两个操作系统,例如不少用户在安装的时候就选择安装了Win10和Win11。那么如
- 注册表是Windows系统中一种十分重要的数据库,用于存储系统和应用程序的设置信息。这些信息十分重要,不可遗失,所以为了防止遗失,我们要对注
- Win10 mtu值怎么设置?mtu即最大传输单元,mtu值设置得过大或过小,都会在一定程度上影响上网的速度,所以我们要设置适当的mtu值,
- 至今,Win10系统已经发布一段时间了,但是在升级安装之后经常会遇到一些问题,有win10系统用户通过windows更新win10的时候,提
- 微软已经发布了Office 2016的另外两个版本Project 2016和Visio 2016预览版的下载。下面本文附带64/32位下载连
- 在电脑上使用浏览器浏览是很多小伙伴日常的基本操作,不过很多都会遇到安全证书错误的情况,那么该怎么去解决呢?下面就来看看详细的解决方法吧。安全
- Foxmail如何发送超大附件?最近有不少小伙伴在使用Foxmail时遇到了一些困难,不知道该如何发送超大附件,今天小编在这就教给大家Fox
- 同龄人在使用win10系统时,有时会遇到win10不能连接到WiFi的情况。那么如何解决这种情况呢?现在让小编给你一些建议。我希望它能帮助你
- win11怎么设置锁屏密码?每次用户离开电脑桌面前,电脑就会设置锁屏模式,但是没有设置锁屏密码,这就导致了电脑的安全性大大降低了,那么电脑怎
- 在excel表格中就行自动求和的是偶,总是要一步步的找到它,有什么方法能够在菜单栏中添加快捷键吗?下面随小编一起来看看吧。excel菜单栏添
- wps中的定位条件怎么出来?wps是我们常用的一款办公软件,我们在使用的时候就,总是会遇到无法精准查找的问题, 其实这个时候打开定位条件就可
- 万彩手影大师是部分用户经常使用到的一款手绘动画制作软件,让用户可以制作出让人满意的动画视频作品,并且万彩手影大师中的功能是很实用的,功能种类
- 大家知道,网盘是要收费的,并且用起来不是很方便。其实微信和QQ就相当于一个免费的网盘。一、微信聊天列表把编辑好的文档发送给任意一个好友,此时
- 在Win10系统中,由于默认的Modern应用在后台运行时并不会自动关闭,所以会导致Win10系统的续航时间被严重缩短,然而现在有许多用户反
- 宏碁acer笔记本win10改win7bios怎么设置?宏碁acer笔记本是很多用户在使用的电脑系统,预装的是win10,如果想要改成win
- 据Windows Report报道,Windows 10 Skip Ahead通道的会员分享了新发现,称新版支持显示蓝牙设备的电量了。这个新
- 如果是一篇比较长的Word文档,可能有几十上百幅图片,在修改的图片过程中,整个文章都可能需要重新编号,这可不是一