一、在三個連續的同行單元格中轉換
1. B2中輸入公式 「=IF(B1<0,"金額為負無效",INT(B1))」,計算結果為¥6,050.00,然後點擊「格式→單元格→數字→特殊→中文大寫數字→確定」,B2顯示「陸仟零伍拾」,再點擊「格式→單元格→數字→自定義」,將「類型」編輯框中的「[dbnum2]G/通用格式」修改為:[dbnum2](「人民幣」)G/通用格式「元」,此時B2顯示:「(人民幣)陸仟零伍拾元」。
2. C2中輸入「=IF(B1<0,"",INT(B110)-INT(B1)10)」,同樣C2改為:[DBNum2]G/通用格式「角」,C2顯示:「零角」。
3. D2中輸入「=IF(B1<0,"",INT(B1100)-INT(B110)10)」,同樣D2改為:[DBNum2]G/通用格式「分」, D2顯示:「玖分」。
這樣在連續的三個同行單元格中實現了大寫金額格式的轉換,如圖1所示。為了使轉換符合財務格式,B2應右對齊,C2列寬無間隔,且不設左右邊框線,D2要左對齊。
二、用Excel提供的函數轉換
個位為0,則不顯示;不為0,顯示「XXX元」;不為0、且角位和分位均為0,顯示「XXX元整」;元角分位均為0,則顯示「零元整」。
小數點後面第一位為0、且元位或分位有一為0,則不顯示;為0、且元位和分位均不為0,則顯示「零」;不為0,顯示「X角」。
小數點後面第二位為0,則顯示「整」;不為0,顯示「X分」。
根據以上思路在B2中輸入公式:
「IF(B1<0,"金額為負無效",IF(OR(B1=0,B1=""),"(人民幣)零元整"));
IF(B1<1,"(人民幣)",TEXT(INT(B1),"[dbnum2](人民幣)G/通用格式")&&"元")&&IF(INT(B110)-INT(B1)10=0);
IF(INT(B1)(INT(B1100)-INT(B110)10)=0,"","零"),TEXT(INT(B110)-INT(B1)10,"[dbnum2]")&&"角")&&IF((INT(B1100)-INT(B110)10)=0,"整",TEXT((INT(B1100)-INT(B1*10)*10),"[dbnum2]")&&"分")))」。
確認後B2顯示:「(人民幣)陸仟零伍拾元零玖分」。以後使用時將公式複製到有關單元格中,若轉換的對象B1發生了變化,可點擊「編輯→替換」將B1替換掉。兩種轉換測試結果如圖2所示。
圖1 顯示大寫金額
圖2 兩種方式對話結果
編輯:林潔珊