作為公司的出納和會計,天天面對數字,有時候需要把數字轉換成大寫,甚至還要帶上元角分,今天小編就教你如何數字大小寫之間的轉換。
1、選中需要轉換成大寫的數字單元格,鼠標右鍵點擊選中區域,在彈出的菜單中選擇【設置單元格格式】,調出設置單元格格式窗口(或者Ctrl+1鍵)
2、在數字頁面下,分類選擇【特殊】,類型列表中選擇【中文大寫數字】,最后點擊【確定】返回工作區,選中的數字就轉換成大寫了。
方法二:小寫轉大寫函數公式法
可以利用()函數完成
語法:(VALUE,TYPE)
參數一value:要轉化的數字
參數二type:返回結果的類型,有三種:1財務數字大小寫轉換,2,3
方法三:小寫轉大寫帶元角分
在B2單元格輸入公式:
="人民幣"&IF(A2=INT(A2),(INT(A2),2)&"元整",IF(A2*10=INT(A2*10),(INT(A2),2)&"元"&(INT(A2*10)-INT(A2)*10,2)&"角整",IF((A2*10-INT(A2)*10,0)=0,(INT(A2),2)&"元零"&(ROUND(A2*100-INT(A2*10)*10,0),2)&"分",(INT(A2),2)&"元"&(INT(A2*10)-INT(A2)*10,2)&"角"&(ROUND(A2*100-INT(A2*10)*10,0),2)&"分")))
然后再填充公式,整列數字都轉換成帶元角分的大寫金額。
公式比較長,用到的函數較多,不明白的可以直接套用,把公式中的A2單元格修改成需要轉換數字的單元格即可。
方法四:小寫轉大寫帶元角分(通用公式)
方法3中的()在較低的Excel版本中沒有這個函數,可以用下面的公式:
="人民幣"&TEXT(INT(A2),"[]")&"元"&TEXT(MID(A2,LEN(INT(A2))+2,1),"[]D角")&TEXT(MID(A2,LEN(INT(A2))+3,1),"[]D分")
方法五:大寫轉小寫
如果需要把下圖中的大寫轉換成小寫,可以用VBA代碼解決。
1、按Alt+F11鍵調出VBA窗體,點擊【插入】-【模塊】,在代碼窗口輸入下面代碼:
Atoa(At As )
Dim j, m
For i = 1 To Len(At)
Case Mid(At, i, 1)
Case "一"
j = 1
Case "二"
j = 2
Case "三"
j = 3
Case "四"
j = 4
Case "五"
j = 5
Case "六"
j = 6
Case "七"
j = 7
Case "八"
j = 8
Case "九"
j = 9
Case "○"
j = 0
End
m = m & j
Next
Atoa = m
End
2、在B2單元格輸入公式:=atoa(A2)財務數字大小寫轉換,即可得出小寫數字。
小伙伴們,在使用Excel中還碰到過哪些問題,評論區留言一起討論學習,堅持原創不易,您的點贊轉發就是對小編最大的支持