求助excel 数字 变大写的问题

Question

我想弄成这样的，比如我在A1单元格输入20000，在B1单元格会自动跳出贰万元整。。。。 若没有"元整"这两个字的话，很好弄，直接将B1单元格格式改为大写的就行了，可加了这两字该怎么弄啊？？？
我原先想到一个方法，就是让C1=A1，C1设为大写，然后在D1输入”元整“两个字，然后让B1=C1&D1，可是显示的结果是20000元整。。。。。。。

Answer 1

=SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(IF(-RMB(A1,2),TEXT(A1,";负")&TEXT(INT(ABS(A1)+0.5%),"[dbnum2]G/通用格式元;;")&TEXT(RIGHT(RMB(A1,2),2),"[dbnum2]0角0分;;正"),),"零角",IF(A1^2<1,,"零")),"万",IF(AND(MOD(ABS(A1%),1000)<100,MOD(ABS(A1%),1000)>=10),"万零","万")),"零分","正")
这个连角分都有。

Answer 2

b1=IF(A1<=0,"",TEXT(INT(A1),"[dbnum2]")&IF(INT(A1)=A1,"元整","元")&IF(INT(A1)=A1,"",TEXT(--RIGHT(INT(A1*10)),IF(--RIGHT(INT(A1*100))>0,"[=0]零;[dbnum2]#角","[dbnum2]#角;;;"))&TEXT(--RIGHT(A1*100),"[dbnum2]#分;;;")))

Answer 3

=IF(ROUND(A1,2)=0,"",IF(A1<0,"负","")&IF(ABS(A1)>=1,TEXT(INT(ROUND(ABS(A1),2)),"[dbnum2]")&"圆","")&SUBSTITUTE(SUBSTITUTE(TEXT(RIGHT(RMB(A1,2),2),"[dbnum2]0角0分;;整"),"零角",IF(A1^2<1,,"零")),"零分","整"))