文档介绍：Excel自动转换数字大小写具体的操作步骤如下:。按“alt+f11”快捷键打开“visualbasic编辑器”。“visualbasic编辑器”中,单击“插入”菜单栏中的“模块”命令,插入一个模块。双击左侧“工程”窗口中的“模块1”选项,在窗口右边展开“模块1(代码)”编辑窗口,然后输入如下代码:functiondx(q)dimcuraslong,yuanaslongdimjiaoasinteger,fenasstringifq=""thendx=0exitfunctionendifcur=round(q*100)yuan=int(cur/100)jiao=int(cur/10)-yuan*10fen=cur-yuan*100-jiao*yuan=(yuan,"[dbnum2]")cnjiao=(jiao,"[dbnum2]")cnfen=(fen,"[dbnum2]")yuan&"元"&"整"yuan&"元"iffen<>0andjiao<>0thendx=jiao&"角"&cnfen&"分"ifyuan=jiao&"角"&cnfen&"分"endifendififfen=0andjiao<>0thendx=jiao&"角"&"整"ifyuan=jiao&"角"&"整"endifendififfen<>0andjiao=0thendx=fen&"分"ifyuan=fen&"分"endifendifendfunction输入完成后,关闭“visualbasic编辑器”返回工作表。现在,我们可测试一下这个函数。首先,在a1单元格中输入一个小写数字的金额,,然后,在a2单元格中输入公式:=dx(a1),确认后即可将a1所表示的小写数字金额转换为大写的数字金额,并在a2单元格中显示出来。怎么样,方便吧?【问题】,怎样在F5中出现壹仟捌佰贰拾肆元贰角伍分? 【解答】把下面公式COPY到你要放大写的单元格位置,公式里的F4是输入小写数字的单元格位置,如果你的小写数字在其他单元格,就用替换功能换一下就可以了。=IF(F4<1,IF(F4<,TEXT(INT(F4*100),"[DBNum2]G/通用格式")&"分",IF((INT(F4*100)-INT(F4*10)*10=0),TEXT(INT(F4*10),"[DBNum2]G/通用格式")&"角整",TEXT(INT(F4*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(F4*100)-INT(F4*10)*10,"[DBNum2]G/通用格式")&"分")),TEXT(INT(F4),"[DBNum2]G/通用格式"&"元")&IF((INT(F4*10)-INT(F4)*10)=0,IF((INT(F4*100)-INT(F4*10)*10)=0,"","零"),IF((INT(F4*)-INT(F4)*)=0,"零","")&TEXT(INT(F4*10)-