1. 程式人生 > >應用Excel實現大小寫金額轉換

應用Excel實現大小寫金額轉換

在基本建設審計中,經常需要同時寫明審定工程造價的大小寫金額,如2942635.44元寫為“貳佰玖拾肆萬貳仟陸佰叄拾伍元肆角肆分”,388372.80元寫為“叄拾捌萬捌仟叄佰柒拾貳元捌角整”,為提高工作效率和保證大寫金額準確性,可使用Excel實現大小寫金額轉換。
  轉換的依據應遵循《會計基礎工作規範》,該《規範》第五十二條規定:漢字大寫數字金額如零、壹、貳、叄、肆、伍、陸、柒、捌、玖、拾、佰、仟、萬、億等,一律用正楷或者行書體書寫,不得用0、一、二、三、四、五、六、七、八、九、十等簡化字代替,不得任意自造簡化字。大寫金額數字到元或者角為止的,在“元”或者“角”字之後應當寫“整”字或者“正”字;大寫金額數字有分的,分字後面不寫“整”或者“正”字。
  方法如下:   假設審定工程造價在Excel工作表的E列,審定工程造價大寫金額為F列,本文以E3和F3單元格為例,如E3單元格中阿拉伯數字為388372.80,在F3單元格中輸入:   =IF((E3-INT(E3))=0,TEXT(E3,"[DBNUM2]")&"元整",IF(INT(E3*10)-E3*10=0,TEXT(INT(E3),"[DBNUM2]")&"元"&TEXT((INT(E3*10)-INT(E3)*10),"[DBNUM2]")&"角整",TEXT(INT(E3),"[DBNUM2]")&"元"&IF(INT(E3*10)-INT(E3)*10=0,"零",TEXT(INT(E3*10)-INT(E3)*10,"[DBNUM2]")&"角")&TEXT(RIGHT(E3,1),"[DBNUM2]")&"分"))
  如果需要在F列中其他單元格式進行相同設定,可以採取拖動填充柄方式進行自動填充。(楊春寧)