barriers / 阅读 / 详情

EXECL表格怎么设置小写金额在另一个单元格自动生成大写金额?

2023-07-16 11:26:27
共14条回复
马老四

1、本次操作使用的Office办公软件为Excel 2013版本。

人民币大小写转换

2、新建一个Excel电子表格,在表格中输入演示数据用于如何在Excel表格中将小写金额在另一个单元格自动生成大写金额的操作。

人民币大小写转换

3、鼠标选中需要转换成大写金额的数据,单击鼠标右键,在工具栏选择设置单元格格式工具。

人民币大小写转换

4、在设置单元格格式工具栏,单击数字栏,在特殊工具中选择类型为中文大写数字,单击确认完成。

人民币大小写转换

5、然后返回Excel表格中可以看到小写数字已经转换成了大写金额。

人民币大小写转换

北境漫步

方法一

楼上 levi_wzh 网友的做法,这是最简单、最省事的。

方法二

如果你的小写数字在A列,在B列单元格使用公式 =A,如B1中使用 =A1,B2中使用 =A2 ……一直下拉,使B列的每个单元格都有公式引用到左侧对应的A列单元格的数字。

然后将B列的单元格格式设置为“特殊”-“中文大写数字”。

方法三

需要先做一个大小写的对照表,比如在sheet2表格的A列输入小写数字,B列输入对应的大写数字,然后在sheet1表格中就可以实现了(当然必须是你能用得到的每一个数字都要预先存在于这个对照表中):

在sheet1的B1输入公式 =if(a1="","",vlookup(a1,sheet2!a:b,2,0))

公式下拉

以后在sheet1的A列输入小写数字,B列就会出现对应的大写数字了。

LuckySXyd

比如小写金额在B8单元格,任意其他单元格粘贴公式:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(B8<0,"负",)&TEXT(INT(ABS(B8)),"[dbnum2];; ")&TEXT(MOD(ABS(B8)*100,100),"[>9][dbnum2]圆0角0分;[=0]圆整;[dbnum2]圆零0分"),"零分","整")," 圆零",)," 圆",)。

大鱼炖火锅

设置单元格格式->特殊->中文大写数字,确定

人民币大小写转换

左迁

比如小写金额在B8单元格,任意其他单元格粘贴公式:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(B8<0,"负",)&TEXT(INT(ABS(B8)),"[dbnum2];; ")&TEXT(MOD(ABS(B8)*100,100),"[>9][dbnum2]圆0角0分;[=0]圆整;[dbnum2]圆零0分"),"零分","整")," 圆零",)," 圆",)

即可

cloud123

假设:A1为小写栏;在需要大写的单元格输入公式:=IF(ISERROR(A1),"(大写)人民币:",IF(A1="","","(大写)人民币:"&SUBSTITUTE(SUBSTITUTE(IF(A1<0,"负","")&TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(ROUND(A1,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROUND(A1,2)),"[DBNum2]")&"分",IF(ROUND(A1,2)=0,"","整")),"零元零",""),"零元","")&IF(A1=0,"零",)))

该公式兼容:小写为负值、小写单元格出错时大写的显示、以及在大写单元格中加固定文字,如“(大写)人民币:”等,可根据个人需要作调整,是本人搜集网上资料加工而成,实用性强。

陶小凡

操作如下:

选中该行,按ctrl+1,在数字选项页面选择“特殊”——“中文大写数字”。

然后在该行输入的数字就会自动转换为中文大写的数字形式了。

snjk

