(相关资料图)

大写数字金额

壹万叁仟肆佰贰拾伍元陆角柒分

基础会计金额大小写问题

这样写是错的，应该是陆仟叁佰叁拾壹元伍角整，当分位是0时，大写到角就可以，不用体现分位啦

大小写金额转换

int a =金额int b2 (百分位)，b1 (十分位)，b0 (个位)b2=a/100 ("/"运算是取整)b1=a0 ( %运算是取余)c1=b1 (这样就取得了个位)b1=b1/10 (最后取得十位数字)就这种思路当然你format转化为string然后按位读取也是可以的

excel金额大小写怎么转换?

Excel自动转换数字大小写具体的操作步骤如下： 1. 启动excel。按“alt+f11”快捷键打开“visual basic编辑器”。 2. 在“visual basic编辑器”中，单击“插入”菜单栏中的“模块”命令，插入一个模块。双击左侧“工程”窗口中的“模块1”选项，在窗口右边展开“模块1（代码）”编辑窗口，然后输入如下代码: function dx(q) dim cur as long,yuan as long dim jiao as integer,fen as integer dim cnyuan as string, cnjiao as string, cnfen as string if q = "" then dx = 0 exit function end if cur = round(q * 100) yuan = int(cur / 100) jiao = int(cur / 10) - yuan * 10 fen = cur - yuan * 100 - jiao * 10 cnyuan = application.worksheetfunction.text(yuan, "[dbnum2]") cnjiao = application.worksheetfunction.text(jiao, "[dbnum2]") cnfen = application.worksheetfunction.text(fen, "[dbnum2]") dx = cnyuan & "元" & "整" d1 = cnyuan & "元" if fen <> 0 and jiao <> 0 then dx = d1 & cnjiao & "角" & cnfen & "分" if yuan = 0 then dx = cnjiao & "角" & cnfen & "分" end if end if if fen = 0 and jiao <> 0 then dx = d1 & cnjiao & "角" & "整" if yuan = 0 then dx = cnjiao & "角" & "整" end if end if if fen <> 0 and jiao = 0 then dx = d1 & cnjiao & cnfen & "分" if yuan = 0 then dx = cnfen & "分" end if end if end function 输 入完成后，关闭“visual basic编辑器”返回工作表。现在，我们可测试一下这个函数。首先，在a1单元格中输入一个小写数字的金额，例如123456.78，然后，在a2单元 格中输入公式：=dx(a1)，确认后即可将a1所表示的小写数字金额转换为大写的数字金额，并在a2单元格中显示出来。怎么样，方便吧？

这个excel里的大小写金额如何实现？

上面的数字是每个单元格一个数字吧。设你输入金额的单元格为a1，在分位的单元格输入：=if(a1="","",mid($a$1,len($a$1),1))在角位的单元格输入：=if(ROUNDDOWN($a$1*10),mid($a$1,len($a$1)-1,1),"￥")在元的个的单元格输入：=if(and(x="￥",x=""),"",if(ROUNDDOWN($a$1*1),mid($a$1,len($a$1)-3,1),"￥"))上面的x为当前单元格右边的那个单元格信息。之后将个位的公式向左拉，且每拉一个单元格将，“ROUNDDOWN($a$1*1)”中乘的1缩小10倍（即1改为0.1,0.1改为0.01）并将mid($a$1,len($a$1)-3,1)中的“3”每次减1（即3改为4,4改为5）。需要大写的那个单元格输入：=if(a1="","",a1)然后选中这个单元格->鼠标右键单击->设置单元格格式->“数字”页的“分类”中选择“特殊”->在“类型”处选择“人民币大写”->“确定”。