在Excel中如何获取大写金额？

最近一位朋友因为EXCEL中的金额大写问题而烦恼，从网上看来的一些此类文章又无法理解，于是本人研究了一下，得到下面的工式，已经调试，无BUG，在此登出，希望能给大家提供方便。

=IF(A1<0,"金额为负无效",IF(OR(A1=0,A1=""),"(人民币)零元整",(IF(A1<1,"(人民币)",TEXT(INT(A1),"[dbnum2](人民币)G/通用格式")&"元"&IF(INT(A1)*100-INT(A1*100)=0,"整",IF(INT(A1*10)-INT(A1)*10=0,"零"&TEXT((INT(A1*100)-INT(A1*10)*10),"[dbnum2]")&"分",IF(INT(A1*10)*10-INT(A1*100)=0,TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角整",TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角"&TEXT((INT(A1*100)-INT(A1*10)*10),"[dbnum2]")&"分")))))))

注：

• 此公式中小写金额所在格为A1，如果你的小写金额所在单元格为B4，请用替代方法将公式中的A1全部替代为B4；
  
• 此格式转化为的大写中带为(人民币)前导，如果不需要，请用替代的方式将(人民币)替代为空；
  
• 此公式中不能转化负数金额，但会判断，如果为负数，将显示金额为负无效；

有关此方面的问题欢迎在BBS里讨论。