比如小写金额在B8单元格,任意其他单元格粘贴公式:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(B8<0,"负",)&TEXT(INT(ABS(B8)),"[dbnum2];;

")&TEXT(MOD(ABS(B8)*100,100),"[>9][dbnum2]圆0角0分;[=0]圆整;[dbnum2]圆零0分"),"零分","整"),"

圆零",),"

圆",)

即可

南yi

1:格式--单元格

2:数字选项卡,找到特殊,选择中文大写就可以了

小教板

比如小写金额在B8单元格,任意其他单元格粘贴公式:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(B8<0,"负",)&TEXT(INT(ABS(B8)),"[dbnum2];;

")&TEXT(MOD(ABS(B8)*100,100),"[>9][dbnum2]圆0角0分;[=0]圆整;[dbnum2]圆零0分"),"零分","整"),"

圆零",),"

圆",)。

小菜G

分别选中单元格,右键点击“单元格格式”,就可以分别设置“数值”(小写)、特殊(大写)。

nicehost

比如

小写

金额

在B8

单元格

,任意其他单元格粘贴

公式

:

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(B8<0,"负",)&TEXT(INT(ABS(B8)),"[dbnum2];;

")&TEXT(MOD(ABS(B8)*100,100),"[>9][dbnum2]圆0角0分;[=0]圆整;[dbnum2]圆零0分"),"零分","整"),"

圆零",),"

圆",)。

coco

小写数字在A7单元格 =IF((A7-INT(A7))=0,TEXT(A7,"[dbnum2]")&"元整",IF(INT(A7*10)-A7*10=0,TEXT(INT(A7),"[dbnum2]")&"元"&TEXT((INT(A7*10)-INT(A7)*10),"[dbnum2]")&"角整",TEXT(INT(A7),"[dbnum2]")&"元"&IF(INT(A7*10)-A7*10=0,"零",TEXT(INT(A7*10)-INT(A7)*10,"[dbnum2]")&"角")&TEXT(RIGHT(A7,1),"[dbnum2]")&"分"))

瑞瑞爱吃桃

a列格式为数值-货币,b列格式为特殊-中文大写数字

函数:b1=a1

相关推荐

人民币大小写转换

银行、单位和个人填写的各种票据和结算凭证是办理支付结算和现金收付的重要依据,直接关系到支付结算的准确、及时和安全。票据和结算凭证是银行、单位和个人凭以记载账务的会计凭证,是记载经济业务和明确经济责任的一种书面证明。因此,填写票据和结算凭证必须做到标准化、规范化、要素齐全、数字正确、字迹清晰、不错漏、不潦草、防止涂改。  中文大写金额数字应用正楷或行书填写,如壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元、角、分、零、整(正)等字样,不得用一、二(两)、三、四、五、六、七、八、九、十、毛、另(或0)填写,不得自造简化字。如果金额数字书写中使用繁体字,如贰、陆、亿、万、圆的,也应受理。  人民币大写的正确写法还应注意以下几项:  一、中文大写金额数字到“元”为止的,在“元”之后、应写“整”(或“正”)字;在“角”之后,可以不写“整”(或“正”)字;大写金额数字有“分”的,“分”后面不写“整”(或“正”)字。  二、中文大写金额数字前应标明“人民币”字样,大写金额数字应紧接“人民币”字样填写,不得留有空白。大写金额数字前未印“人民币”字样的,应加填“人民币”三字,在票据和结算凭证大写金额栏内不得预印固定的“仟、佰、拾、万、仟、佰、拾、元、角、分”字样。  三、阿拉伯数字小写金额数字中有“0”时,中文大写应按照汉语语言规律、金额数字构成和防止涂改的要求进行书写。举例如下:  1、阿拉伯数字中间有“0”时,中文大写要写“零”字,如¥1409.50应写成人民币壹仟肆佰零玖元伍角;  2、阿拉伯数字中间连续有几个“0”时、中文大写金额中间可以只写一个“零”字,如¥6007.14应写成人民币陆仟零柒元壹角肆分。  3、阿拉伯金额数字万位和元位是“0”,或者数字中间连续有几个“0”,万位、元位也是“0”但千位、角位不是“0”时,中文大写金额中可以只写一个零字,也可以不写“零”字,如¥1680.32应写成人民币壹仟陆佰捌拾元零叁角贰分,或者写成人民币壹仟陆佰捌拾元叁角贰分。又如¥107000.53应写成人民币壹拾万柒仟元零伍角叁分,或者写成人民币壹拾万零柒仟元伍角叁分。  4、阿拉伯金额数字角位是“0”而分位不是“0”时,中文大写金额“元”后面应写“零”字,如¥16409.02应写成人民币壹万陆仟肆佰零玖元零贰分,又如¥325.04应写成人民币叁佰贰拾伍元零肆分。  四、阿拉伯小写金额数字前面均应填写人民币符号“¥”,阿拉伯小写金额数字要认真填写,不得连写分辨不清。  五、票据的出票日期必须使用中文大写,为防止变造票据的出票日期,在填写月、日时、月为壹、贰和壹拾的,日为壹至玖和壹拾、贰拾和叁拾的,应在其前加“零”,日为拾壹至拾玖的应在其前加“壹”,如1月15日应写成零壹月壹拾伍日,再如10月20日应写成零壹拾月零贰拾日。  六、票据出票日期使用小写填写的,银行不予受理;大写日期未按要求规范填写的,银行可予受理,但由此造成损失的由出票人自行承担。
2023-07-16 06:54:297

word人民币小写转大写带小数点

word中如何将小写金额数字转换为大写(方法1)1第一步:打开需要将小写金额数字转换为大写的word文档。请点击输入图片描述2第二步:选中需要转换的金额数字,在菜单栏“插入”中选择“编号”。请点击输入图片描述3第三步:如下图所示,弹出编号设置对话框。请点击输入图片描述4第四步:编号类型中选择大写,并单击“确定”按钮。请点击输入图片描述5完成操作,小写金额数字转换为大写。请点击输入图片描述ENDword中如何将小写金额数字转换为大写(方法2)1第一步:借助输入法(我电脑上按的是搜狗输入法),在中文状态下,先输入字母V。请点击输入图片描述2第二步:在字母V之后输入要转换的小写金额数字,选择大写的。请点击输入图片描述3完成操作,方法1是word本身的功能,方法2是输入法的功能。请点击输入图片描述
2023-07-16 06:54:491

word人民币小写转大写快捷键

word中人民币小写转大写需要在插入中找到数字,并点击打开大写字母格式即可。打开word文档程序,在word程序中输入需要转换大小写数字。点击窗口顶部的“插入”。在“插入”选项下,选择“数字”并单击“打开”。在列表中找到大写字母格式并单击open。没有快捷键,自有鼠标操作。如下参考:1.首先,打开word文档程序,在word程序中输入转换大小写数字。
2023-07-16 06:55:421

有什么快捷键可以直接把小写金额转换成大写金额的

用智能输入法 然后输入 如大写英文I后面加数字123 按回车就是 壹贰叁如小写英文i后面加数字123 按回车就是 一二三
2023-07-16 06:55:505

人民币大小写转换

人民币大写在线转换工具可以将人民币小写金额转换为大写金额。转换方法:只要在下面的小写金额框中填入人民币金额的小写阿拉伯数字,例如1688.99,然后点击“转换为大写金额”按钮即可得转换成汉字。在输入数字的时候,可以包含小数点,也可以写成千进制,例如1,688.99(注意是英文逗号,而不是中文逗号)。人民币常识人民币(缩写为RMB)是我国大陆地区的法定货币,人民币在ISO4217简称为CNY(China Yuan),常用简写为RMB(Ren Min Bi);人民币货币的符号是“ ¥”,读音为“YUAN”。人民币按照材料的自然属性划分,有金属币(亦称硬币)、 纸币(亦称钞票)。无论纸币、硬币均等价流通,至今已发行了五套人民币。
2023-07-16 06:56:581

巧用Excel 轻松转换人民币大小写

要将人民币小写金额转换成大写格式,用Excel提供的格式,将自定义格式类型中的“[dbnum2]G/通用格式”改为“[dbnum2] G/通用格式“元””来实现。   要将人民币小写金额转换成大写格式,用Excel提供的格式,将自定义格式类型中的“[dbnum2]G/通用格式”改为“[dbnum2] G/通用格式“元””来实现。但在转换小数时却出现了问题,比如¥6,050.09只能转换为“陆仟零伍拾.零玖圆”。那么用Excel能不能解决这一先天不足呢?其方法有以下两种(以下均对B1转换,假设B1是通过函数ROUND( )四舍五入取得二位小数的小写金额数,其值为¥6,050.09)。   一、在三个连续的同行单元格中转换   1. B2中输入公式 “=IF(B1<0,"金额为负无效",INT(B1))”,计算结果为¥6,050.00,然后点击“格式→单元格→数字→特殊→中文大写数字→确定”,B2显示“陆仟零伍拾”,再点击“格式→单元格→数字→自定义”,将“类型”我框中的“[dbnum2]G/通用格式”修改为:[dbnum2](“人民币”)G/通用格式“元”,此时B2显示:“(人民币)陆仟零伍拾元”。   2. C2中输入“=IF(B1<0,"",INT(B1??10)-INT(B1)??10)”,同样C2改为:[DBNum2]G/通用格式“角”,C2显示:“零角”。   3. D2中输入“=IF(B1<0,"",INT(B1??100)-INT(B1??10)??10)”,同样D2改为:[DBNum2]G/通用格式“分”, D2显示:“玖分”。   这样在连续的三个同行单元格中实现了大写金额格式的转换。为了使转换符合财务格式,B2应右对齐,C2列宽无间隔,且不设左右边框线,D2要左对齐。   二、用Excel提供的函数转换   个位为0,则不显示;不为0,显示“XXX元”;不为0、且角位和分位均为0,显示“XXX元整”;元角分位均为0,则显示“零元整”。   小数点后面第一位为0、且元位或分位有一为0,则不显示;为0、且元位和分位均不为0,则显示“零”;不为0,显示“X角”。   小数点后面第二位为0,则显示“整”;不为0,显示“X分”。   根据以上思路在B2中输入公式:   “IF(B1<0,"金额为负无效",IF(OR(B1=0,B1=""),"(人民币)零元整"));   IF(B1<1,"(人民币)",TEXT(INT(B1),"[dbnum2](人民币)G/通用格式")&&"元")&&IF(INT(B1??10)-INT(B1)??10=0);   IF(INT(B1)??(INT(B1??100)-INT(B1??10)??10)=0,"","零"),TEXT(INT(B1??10)-INT(B1)??10,"[dbnum2]")&&"角")&&IF((INT(B1??100)-INT(B1??10)??10)=0,"整",TEXT((INT(B1??100)-INT(B1*10)*10),"[dbnum2]")&&"分")))”。   确认后B2显示:“(人民币)陆仟零伍拾元零玖分”。以后使用时将公式复制到有关单元格中,若转换的对象B1发生了变化,可点击“我→替换”将B1替换掉。   经过这样简单的调整后,就可以轻松的将人民币小写变成大写了。
2023-07-16 06:57:111

