Excel中把汉字转换成拼音码
1.启动Excel 2003(其它版本请仿照操作),打开相应的工作表;
2.执行“工具→宏→Visual Basic编辑器”命令(或者直接按“Alt+F11”组合键),进入Visual Basic编辑状态;
3.执行“插入→模块”命令,插入一个新模块。再双击插入的模块,进入模块代码编辑状态;
4.将代码输入其中;
1 Function pinyin(p As String) As String
2 i = Asc(p)
3 Select Case i
4 Case -20319 To -20284: pinyin = "A"
5 Case -20283 To -19776: pinyin = "B"
6 Case -19775 To -19219: pinyin = "C"
7 Case -19218 To -18711: pinyin = "D"
8 Case -18710 To -18527: pinyin = "E"
9 Case -18526 To -18240: pinyin = "F"
10 Case -18239 To -17923: pinyin = "G"
11 Case -17922 To -17418: pinyin = "H"
12 Case -17417 To -16475: pinyin = "J"
13 Case -16474 To -16213: pinyin = "K"
14 Case -16212 To -15641: pinyin = "L"
15 Case -15640 To -15166: pinyin = "M"
16 Case -15165 To -14923: pinyin = "N"
17 Case -14922 To -14915: pinyin = "O"
18 Case -14914 To -14631: pinyin = "P"
19 Case -14630 To -14150: pinyin = "Q"
20 Case -14149 To -14091: pinyin = "R"
21 Case -14090 To -13319: pinyin = "S"
22 Case -13318 To -12839: pinyin = "T"
23 Case -12838 To -12557: pinyin = "W"
24 Case -12556 To -11848: pinyin = "X"
25 Case -11847 To -11056: pinyin = "Y"
26 Case -11055 To -2050: pinyin = "Z"
27 Case Else: pinyin = p
28 End Select
29 End Function
30 Function getpy(str)
31 For i = 1 To Len(str)
32 getpy = getpy & pinyin(Mid(str, i, 1))
33 Next i
34 End Function
5.代码输入完成后,关闭Visual Basic编辑窗口,返回Excel编辑状态;
6.自定义函数就可以用了,如:输入公式:=getpy(A2)
7.生成后是大写,如需大小写转换可用以下函数:
转换为小写:=LOWER(字符串)
转换为大写:=UPPER(字符串)
首字母大写:=PROPER(字符串)
转自:信息来源
文末自警:1.本函数会用但是并未真正搞懂,跟那篇【SQL中把汉字转换拼音码】一样,仍然需要进一步学习深究函数算法原理。
2.VB中有for循环,SQL中没有for循环,【SQL中把汉字转换拼音码】中,循环用的是While循环,这点区别要注意,学会就地取材,深
入所使用的语言去编写程序。
Excel中把汉字转换成拼音码的更多相关文章
- 如何在excel中把汉字转换成拼音
---恢复内容开始--- 1.启动Excel 2003(其它版本请仿照操作),打开相应的工作表: 2 2.执行“工具→宏→Visual Basic编辑器”命令(或者直接按“Alt+F11”组合键),进 ...
- 基于jQuery实现汉字转换成拼音代码
基于jQuery实现汉字转换成拼音代码.这是一款基于jQuery.Hz2Py.js插件实现的汉字转拼音特效.效果图如下: 在线预览 源码下载 实现的代码. html代码: <br /> ...
- SQL 汉字转换成拼音首字母 首字母查
-- ============================================= -- 功能:汉字转换成拼音首字母 首字母查 -- ========================== ...
- python把汉字转换成拼音实现程序
python把汉字转换成拼音实现程序 文章一个简洁干的汉字转拼音 程序,复制下载就可以直接使用,有需要的同学可以参考一下下. #coding:utf-8 #基于python2.6 table = 'a ...
- C++ 将汉字转换成拼音全拼
#include <string> using std::string; //======================================================= ...
- C++ 将汉字转换成拼音全拼【转载】
转载自https://www.cnblogs.com/mzhrd/p/4758105.html #include <string> using std::string; //======= ...
- Python汉字转换成拼音
最近在使用Python做项目时,需要将汉字转化成对应的拼音. 网上的一些包大多是python2.x的,使用下面这个包,支持python3.6 xpinyin 0.5.5 >>> fr ...
- asp.net 中将汉字转换成拼音
/// <summary> /// 获取汉字的全拼音 /// </summary> /// <param name="x">传汉字的字符串< ...
- 使用MySQL数据库将汉字转换成拼音的一个C语言小程序
环境: mysql:mysql-5.1.65 centos:centos 6.5 编译命令: gcc -o chinesetopinyin chinesetopinyin.c -L/usr/lib/m ...
随机推荐
- Linux环境下Eclipse中快捷键不起作用
在window->Preferences->general->keys中, 找到 content asist 修改下边值 Binding 改成 Alt+/ When 改为 Editi ...
- 关于iOS 二维数组,对象映射的问题
数据格式如下: 遇到的问题是二维数组的 对象无法 通过 yymodel 直接实力话 ~~~ -"scoring_probability_distribution": [ -[ -{ ...
- maven导入依赖了提示can't resolved
maven导入依赖显红报错 网上有很多解决方案,我试过几个但是都不是很好用,推荐一个我自己一直在用的解决方案 在终端执行命令 mvn idea:idea 无法解析的原因基本上是因为包没下载完整,执行这 ...
- 编译python(cpython)的源码及其用途
获取python的源码 3.x及最新版本的源码:https://github.com/python/cpython python2.7分支的源码:https://github.com/python/c ...
- Map的key是否可重复
我们都知道Map的一大特性是key唯一不可重复,可是真的是这样的吗? 我们来试验一下: 运行结果: 我们可以看到在map里有两个同样的person作为key,打破了map的key不可重复的特性. 我们 ...
- Java学习day23
今天学习了下拉框实现与简单游戏的实现 package com.Cra2iTeT.snake; import javax.swing.*; import java.awt.*; import java. ...
- OpenHarmony 3.1 Beta版本关键特性解析——HAP包安装实现剖析
(以下内容来自开发者分享,不代表 OpenHarmony 项目群工作委员会观点) 石磊 随着社会的不断发展,人们逐渐注重更加高效.舒适.便捷.有趣的生活和工作体验. OpenAtom OpenHa ...
- Mysql、Oracle锁表处理
MySql解锁方式 1 # 1. 查看当前数据库锁表的情况 2 SELECT * FROM information_schema.INNODB_TRX; 3 # 2. 杀掉查询结果中锁表的trx_my ...
- python黑帽子(第五章)
对开源CMS进行扫描 import os import queue import requests # 原书编写时间过于久远 现在有requests库对已经对原来的库进行封装 更容易调用 import ...
- 集合——Collection接口,List接口
集合:对象的容器,定义了对多个对象进行操作的常用方法.可实现数组的功能 集合和数组的区别: 数组长度固定,集合长度不固定 数组可以存储基本数据类型和引用数据类型,集合只能存储引用数据类型. 集合的位置 ...