将键入的阿拉伯数字自动转换成人民币大写金额

rogerwei

其实最简单的方法是用搜狗拼音

yanglong030

我试过了的,行的,,真的很棒,高手啊,,,谢谢了,

yanglong030

我上次下的教程被我SHIFT+DELETE删了,,唉,,可惜啊,,是我的心血啊,,,现在只有重来下了,,,,

yanglong030

怎么不行啊,我都试过了,,都可以的,
       谢谢楼主了,

livewire

Excel2003版: 设置格式为特殊格式, 中文大写.

BFLK

用下面的函数
=IF(Round([A1],2)<0,"无效数值",IF(Round([A1],2)=0,"零",IF(Round([A1],2)<1,"",Text(Int(Round([A1],2)),"[dbnum2]") & "元") & IF(Int(Round([A1],2)*10)-Int(Round([A1],2))*10=0,IF(Int(Round([A1],2))*(Int(Round([A1],2)*100)-Int(Round([A1],2)*10)*10)=0,"","零"),Text(Int(Round([A1],2)*10)-Int(Round(A1,2))*10,"[dbnum2]") & "角") & IF((Int(Round([A1],2)*100)-Int(Round([A1],2)*10)*10)=0,"整",Text((Int(Round([A1],2)*100)-Int(Round([A1],2)*10)*10),"[dbnum2]") & "分")))

ytklhg

谢谢楼主，很不错！学习了！

水仙

=""&IF(A6<0,"负",)&TEXT(TRUNC(ABS(A6)),"[DBNum2]G/通用格式")&"元"&IF(ROUND(A6,3)=ROUND(A6,),"整",TEXT(RIGHT(TRUNC(A6*10),1),"[DBNum2]G/通用格式")&"角"&IF(ROUND(A6,3)=ROUND(A6,1),"整",TEXT(RIGHT(ROUND((A6*100),),1),"[DBNum2]G/通用格式")&"分"))

有颜色是引用的单元格,只要在引用单元格输入数值就可以自动生成大写!
希望大家成功!

wnsfzf

不行的