Excel中将人民币小写转大写的公式?

=NUMBERSTRING(A2,2)
2023-07-16 06:57:197

Excel中的金额怎么转换大小写?

1、首先在我们的电脑桌面上新建一个excel表格并点击它。2、然后随便输入一串字符。3、接着右击这个单元格并点击设置单元格格式。4、然后点击左侧的特殊。5、接着点击人民币大写并点击确定。6、通过以上操作,我们就把数字变成了人民币大写了。
2023-07-16 06:58:201

105387.04万元大写怎么写

105387.04万元的大写是:壹拾万伍仟叁佰捌拾柒元零肆分。中文大写数字历史渊源  大写数字的使用始于明朝。朱元璋因为当时的一件重大贪污案“郭桓案”而发布法令。其中明确要求记账的数字必须由“一、二、三、四、五、六、七、八、九、十、百、千”改为“壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰(陌)、仟(阡)”等复杂的汉字,用以增加涂改帐册的难度。后来“陌”和“阡”被改写成“佰、仟”,并一直使用到现在。人民币大写数字注意事项  中文大写金额数字应用正楷或行书填写,如壹(壹)、贰(贰)、叁、肆(肆)、伍(伍)、陆(陆)、柒、捌、玖、拾、佰、仟、万(万)、亿、元、角、分、零、整(正)等字样。不得用一、二(两)、三、四、五、六、七、八、九、十、念、毛、另(或0)填写,不得自造简化字。如果金额数字书写中使用繁体字,如贰、陆、亿、万、圆的,也应受理。一、中文大写金额数字到"元"为止的,在"元"之后,应写"整"(或"正")字,在"角"之后,可以不写"整"(或"正")字。大写金额数字有"分"的,"分"后面不写"整"(或"正")字。  二、中文大写金额数字前应标明"人民币"字样,大写金额数字有"分"的,"分"后面不写"整"(或"正")字。三、中文大写金额数字前应标明"人民币"字样,大写金额数字应紧接"人民币"字样填写,不得留有空白。大写金额数字前未印"人民币"字样的,应加填"人民币"三字。在票据和结算凭证大写金额栏内不得预印固定的"仟、佰、拾、万、仟、佰、拾、元、角、分"字样。四、阿拉伯数字小写金额数字中有"0"时,中文大写应按照汉语语言规律、金额数字构成和防止涂改的要求进行书写。举例如下:  ①阿拉伯数字中间有"0"时,中文大写要写"零"字,如¥1409.50,应写成人民币陆壹仟肆佰零玖元伍角。②阿拉伯数字中间连续有几个"0"时,中文大写金额中间可以只写一个"零"字,如¥6007.14,应写成人民币陆仟零柒元壹角肆分。③阿拉伯金额数字万位和元位是"0",或者数字中间连续有几个"0",万位、元位也是"0",但千位、角位不是"0"时,中文大写金额中可以只写一个零字,也可以不写"零"字。如¥1680.32,应写成人民币壹仟陆佰捌拾元零叁角贰分,或者写成人民币壹仟陆佰捌拾元叁角贰分,又如¥107000.53,应写成人民币壹拾万柒仟元零伍角叁分,或者写成人民币壹拾万零柒仟元伍角叁分。④阿拉伯金额数字角位是"0",而分位不是"0"时,中文大写金额"元"后面应写"零"字。如¥16409.02,应写成人民币壹万陆仟肆佰零玖元零贰分;又如¥325.04,应写成人民币叁佰贰拾伍元零肆分。  数字大写转换工具为您提供大写的一到十,大写,人民币大写,大写数字金额,阿拉伯数字大写,金额大写,大小写转换,数字大写怎么写,1到10的大写,金额大写转换等。
2023-07-16 06:59:211

数字大小写转换人民币金额大写

你好,人民币大写规则如下:中文大写金额数字应用正楷或行书填写,如壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元、角、分、零、整(正)等字样。不得用一、二(两)、三、四、五、六、七、八、九、十、廿、毛、另(或0)填写,不得自造简化字。如果金额数字书写中使用繁体字,如贰、陆、亿、万、圆的,也可。中文大写金额数字到"元"为止的,在"元"之后,应写"整"(或"正")字,在"角"之后,可以不写"整"(或"正")字。大写金额数字有"分"的,"分"后面不写"整"(或"正")字。中文大写金额数字前应标明"人民币"字样,大写金额数字有"分"的,"分"后面不写"整"(或"正")字。中文大写金额数字前应标明"人民币"字样,大写金额数字应紧接"人民币"字样填写,不得留有空白。大写金额数字前未印"人民币"字样的,应加填"人民币"三字。在票据和结算凭证大写金额栏内不得预印固定的"仟、佰、拾、万、仟、佰、拾、元、角、分"字样。将人民币小写金额转换成大写的方法:要将人民币小写金额转换成大写格式,用Excel提供的格式,将自定义格式类型中的“[dbnum2]G/通用格式”改为“[dbnum2] G/通用格式“元””来实现。但在转换小数时却出现了问题,比如¥6,050.09只能转换为“陆仟零伍拾.零玖圆”。那么用Excel能不能解决这一先天不足呢?其方法有以下两种(以下均对B1转换,假设B1是通过函数ROUND( )四舍五入取得二位小数的小写金额数,其值为¥6,050.09)。
2023-07-16 06:59:542

人民币大小写转换的c++代码怎么写?

