【溫馨提示】親愛的朋友,閱讀之前請(qǐng)您點(diǎn)擊【關(guān)注】,您的支持將是我最大的動(dòng)力!
作為公司的出納和會(huì)計(jì),天天面對(duì)數(shù)字,有時(shí)候需要把數(shù)字轉(zhuǎn)換成大寫,甚至還要帶上元角分,今天小編就教你如何數(shù)字大小寫之間的轉(zhuǎn)換。
方法一:小寫轉(zhuǎn)大寫設(shè)置單元格格式法
1、選中需要轉(zhuǎn)換成大寫的數(shù)字單元格,鼠標(biāo)右鍵點(diǎn)擊選中區(qū)域,在彈出的菜單中選擇【設(shè)置單元格格式】,調(diào)出設(shè)置單元格格式窗口(或者Ctrl+1鍵)
2、在數(shù)字頁面下,分類選擇【特殊】,類型列表中選擇【中文大寫數(shù)字】,最后點(diǎn)擊【確定】返回工作區(qū),選中的數(shù)字就轉(zhuǎn)換成大寫了。
方法二:小寫轉(zhuǎn)大寫函數(shù)公式法
可以利用NUMBERSTRING()函數(shù)完成
語法:NUMBERSTRING(VALUE,TYPE)
參數(shù)一value:要轉(zhuǎn)化的數(shù)字
參數(shù)二type:返回結(jié)果的類型,有三種:1,2,3
方法三:小寫轉(zhuǎn)大寫帶元角分
在B2單元格輸入公式:
="人民幣"&IF(A2=INT(A2),NUMBERSTRING(INT(A2),2)&"元整",IF(A2*10=INT(A2*10),NUMBERSTRING(INT(A2),2)&"元"&NUMBERSTRING(INT(A2*10)-INT(A2)*10,2)&"角整",IF(ROUNDDOWN(A2*10-INT(A2)*10,0)=0,NUMBERSTRING(INT(A2),2)&"元零"&NUMBERSTRING(ROUND(A2*100-INT(A2*10)*10,0),2)&"分",NUMBERSTRING(INT(A2),2)&"元"&NUMBERSTRING(INT(A2*10)-INT(A2)*10,2)&"角"&NUMBERSTRING(ROUND(A2*100-INT(A2*10)*10,0),2)&"分")))
然后再填充公式,整列數(shù)字都轉(zhuǎn)換成帶元角分的大寫金額。
公式比較長,用到的函數(shù)較多,不明白的可以直接套用,把公式中的A2單元格修改成需要轉(zhuǎn)換數(shù)字的單元格即可。
方法四:小寫轉(zhuǎn)大寫帶元角分(通用公式)
方法3中的NUMBERSTRING()在較低的Excel版本中沒有這個(gè)函數(shù),可以用下面的公式:
="人民幣"&TEXT(INT(A2),"[DBNUM2]")&"元"&TEXT(MID(A2,LEN(INT(A2))+2,1),"[DBNUM2]D角")&TEXT(MID(A2,LEN(INT(A2))+3,1),"[DBNUM2]D分")
方法五:大寫轉(zhuǎn)小寫
如果需要把下圖中的大寫轉(zhuǎn)換成小寫,可以用VBA代碼解決。
1、按Alt+F11鍵調(diào)出VBA窗體,點(diǎn)擊【插入】-【模塊】,在代碼窗口輸入下面代碼:
Function Atoa(At As String)
Dim j, m
For i = 1 To Len(At)
Select 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 Select
m = m & j
Next
Atoa = m
End Function
2、在B2單元格輸入公式:=atoa(A2),即可得出小寫數(shù)字。
小伙伴們,在使用Excel中還碰到過哪些問題,評(píng)論區(qū)留言一起討論學(xué)習(xí),堅(jiān)持原創(chuàng)不易,您的點(diǎn)贊轉(zhuǎn)發(fā)就是對(duì)小編最大的支持
聯(lián)系客服