连笔字网今天精心准备的是《汉语转拼音》,下面是详解!
1、把你要注拼音的汉字、词组或者段落,甚至是一小篇文章输入在WORD文档中;2、选择你要标注上拼音的汉字;3、点击文档菜单的“格式”,在其下拉菜单中点击“中文版式”,然后选择“拼音指南”;4、在“拼音指南”的对话框中选择“确定”。注意,这种方法一次只能为40个汉字字符标注拼音.如果你想给不短的文章标注拼音,就只能一段一段的标注了,否则你就要安装标注拼音的小软件. 补充: 在WORD选中拟加拼音的文字,点“格式/中文版式/拼音指南”,选择好对齐方式、字体、字号,预览满意后,点“组合/确定”即可。
拼音转汉字。
拼音转汉字:喇叭,泥土,绿地,哪里,旅途,大米,土地,木马,
大地,体育,题目,发怒,
那里,马路,大佛,陆地。
在Word中 选中文字----开始-----拼音指南(文上面有拼音的)------拼音指南------调整字号----确定
我的PPT2007 其他版本类似
你可以下载拼音字体即可
下载后安装到手机上就可以了。
比如下图的字体,下载后安装到字体库
然后选中该字体,写出来的字就带拼音了:
EXCEL中能否直接把中文转换成汉语拼音,如果不能,有什么软件能实现吗?...
EXCEL中能否直接把中文转换成汉语拼音,如果不能,有什么软件能实现吗?
网上找的,我自己没测试。
让人加分不厚道,助人为乐快乐之本
打开Excel->工具->宏->Viaual Basic编辑器
在弹出来的窗口中对着VBAproject点右键->插入->模块
下面会出现一个名为"模块1",点击
在右边的空白栏中粘贴以下内容:
''''''''''''''''''''''
'VBscript代码提供者:小白
'联系方法:
'E-mail:[email protected]
'
'VBA代码转换者:惟惟
'联系方法:Email:[email protected]
'个人博客:http://weiwei.blog.163.com
'如有不正确的地方,请提出来或是帮忙完善
'谢谢
''''''''''''''''''''''''''''''
Function getpychar(char)
tmp = 65536 + Asc(char)
If (tmp >= 45217 And tmp <= 45252) Then
getpychar = "A"
ElseIf (tmp >= 45253 And tmp <= 45760) Then
getpychar = "B"
ElseIf (tmp >= 45761 And tmp <= 46317) Then
getpychar = "C"
ElseIf (tmp >= 46318 And tmp <= 46825) Then
getpychar = "D"
ElseIf (tmp >= 46826 And tmp <= 47009) Then
getpychar = "E"
ElseIf (tmp >= 47010 And tmp <= 47296) Then
getpychar = "F"
ElseIf (tmp >= 47297 And tmp <= 47613) Then
getpychar = "G"
ElseIf (tmp >= 47614 And tmp <= 48118) Then
getpychar = "H"
ElseIf (tmp >= 48119 And tmp <= 49061) Then
getpychar = "J"
ElseIf (tmp >= 49062 And tmp <= 49323) Then
getpychar = "K"
ElseIf (tmp >= 49324 And tmp <= 49895) Then
getpychar = "L"
ElseIf (tmp >= 49896 And tmp <= 50370) Then
getpychar = "M"
ElseIf (tmp >= 50371 And tmp <= 50613) Then
getpychar = "N"
ElseIf (tmp >= 50614 And tmp <= 50621) Then
getpychar = "O"
ElseIf (tmp >= 50622 And tmp <= 50905) Then
getpychar = "P"
ElseIf (tmp >= 50906 And tmp <= 51386) Then
getpychar = "Q"
ElseIf (tmp >= 51387 And tmp <= 51445) Then
getpychar = "R"
ElseIf (tmp >= 51446 And tmp <= 52217) Then
getpychar = "S"
ElseIf (tmp >= 52218 And tmp <= 52697) Then
getpychar = "T"
ElseIf (tmp >= 52698 And tmp <= 52979) Then
getpychar = "W"
ElseIf (tmp >= 52980 And tmp <= 53640) Then
getpychar = "X"
ElseIf (tmp >= 53689 And tmp <= 54480) Then
getpychar = "Y"
ElseIf (tmp >= 54481 And tmp <= 62289) Then
getpychar = "Z"
Else '如果不是中文,则不处理
getpychar = char
End If
End Function
Function getpy(str)
For i = 1 To Len(str)
getpy = getpy & getpychar(Mid(str, i, 1))
Next i
End Function
********复制到此结束,本行不复制*******
现在转换函数已编写完成!关掉此编缉的窗口。
要在Excel中使用,方法如下:
A1 A2
中国 =getpy(A1)
输入汉字,选择汉字,点拼音指南按钮,可以在汉字上方生成再声调的拼音。如果不要汉字,只要拼音,可以复制带拼音的汉字,粘贴到记事本,再复制记事本里的内容,粘贴回Word,拼音就在汉字右边的括号内了,然后再删除汉字就行了。 注意,本方法有时标的拼音是错的,要检查一下,如多音字可能标错,还有家字,Word会标成jie,使用时可以用同音字代替,如夹。
那你就要学好普通话了,因为实在是太复杂了
汉语拼音是由声母、韵母和声调组成的。
声调:有四声(阴平(第一声)、阳平(第二声)、上声(第三声)、去声(第四声))
声母:二十三个(b p m f d t n l g k h j q x zh ch sh r z c s y(i) w(u))
韵母:a o e ê i u ü ai ei ao ou an en ang eng ong ua uo uai ui(uei) uan un(uen) uang ueng ü üi(üei) üan ün(üen)
用
Word
将整篇文章转换成拼音
如果想把整篇文章转换成拼音字母而且还需要在转换成拼音字母后仍保留原文中的数
字、英语字母、标点符号、段落等内容,则可以用下面的方法来实现。
一、先输入(打开)需要转换的文本,用
“
拼音指南
”
给文本全部标注上拼音。然
后选中标注好拼音的全部文字,右击选择
“
切换域代码
”
,此时选中内容将会变成类似图
1
的样子。
二
、
单
击
菜
单
“
编
辑
--
替
换
”
打
开
替
换
窗
口
,
在
查
找
内
容
中
输
入
“
[)]*[)]
”
,
“
替
换
为
”
中
则
输
入
一
个
半
角
的
空
格
。点
击
“
高
级
”
按
钮
显
示
高
级
选
项
,点
选
“
使
用
通
配
符
”
复
选
项
(
图
2
)
。
点
击
“
全
部
替
换
”
按
钮
,
然
后
一
直
确
定
完
成
替
换
。
三
、再
输
入
查
找
内
容
为
“
EQ*[(]*[(]
”
,
“
替
换
为
”
中
输
入
“
EQ
”
(
注
意
:
EQ
后
面
有
一
个
半
角
的
空
格
)
,
同
样
点
击
“
全
部
替
换
”
按
钮
完
成
替
换
。
(
见
图
3)
按
“Ctrl+A”
组
合
键
全
选
进
行
剪
切
,
再
“
选
择
性
粘
贴
”
为
“
无
格
式
文
本
”
即
可
看
到
全
文
中
汉
字
部
分
都
已
经
变
成
拼
音
字
母
,
而
且
原
文
中
的
数
字
、
英
语
字
母
、
标
点
符
号
、
段
落
等
内
容
也
还
在
,
最
后
效
果
见
图
4
。
此
外
,在
一
开
始
用
拼
音
指
南
标
注
拼
音
字
母
时
,若
留
出
部
分
汉
字
不
标
注
拼
音
字
母
,转
换
成
拼
音
这
部
分
汉
字
不
会
转
换
成
拼
音
字
母
,
这
样
在
转
换
拼
音
字
母
时
就
可
以
有
选
择
的
保
留
这
部
分
汉
字
。
特
别
注
意
:
文
中
“
(
”
和
“
)
”
的
区
别
,
千
万
不
要
搞
混
淆
了
,
否
则
不
成
功
。
没有很好的办法直接转换。网上看到了一个办法,可以间接实现转换。点击图片,在大图下可以看到动画的效果。