#include#includevoidmain(){doublex,i=10000000;intj=0;unsignedintquotient,remainder;boolbeginFlag=0,zeroFlag=0;cout<<"请输入预转换数额(小于1亿):";cin>>x;while(x>=100000000){if(j>=2){cout<<"你的错误输入已达3次,你无权再输入!"<>x;j++;}if(x<=0){cout<<"零元整"<0.001){if(i>0.9)quotient=(unsignedint)floor(x/i);else{if(i>=0.099)quotient=(unsignedint)floor(x*10);elsequotient=(unsignedint)floor(x*100);}remainder=quotient%10;if(remainder!=0)beginFlag=1;if((zeroFlag==1)&&(beginFlag==1)&&(i>1000)&&(remainder>0))cout<<"零";switch(remainder)//输出大写数字{case0:break;case1:cout<<"壹";break;case2:cout<<"贰";break;case3:cout<<"叁";break;case4:cout<<"肆";break;case5:cout<<"伍";break;case6:cout<<"陆";break;case7:cout<<"柒";break;case8:cout<<"捌";break;case9:cout<<"玖";break;}if(remainder>0)zeroFlag=0;elseif(beginFlag==1)zeroFlag=1;if(beginFlag==1)//输出单位{if((i==10000000)&&(remainder>0))cout<<"仟";if((i==1000000)&&(remainder>0))cout<<"百";if((i==100000)&&(remainder>0))cout<<"十";if(i==10000)cout<<"万";if((i==1000)&&(remainder>0))cout<<"仟";if((i==100)&&(remainder>0))cout<<"百";if((i==10)&&(remainder>0))cout<<"十";if(i==1)cout<<"元";if((i>=0.09)&&(i<1)&&(remainder>0))cout<<"角";if((i>=0.009)&&(i<0.1)&&(remainder>0))cout<<"分";}i=i/10;}cout<<"整"<评论00加载更多
2023-07-16 07:00:021

人民币大小写转换c++程序

rmb->RMB??
2023-07-16 07:00:113

金额大小写转换

小写与大写的定义?请举例子!
2023-07-16 07:00:204

人民币大小写转换:请问小写人民币1,651,516.00,大写怎样写?谢谢各位帮忙

壹仟陆百伍拾伍万壹仟陆百元
2023-07-16 07:00:334

请教人民币大小写转换函数

=TEXT(A1*100,"[DBNum2]0万0千0佰0拾0元0角0分整")如A1为金额,此公式直接得到如零万零千壹佰贰拾叁元贰角伍分整这样的结果
2023-07-16 07:00:421

407725元怎样大写?

肆拾万柒仟柒佰贰拾伍元采纳是鼓励,谢谢!
2023-07-16 07:00:512

1807.33大写

你是想问人民币1807.33的大写吗?壹仟捌佰零柒圆叁角叁分。根据人民币大小写金额转换器可知,人民币1807.33的大写是壹仟捌佰零柒圆叁角叁分。大写既指拉丁字母(包括拼音字母和英文字母)的一种写法,用于句首、专名的第一个字母或全字母大写的情况。也指汉字数目字的一种笔画较繁的写法,多用于账目和文件等中。中文金额数字大写分别为壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万(万)、亿、元(圆)、角、分、零、整。
2023-07-16 07:00:581

如何用SQL语言实现人民币的大小写转换

首先sql不可能实现大小写转换,如果你非实现就使用存储过程其次,实现大小写转换,可从数学的高位到低位,把各个位上的数取出通过数组转换成大写,然后加上单位。形成一个字符串,如1020形成壹仟零佰贰拾零元。事先建立一个数组,数组的第1项就对应着壹,第2项对应着贰。然后进行二次加工,从低位到高位,找到第一个非0的位,然后以这个位为起点,把该位和下一个非零位之间所有的字符保留零。
2023-07-16 07:01:051

VBS人民币小写转大写问题

代码已验证通过!!保存为VBS文件即可dim str(9) str(0)="零" str(1)="壹" str(2)="贰" str(3)="叁" str(4)="肆" str(5)="伍" str(6)="陆" str(7)="柒" str(8)="捌" str(9)="玖" money = inputbox(" 请输入:","人民币大小写转换格式")money = replace(money,".","") money = replace(money,",","")for i=1 to len(money) s=mid(money,i,1) mynum=str(s) select case(len(money)+1-i) case 1: k= mynum case 2: k= mynum&"拾" case 3: k= mynum&"佰" case 4: k= mynum&"仟" case 5: k= mynum&"万" case 6: k= mynum&"拾" case 7: k= mynum&"佰" case 8: k= mynum&"仟" end select temp = temp & k next msgbox temp&"万"
2023-07-16 07:01:121

怎样去写一篇java程序人民币大小写转换总结

