大写数字转换word中如何将小写金额数字转换为大写
大写数字转换 时间:2021-01-12 阅读:(
)
怎样将数字转换成大写
在word2007使用过程中我们经常会遇到一些需要转换成大写的阿拉伯数字,,但是很多大写数字我们不会写。
不过没关系,今天小编来教大家在Word2007怎么将阿拉伯数字转换成大写数字的,一起来看看Word2007将阿拉伯数字转换成大写数字方法吧!①首先,选中需要转换的数字;②单击菜单栏的“插入”中的“数字”;③在弹出的“数字”对话框中的“数字类型”中选择“壹、贰、叁……”,然后确定。
怎样,结果是否已经变成了“玖仟玖佰玖拾玖”,转换过来的大写数字快速而又准确,不用白不用!以上就是小编关于Word2007怎么将阿拉伯数字转换成大写数字的内容,希望对大家有所帮助,更多精彩教程请关注。
求个中文大写数字转换成阿拉伯数字的函数
我给初值给错了..不好意思.已改正..
public int getNum(string val)
{
int result=0;
string[] bnum={"一","二","三","四","五","六","七","八","九","零"};
string[] bfix={"十","百","千","万","亿"};
int[] snum={1,2,3,4,5,6,7,8,9,0};
int[] sfix={10,100,1000,10000,100000000};
if(val.Substring(0,1).Equals("十"))
{
val="一"+val;
}
int one=0;
bool key=false;
int last=10;
for(int ii=0;ii<val.Length;ii++)
{
if(!key)
{
string num=val.Substring(ii,1);
for(int jj=0;jj<bnum.Length;jj++)
{
if(num.Equals(bnum[jj]))
{
key=true;
one=snum[jj];
if(one==0){
last=last/10;
key=false;
break;
}
if(ii==val.Length-1)
{
result+=one*last/10;
}
break;
}
}
}
if(key)
{
string fix=val.Substring(ii,1);
for(int kk=0;kk<bfix.Length;kk++)
{
if(fix.Equals(bfix[kk]))
{
last=sfix[kk];
key=false;
result=result+one*last;
break;
}
}
}
}
return result;
}
调用的时候:
int num=this.getNum(this.TextBox1.Text);//如果为非法输入则返回0EXCEL如何将大写数字转换为阿拉伯数字
如果你不想用选择替换功能的话,请用下面这个宏。
工具---宏---编辑
将一下代码复制粘贴进去。
运行宏。
--------------------
Sub 数字转换()
Range("A1").Select
Cells.Replace What:="十一", Replacement:="11", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十二", Replacement:="12", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十三", Replacement:="13", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十四", Replacement:="14", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十五", Replacement:="15", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十六", Replacement:="16", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十七", Replacement:="17", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十八", Replacement:="18", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="十九", Replacement:="19", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="一", Replacement:="1", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="二", Replacement:="2", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="三", Replacement:="3", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="四", Replacement:="4", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="五", Replacement:="5", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="六", Replacement:="6", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="七", Replacement:="7", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="八", Replacement:="8", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
Cells.Replace What:="九", Replacement:="9", LookAt:=xlPart, SearchOrder _
:=xlByRows, MatchCase:=False, SearchFormat:=False, ReplaceFormat:=False
End Sub
这个宏的极限是翻译到十九,如果需要还可以修改,应该够你用了。
请采纳,谢谢!word中如何将小写金额数字转换为大写
材料/工具:word2016
1、打开相关的word文档,比如要将金额数字15263转换为大写数字。
2、点击插入菜单按钮,选择“数字”按钮。
3、出现“数字”对话框。
4、在数字输入框中输入数字15263,在“数字类型”中点击向下的三角形选中“壹,贰,叁 ...”,点击“确定”。
5、则金额数字的大写形式就显示在文档中了。
LightNode是一家成立于2002年,总部位于香港的VPS服务商。提供基于KVM虚拟化技术.支持CentOS、Ubuntu或者Windows等操作系统。公司名:厦门靠谱云股份有限公司官方网站:https://www.lightnode.com拥有高质量香港CN2 GIA与东南亚节点(河内、曼谷、迪拜等)。最低月付7.71美金,按时付费,可随时取消。灵活满足开发建站、游戏应用、外贸电商等需求。首...
农历春节将至,腾讯云开启了热门爆款云产品首单特惠秒杀活动,上海/北京/广州1核2G云服务器首年仅38元起,上架了新的首单优惠活动,每天三场秒杀,长期有效,其中轻量应用服务器2G内存5M带宽仅需年费38元起,其他产品比如CDN流量包、短信包、MySQL、直播流量包、标准存储等等产品也参与活动,腾讯云官网已注册且完成实名认证的国内站用户均可参与。活动页面:https://cloud.tencent.c...
腾讯云轻量应用服务器又要免费升级配置了,之前已经免费升级过一次了(腾讯云轻量应用服务器套餐配置升级 轻量老用户专享免费升配!),这次在上次的基础上再次升级。也许这就是良心云吧,名不虚传。腾讯云怎么样?腾讯云好不好。腾讯云轻量应用服务器 Lighthouse 是一种易于使用和管理、适合承载轻量级业务负载的云服务器,能帮助个人和企业在云端快速构建网站、博客、电商、论坛等各类应用以及开发测试环境,并提供...
大写数字转换为你推荐
涡轮增压和自然吸气哪个好本田车自然吸气和涡轮增压哪个好滚筒洗衣机和波轮洗衣机哪个好波轮洗衣机和滚桶洗衣机哪个好?哪个更实用?莫代尔和纯棉哪个好请问莫代尔棉和纯莫代尔哪个更好?英语词典哪个好买什么英语词典比较好手机炒股软件哪个好手机炒股软件网校哪个好初中网校哪个好?车险哪个好购买车险哪家好电动牙刷哪个好电动牙刷哪个牌子比较好,不要那么贵的清理手机垃圾软件哪个好手机垃圾清理软件哪个好网页qq空间登录为什么我用网页登录QQ空间时,没有登录界面,直接进去一个QQ空间,请问是怎么回事?
bbr oneasiahost softlayer 韩国俄罗斯 狗爹 xfce ssh帐号 搜狗抢票助手 合肥鹏博士 免费测手机号 1美金 如何安装服务器系统 双线机房 七夕快乐英语 免费邮件服务器 四川电信商城 重庆电信服务器托管 美国凤凰城 supercache windowsserver2012r2 更多