public class Rmb {String a[]={"零","壹","贰","叁","肆","伍","陆","柒","捌","玖"};String c[]={"","亿","千","百","拾","万","千","百","拾","亿","千","百","拾","万","千","百","拾","元"};String d[]={"","角","分","厘",""};String rmb,rmbstrtemp;String rmbint,rmbdec; void setrmb(String rmbstr) { rmbstrtemp=rmbstr; } String getrmb() { StringBuffer rmbstrResult=new StringBuffer(); StringBuffer rmbstrall=new StringBuffer(); if((rmbstrtemp.indexOf(".")>0)&&(rmbstrtemp.length()-rmbstrtemp.indexOf(".")>3))/*整理输入的数据通过判断输入的字符串是否有小数位而且小数位数大于3位,以确保小数位只有两位;*/ { rmbstrtemp=rmbstrtemp.substring(0, rmbstrtemp.length()-((rmbstrtemp.length()-rmbstrtemp.indexOf("."))-3)); //12345.123 9-((9-6)-3) 9-(3-3) 9-(0) 9 //12345.1234 10-((10-6)-3) 10-(4-3) 10-1 9 //12345.12345 11-((11-6)-3) 11-(5-3) 11-2 9 } rmbstrall.append(rmbstrtemp); if(rmbstrtemp.indexOf(".")<0 )//判断输入的字符串有没有小数点如果是加“.00”; { rmbstrall.append(".00"); } if((rmbstrtemp.length()-rmbstrtemp.indexOf("."))==1)/*判断输入的字符串是不是只带小数点不带小数位如果是在后面加"00";*/ { rmbstrall.append("00"); } rmb=rmbstrall.toString(); rmbint=rmb.substring(0,rmb.indexOf("."));//取出整数部分 rmbdec=rmb.substring(rmb.indexOf(".")+1,rmb.length());//取出小数部分 String rmbchar; int rmbdic,rmbcom; rmbcom=c.length-(rmbint.length());//判断整数的单位开始位置 for(int i=0;i<rmbint.length();i++) { rmbchar=rmbint.substring(i,i+1);//取出整数的每一个位的字符从左往右 rmbdic=Integer.parseInt(rmbchar);//将每一个位的字符转换为整数 rmbstrResult.append(a[rmbdic]);/*将每一个位的整数与a[]数组下标对应的中文大写字符存入rmbstrResult*/ rmbstrResult.append(c[rmbcom]);//将单位跟在大写字符后面 rmbcom++; } for(int i=0;i<rmbdec.length();i++) { rmbchar=rmbdec.substring(i,i+1); rmbdic=Integer.parseInt(rmbchar); rmbstrResult.append(a[rmbdic]); rmbstrResult.append(d[i+1]); } return rmbstrResult.toString(); }public static void main(String[] args){Rmb r=new Rmb();r.setrmb("100.01");System.out.println(r.getrmb());}}
2023-07-16 07:01:321

自动生成人民币大写的条件公式是什么?

可以在网上下载的。
2023-07-16 07:01:427

Excel中的金额怎么转换大小写?

1.假设要转换的数字小写金额在A列,如图所示:2. 选中要转换的数字所在的单元格区域,按下CTRL+1组合快捷键,弹出设置单元格格式对话框,如下图所示:3. 在“数字”选项卡下单击“特殊”选择“中文大写数字”,然后单击“确定”按钮如下图所示:4. 以上是通过设置单元格式的方式将数字转换为大写数字,但是并没有严格按照财务对大小写金额的转换要求。Microsoft Excel是Microsoft为使用Windows和Apple Macintosh操作系统的电脑编写的一款电子表格软件。直观的界面、出色的计算功能和图表工具,再加上成功的市场营销,使Excel成为最流行的个人计算机数据处理软件。在1993年,作为Microsoft Office的组件发布了5.0版之后,Excel就开始成为所适用操作平台上的电子制表软件的霸主。
2023-07-16 07:03:232

人民币大小写规则是什么?

人民币金额大小写规范是零、壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿等,一律用正楷或者行书体书写,不得用0、一、二、三、四、五、六、七、八、九、十等简化字代替,例如¥708000.63应写成 人民币柒拾万捌仟元零陆角叁分,或写成 人民币柒拾万零捌仟元陆角叁分。中文大写金额数字前应标明“人民币”字样,大写金额数字应紧接“人民币”字样填写,不得留有空白,大写金额数字前未印“人民币”字样的,应加填“人民币”三字。金额数字到“元”为止的,在“元”之后应写“整”字;到“角”为止的,在“角”之后可以不写“整”字,大写金额数字有“分”的,“分”后面不写“整”字。拓展资料一、数字人民币的优势1.降低投资成本:充分利用商业银行等机构现有的人才、技术、设施、资源等优势,避免央行直接面向公众发行数字人民币的高昂成本。2.有效控制风险:由商业银行充当央行和公众之间的缓冲区,可以避免风险过度集中于央行,有利于分散化解风险。3.坚持技术中性原则:在商业银行等机构换取数字人民币后,央行不对其技术路线进行限制,反而鼓励它们使用自己的技术进行推广。但技术好的机构无疑将获得更大的市场份额,这有利于调动商业银行的积极性,激发市场活力。4.可实现有限匿名:运营机构只能掌握数字人民币的收付金额变化,只有央行才能监控交易双方的姓名、金额等完整信息。因此,数字人民币实现了强化货币监管与保护居民隐私之间的平衡。5.现阶段仅用于替代现金:现阶段数字人民币不会支付利息,不具备投资价值,不会替代银行存贷款,因此,商业银行预计不会受太大影响,整个金融体系不会产生较大震荡。二、人民币大写注意事项1.人民币大写数字应该到“圆”字前结束;2.人民币大写数字后可加“整”;3.人民币大写金额数字前应标明“人民币”字样;4.阿拉伯数字“0”应该写作“零”。
2023-07-16 07:04:351

会计金额中文大小写

我不是神
2023-07-16 07:04:455

搜狗中怎样打大写人民币

V+数字(不打“+”号)
2023-07-16 07:05:093

C#如何将商品金额小写转换成大写,我找了一个函数,但是在转换中遇到问题

vc277的想法很好哦~
2023-07-16 07:07:084

在excel中,如何使用函数将数字人民币转换成大写?

可以用这个公式=text(123.56*100,"[DBNUM2]0佰0拾0元0角0分")
2023-07-16 07:07:188

Excel中金额大小写转换公式问题

="人民币"&SUBSTITUTE(SUBSTITUTE(TEXT(TRUNC(FIXED(E9)),"[>0][dbnum2];[<0]负[dbnum2];;")&TEXT(RIGHT(FIXED(E9),2),"元[dbnum2]0角0分;;"&IF(ABS(E9)>1%,"圆整",)),"零角",IF(ABS(E9)<1,,"零")),"零分","整")
2023-07-16 07:08:275

EXCEL表格中不同币种的大小写金额转换公式

A1中的数据均为整数吗?因为不同货币的小数部分叫法不一样,比如人民币有角和分,而美元只有美分,其它货币就不知道了.如果A1中的数据均为整数,则在A2输入公式:=lookup(1,0/find({"CNY","USD","GBP","HKD","JPY","EUR"},a1),{"人民币","美元","英镑","港币","日元","欧元"})&text(int(mid(a1,4,99)),"[dbnum2]g/通用格式元整")
2023-07-16 07:11:063

如何在word文档中将小写金额转换为大写金额

示例操作步骤如下:1、首先打开word文档,然后在上方菜单栏点击进入”插入“菜单。2、插入菜单中,找到”编号“选项,点击打开。3、在弹出的编号对话框中,找到点击大写金额的样式,然后在上方编号输入需要的小写数字,点击确定即可转换为大写金额。
2023-07-16 07:11:131

收据大写1300元怎么写 人民币 佰 拾 万 仟 佰 拾 元 角 分 正确的输入是什么?

壹仟叁佰元整
2023-07-16 07:11:532

同样的excel2007,人民币大小转换不了

公式不对,根本就没用到大小写转换
2023-07-16 07:12:025

0元人民币大写怎么写

有0元吗 ? 我没见过 如果有发张截图 让我开开眼
2023-07-16 07:12:576

会计数字的表达含义

本文针对预算造价人员关于合同金额书写的一点总结。如果你不是一名专业的会计或对会计数字的表达方式一点都不了解,那么本文可能对你会有一定的帮助~ 1 会计凭证中的数字书写,依据财政部制定的会计基础工作规范的要求,填制会计凭证,字迹必须清晰、工整,并符合下列要求:(1)阿拉伯数字应一个一个地写,阿拉伯金额数字前应当书写货币币种符号(如人民币符号“¥”)或者货币名称简写和货种符号。币种符号与阿拉伯金额数字之间不得留有空白。凡在阿拉伯金额数字前面写有币种符号的,数字后面不再写货币单位(如人民币“元”)。 (2)所有以元为单位(其他货币种类为货币基本单位,下同)的阿拉伯数字,除表示单价等情况外,一律在元位小数点后填写到角分,无角分的,角、分位可写“00”或符号“——”,有角无分的,分位应写“0”,不得用符号“——”代替。 (3)汉字大写金额数字,一律用正楷或行书书写,如 壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元、角、分、零、 整(正)等易于辩认、不易涂改的字样,不得用0、一、二、三、四、五、六、七、八、九、十、另、毛等简化字代替,不得任意自造简化字。 (4)大写金额数字到元或角为止的,在“元”或“角”之后应写“整”或“正”字;大写金额数字有分的,分字后面不写“整”字。 (5)大写金额数字前未印有货币名称的,应当加填货币名称(如“人民币”三字),货币名称与金额数字之间不得留有空白。 (6)阿拉伯金额数字中间有“0”时,大写金额要写“零”字,如人民币101.50元,汉字大写金额应写成壹佰零壹元伍角整。阿拉伯金额数字中间连续有几个“0”时,汉字大写金额中可以只写一个“零”字,如¥1004.56,汉字大写金额应写成壹仟零肆元伍角陆分。阿拉伯金额数字元位为 “0”,或数字中间连续有几个“0”,元位也是“0”,但角位不是“0”时,汉字大写金额可只写一个“零”字,也可不写“零”字。 2 推荐人民币大小写转换在线工具: 人民币金额(数字)大小写转换在线工具 http://link.fobshanghai.com/rmb.htm 3 Excel中会计数字的表达方式:(会计数字表达方式为英文状态下,千分位符号) 了解更多可参考文献:《 预算管理与会计 》1994年04期: 《财务会计分析用语几种常用数字的书写方法》 END~
2023-07-16 07:13:241

人民币的小写怎么转换成大写啊?

人民币大小写转换如下说明。惠普暗影精灵6Windows 10WPS Office 2019 11.1.0.103141、人民币大小写转换方法有多种,以下以wps中的Excel表格为例。首先打开wps,新建Excel。2、如表格中如下图输入小写。3、按住第一空格不放,拖所有单元格,选中单元格所有内容后松开,按鼠标右键,点设置单元格格式。4、在出现的单元格格式对话框中点特殊,点人民币大写。5、最后点确定即可。6、小写的数字全部变成大写了。
2023-07-16 07:13:431

如何把纸币大写数字变小写呢?

人民币大小写转换如下说明。惠普暗影精灵6Windows 10WPS Office 2019 11.1.0.103141、人民币大小写转换方法有多种,以下以wps中的Excel表格为例。首先打开wps,新建Excel。2、如表格中如下图输入小写。3、按住第一空格不放,拖所有单元格,选中单元格所有内容后松开,按鼠标右键,点设置单元格格式。4、在出现的单元格格式对话框中点特殊,点人民币大写。5、最后点确定即可。6、小写的数字全部变成大写了。
2023-07-16 07:14:241

如何把人民币大写转换成小写??

人民币大小写转换如下说明。惠普暗影精灵6Windows 10WPS Office 2019 11.1.0.103141、人民币大小写转换方法有多种,以下以wps中的Excel表格为例。首先打开wps,新建Excel。2、如表格中如下图输入小写。3、按住第一空格不放,拖所有单元格,选中单元格所有内容后松开,按鼠标右键,点设置单元格格式。4、在出现的单元格格式对话框中点特殊,点人民币大写。5、最后点确定即可。6、小写的数字全部变成大写了。
2023-07-16 07:15:051

人民币大小写转换

人民币大小写转换如下说明。惠普暗影精灵6Windows 10WPS Office 2019 11.1.0.103141、人民币大小写转换方法有多种,以下以wps中的Excel表格为例。首先打开wps,新建Excel。2、如表格中如下图输入小写。3、按住第一空格不放,拖所有单元格,选中单元格所有内容后松开,按鼠标右键,点设置单元格格式。4、在出现的单元格格式对话框中点特殊,点人民币大写。5、最后点确定即可。6、小写的数字全部变成大写了。
2023-07-16 07:15:471

人民币大小写转换?

人民币大小写转换如下说明。惠普暗影精灵6Windows 10WPS Office 2019 11.1.0.103141、人民币大小写转换方法有多种,以下以wps中的Excel表格为例。首先打开wps,新建Excel。2、如表格中如下图输入小写。3、按住第一空格不放,拖所有单元格,选中单元格所有内容后松开,按鼠标右键,点设置单元格格式。4、在出现的单元格格式对话框中点特殊,点人民币大写。5、最后点确定即可。6、小写的数字全部变成大写了。
2023-07-16 07:16:281

12.96大写人民币怎么写

12.96大写人民币写作人民币壹拾贰元玖角陆分。根据中国大小写转换显示,人民币的大写是:壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元、角、分、零。
2023-07-16 07:17:091

会计人民币大写规则,大小写转换人民币大写规则

1.中文大写金额数字应用正楷或行书填写,如壹、贰、叁、肆、伍、陆、柒、捌、玖、拾、佰、仟、万、亿、元、角、分、零、整(正)等字样。 2.不得用一、二(两)、廿、毛、另(或0)填写,不得自造简化字。 3.如果金额数字书写中使用繁体字,如贰、陆、亿、万、圆的,也可。 4.中文大写金额数字到元为止的,在元之后,应写整(或正)字,在角之后,可以不写整(或正)字。 5.大写金额数字有分的,分后面不写整(或正)字。 6.中文大写金额数字前应标明人民币字样,大写金额数字应紧接人民币字样填写,不得留有空白。 7.大写金额数字前未印人民币字样的,应加填人民币三字。 8.在票据和结算凭证大写金额栏内不得预印固定的仟、佰、拾、万、仟、佰、拾、元、角、分字样。
2023-07-16 07:17:181

用VB.NET实现人民币大小写转换工具 (互相转换)

Public Function je(ByVal szje As Double) As String Dim s As String = "" Dim sz() As String = {"零", "壹", "贰", "叁", "肆", "伍", "陆", "柒", "捌", "玖"} Dim dw() As String = {"圆", "拾", "佰", "千", "万", "拾", "佰", "仟", "拾", "佰", "仟"} If szje < 0 Then s = "负" szje = Math.Abs(szje) End If Dim zh() As String = Split(Str(szje), ".") If zh.Length > 2 Then Return "ERROR:格式错" Exit Function End If zh(0) = Trim(zh(0)) zh(1) = Trim(zh(1)) Dim i As Integer For i = 1 To Len(zh(0)) s = s & sz(Val(Mid(zh(0), i, 1))) & dw(Len(zh(0)) - i) Next For i = 1 To Len(zh(1)) s = s & sz(Val(Mid(zh(1), i, 1))) & Choose(i, "角", "分", "厘", "毫") Next s = s & "整" Return s End Function
2023-07-16 07:17:251

紧急求助:金额的大小写转换

拾万零贰千五百元整
2023-07-16 07:17:347

5000.50 正确的金额大写是伍万元伍角吗?

不是。是四个数字,所以是伍仟而不是伍万。前应标明"人民币"字样,大写金额数字应紧接"人民币"字样填写,不得留有空白。大写金额数字前未印"人民币"字样的,应加填"人民币"三字。在票据和结算凭证大写金额栏内不得预印固定的"仟、佰、拾、万、仟、佰、拾、元、角、分"字样。写金额数字中有"0"时,中文大写应按照汉语语言规律、金额数字构成和防止涂改的要求进行书写。举例如下:①阿拉伯数字中间有"0"时,中文大写要写"零"字,如¥1409.50,应写成人民币陆壹仟肆佰零玖元伍角。②阿拉伯数字中间连续有几个"0"时,中文大写金额中间可以只写一个"零"字,如¥6007.14,应写成人民币陆仟零柒元壹角肆分。③阿拉伯金额数字万位和元位是"0",或者数字中间连续有几个"0",万位、元位也是"0",但千位、角位不是"0"时,中文大写金额中可以只写一个零字,也可以不写"零"字。如¥1680.32,应写成人民币壹仟陆佰捌拾元零叁角贰分,或者写成人民币壹仟陆佰捌拾元叁角贰分,又如¥107000.53,应写成人民币壹拾万柒仟元零伍角叁分,或者写成人民币壹拾万零柒仟元伍角叁分。④阿拉伯金额数字角位是"0",而分位不是"0"时,中文大写金额"元"后面应写"零"字。如¥16409.02,应写成人民币壹万陆仟肆佰零玖元零贰分;又如¥325.04,应写成人民币叁佰贰拾伍元零肆分。数字大写转换工具为您提供大写的一到十,大写,人民币大写,大写数字金额,阿拉伯数字大写,金额大写,大小写转换,数字大写怎么写,1到10的大写,金额大写转换等。
2023-07-16 07:17:511

excel表格里的小写金额怎么换成大写金额?

输入公式:=TEXT(INT(D25),"[DBNum2]G/通用格式")&"元"&IF((INT(D25*10)-INT(D25)*10)=0,"",TEXT(INT(D25*10)-INT(D25)*10,"[DBNum2]G/通用格式")&"角")&IF((INT(D25*100)-INT(D25*10)*10)=0,"整",TEXT(INT(D25*100)-INT(D25*10)*10,"[DBNum2]G/通用格式")&"分")将公式中的D25替换为相应单元格。
2023-07-16 07:18:117

access中如何将*替换为x(大写x)

给你2个连接 关于此主题请参考: 如何将人民币小写金额转为大写?大小写转换(一)《VBA》 http://access911.net/index.asp?u1=a&u2=71FAB21E 关于此主题请参考: 如何将人民币小写金额转为大写?大小写转换(二)《VBA》 http://access911.net/index.asp?u1=a&u2=73FAB21E 给你2个函数 Function shit(shit1 As Variant) As String "此函数将阿拉伯数字转换为大写金额数,其中调用了 yahoo函数 On Error GoTo err_handle Dim rem_thousand As Single "千位以后 Dim dec_num "小数点以后 Dim shit2 Dim shit3 As String Dim I As Integer Dim declen As Integer shit = "" "shit2 = Trim(Str(Abs(shit1))) If IsNull(shit1) Then shit1 = 0 End If shit2 = Trim(Format(Abs(shit1), "0.00")) declen = Len(Format(Str(Abs(shit2)), "0.00")) - 3 "3是小数点及以后2位 If declen <= 4 Then shit = shit + yahoo(Mid(shit2, 1, declen)) Else shit3 = Trim(Str(Val(Mid(shit2, declen - 3, 4)))) " MsgBox Str(Len(shit3)) + "," + shit3 If Mid(shit2, declen - 3, 1) = "0" Then If Val(shit3) = 0 Then shit = shit + yahoo(Mid(shit2, 1, declen - 4)) + "万" + yahoo(shit3) Else shit = shit + yahoo(Mid(shit2, 1, declen - 4)) + "万零" + yahoo(shit3) End If Else shit = shit + yahoo(Mid(shit2, 1, declen - 4)) + "万" + yahoo(shit3) End If End If If Abs(shit1) >= 1 Then shit = shit + "元" End If "================== "小数点以后 "dec_num = (shit1 - Fix(shit1)) * 100 dec_num = Val(Right(Format(Str(Abs(shit2)), "0.00"), 2)) " MsgBox Right(Trim(Str(shit1)), 2) If (dec_num Mod 10) = 0 Then If (dec_num 10) <> 0 Then shit = shit + chn(dec_num 10) + "角" End If Else If (dec_num 10) <> 0 Then shit = shit + chn(dec_num 10) + "角" + chn(dec_num Mod 10) + "分" Else shit = shit + chn(dec_num 10) + chn(dec_num Mod 10) + "分" End If End If "=================== shit = shit + "整" If shit1 = 0 Then shit = "零元整" End If err_exit: Exit Function err_handle: MsgBox "发生错误!请找原因" GoTo err_exit End Function Function chn(shit2 As Integer) As String Select Case shit2 Case 1 chn = "壹" Case 2 chn = "贰" Case 3 chn = "叁" Case 4 chn = "肆" Case 5 chn = "伍" Case 6 chn = "陆" Case 7 chn = "柒" Case 8 chn = "捌" Case 9 chn = "玖" Case 0 chn = "零" End Select End Function Function yahoo(yaa As String) As String "此函数被shit()调用 Dim shit_len Dim num(5) As Integer shit_len = Len(yaa) For I = 1 To shit_len num(I) = Mid(yaa, shit_len - I + 1, 1) Next I yahoo = "" Select Case shit_len Case 1 "元 If num(1) <> 0 Then yahoo = yahoo + chn(num(1)) End If "MsgBox yahoo Case 2 "十 If num(1) <> 0 Then yahoo = yahoo + chn(num(2)) + "拾" + chn(num(1)) Else yahoo = yahoo + chn(num(2)) + "拾" End If Case 3 "百 If num(1) = 0 Then If num(2) = 0 Then yahoo = yahoo + chn(num(3)) + "佰" Else yahoo = yahoo + chn(num(3)) + "佰" + chn(num(2)) + "拾" End If Else If num(2) = 0 Then yahoo = yahoo + chn(num(3)) + "佰零" + chn(num(1)) Else yahoo = yahoo + chn(num(3)) + "佰" + chn(num(2)) + "拾" + chn(num(1)) End If End If Case 4 "千 If num(1) = 0 Then If num(2) = 0 Then If num(3) = 0 Then yahoo = yahoo + chn(num(4)) + "仟" Else yahoo = yahoo + chn(num(4)) + "仟" + chn(num(3)) + "佰" End If Else If num(3) = 0 Then yahoo = yahoo + chn(num(4)) + "仟零" + chn(num(2)) + "拾" Else yahoo = yahoo + chn(num(4)) + "仟" + chn(num(3)) + "佰" + chn(num(2)) + "拾" End If End If Else If num(2) = 0 Then If num(3) = 0 Then yahoo = yahoo + chn(num(4)) + "仟零" + chn(num(1)) Else yahoo = yahoo + chn(num(4)) + "仟" + chn(num(3)) + "佰零" + chn(num(1)) End If Else If num(3) = 0 Then yahoo = yahoo + chn(num(4)) + "仟零" + chn(num(2)) + "拾" + chn(num(1)) Else yahoo = yahoo + chn(num(4)) + "仟" + chn(num(3)) + "佰" + chn(num(2)) + "拾" + chn(num(1)) End If End If End If End Select End Function
2023-07-16 07:18:501

在word文档里,怎么在输入小写数字后自动转换为大写金额?

示例操作步骤如下:1、首先打开word文档,然后在上方菜单栏点击进入”插入“菜单。2、插入菜单中,找到”编号“选项,点击打开。3、在弹出的编号对话框中,找到点击大写金额的样式,然后在上方编号输入需要的小写数字,点击确定即可转换为大写金额。
2023-07-16 07:18:581

黑科技神器我真的太爱了

打死也不卸载的黑科技效率神器丨实用工具丨自我提升周报生成器:打工人最头疼的就是写周报了,这个网二站只需简单描述你的工作内容就能生成一篇不错的周报,界面无广,免费使用,周报生成器打工人必备。文件转换器:文件转换器Convert io。可以将文件转换成任意格式,支持超过300种不同的文件格式,免费使用,将文件拖放至本页面,选择输出格式转换即可。抠图神器Remove。免费的A I自动抠图网站,轻点一下,即可在几秒钟内自动去除背景,避免花费长时间抠图,提升创造力和效率!一个免费便捷在线工具网站。提供字母大小写转换、汉语拼音转换、人民币大写转换等便利的在线工具,是你生活和工作学习的好帮手。一个木函是一款集合类效率工具。小小体积里竟然装有100+工具,包括尺子、翻译、计时器、做个决定,番茄时钟等实用小工具,简单便捷。免费无广告的文档扫描工具。支持文档拍照扫描,文字提取,证件扫描。学生记PPT笔记、会议记文档内容, 平时办公扫描文件都很方便,真心好用。Do you do是由个人开发软件教程网站。有很多免费的软件教程,最大的特色就是教程很亲民没有距离感,让你在学习的过程中不会那么无趣。番茄To Do是自我管理神器。适合各类学习或者及时统计之类的学习党,让你更专注去做这件事情,帮你成为一个专注自律的人。思维导图相信大家都不陌生,可以快速帮你梳理学习笔记思路,方便后续复习观看,提升你的学习效果。幕布其实也很好用, 但会出现BUG, 商店也发现幕布已经半年多没更新了。
2023-07-16 07:19:221

WORD文件中数字大小写可否自动转换像EXCLE一样一个位置填写小写另一个位置自动变成大写

第一招:釜底抽薪——自动更正法如果需要重复的输入一个大写数字金额,可以采用自动更正的方法。例如要重复输入“肆仟叁佰伍拾元零伍分”,可以先输入“肆仟叁佰伍拾元零伍分”并选中它,然后执行菜单“工具→自动更正选项”打开“自动更正”对话框,在“替换”下的框内输入“4350.05”并单击“添加”按钮确定后退出,以后直接输入“4350.05”后回车即可快速得到“肆仟叁佰伍拾元零伍分”。第二招:一劳永逸——编制自动宏如果有许多小写金额要变成大写的话,用上面的自动更正的方法需要定义很多自动更正项,显然也比较麻烦,其实只需要编辑一个宏就能做到“一劳永逸”了。启动Word后按下A lt+F11组合键,在打开的工程窗口左侧双击“ThisDocument”进入代码编写窗口,在代码编辑窗口中输入如下代码:Option ExplicitSub 小写金额变大写() Dim Numeric As Currency, IntPart As Long, DecimalPart As Byte, MyField As Field, Lable As String Dim Jiao As Byte, Fen As Byte, Oddment As String, Odd As String, MyChinese As String Const ZWDX As String = "壹贰叁肆伍陆柒捌玖零" "定义一个中文大写汉字常量 On Error Resume Next "错误忽略 With Selection Numeric = VBA.Round(VBA.Val(.Text), 2) "四舍五入保留小数点后两位 "判断是否在表格中 If .Information(wdWithInTable) Then _.MoveRight unit:=wdCell Else .MoveRight unit:=wdCharacter "对数据进行判断,是否在指定的范围内 If VBA.Abs(Numeric) > 2147483647 Then MsgBox "数值超过范围!", _ vbOKOnly + vbExclamation, "Warning": Exit Sub IntPart = Int(VBA.Abs(Numeric)) "定义一个正整数 Odd = VBA.IIf(IntPart = 0, "", "圆") "定义一个STRING变量 "插入中文大写前的标签 Lable = VBA.IIf(Numeric = VBA.Abs(Numeric), "人民币金额大写: ", "人民币金额大写: 负") "对小数点后面二位数进行择定 DecimalPart = (VBA.Abs(Numeric) - IntPart) * 100 Select Case DecimalPart Case Is = 0 "如果是0,即是选定的数据为整数 Oddment = VBA.IIf(Odd = "", "", Odd & "整") Case Is < 10 "<10,即是零头是分 Oddment = VBA.IIf(Odd <> "", "圆零" & VBA.Mid(ZWDX, DecimalPart, 1) & "分", _ VBA.Mid(ZWDX, DecimalPart, 1) & "分") Case 10, 20, 30, 40, 50, 60, 70, 80, 90 "如果是角整 Oddment = "圆" & VBA.Mid(ZWDX, DecimalPart / 10, 1) & "角整" Case Else "既有角,又有分的情况 Jiao = VBA.Left(CStr(DecimalPart), 1) "取得角面值 Fen = VBA.Right(CStr(DecimalPart), 1) "取得分面值 Oddment = Odd & VBA.Mid(ZWDX, Jiao, 1) & "角" "转换为角的中文大写 Oddment = Oddment & VBA.Mid(ZWDX, Fen, 1) & "分" "转换为分的中文大写 End Select "指定区域插入中文大写格式的域 Set MyField = .Fields.Add(Range:=.Range, Text:="= " & IntPart & " *CHINESENUM2") MyField.Select "选定域(最后是用指定文本覆盖选定区域) "如果仅有角分情况下,Mychinese为"" MyChinese = VBA.IIf(MyField.Result <> "零", MyField.Result, "") .Text = Lable & MyChinese & Oddment End WithEnd Sub输入完毕后按下Alt+Q键返回word中,以后只需要依次选中需要转换的小写金额后,按下Alt+F8打开宏对话框,选择“小写金额变大写”宏,并单击“运行”即可快速地得出大写金额。运行该宏可以在选定的文本数据后面插入此金额大写,如果选定范围在表格中,则在右侧单元格中插入金额大写。
2023-07-16 07:20:371

Excel中金额转换大小写出错,无法显示大写只显示数字,求解决办法!

为什么要用公式啊?
2023-07-16 07:20:444