阿拉伯數字換成貨幣大寫
❶ 阿拉伯數字轉換成大寫中文的貨幣
=TEXT(C1*100,"[DBNUM2]人民幣:0仟0佰0拾0萬0仟0佰0拾0元0角0分整")
❷ 在excel中如何講阿拉伯數字格式轉化為大寫貨幣格式,例如表格中為2.3元,如何轉化為貳圓叄角整
打開VB編輯器,新建一模塊,輸入以下代碼:
Public Function RMBDX(M)
RMBDX = Replace(Application.Text(Round(M + 0.00000001, 2), "[DBnum2]"), ".", "元")
RMBDX = IIf(Left(Right(RMBDX, 3), 1) = "元", Left(RMBDX, Len(RMBDX) - 1) & "角" & Right(RMBDX, 1) & "分", IIf(Left(Right(RMBDX, 2), 1) = "元", RMBDX & "角整", IIf(RMBDX = "零", "", RMBDX & "元整")))
RMBDX = Replace(Replace(Replace(Replace(RMBDX, "零元零角", ""), "零元", ""), "零角", "零"), "-", "負")
End Function
假如你要轉換的數值在A1單元格,在B1或其他單元格輸入= RMBDX(A1)
這是自定義函數,office 2003裡面應該有帶的。
❸ word中如何將小寫金額數字轉換為大寫
材料/工具:word2016
1、打開相關的word文檔,比如要將金額數字15263轉換為大寫數字。
❹ 在Excel 如何實現把阿拉伯數字變成大寫人民幣金額
教你一招,因為工作經常要用到小寫數字和人民幣大寫金額。所以就想了利用Excel函數公式自動轉化成人民幣大寫金額。現在和大家分享一樣:=IF(B9<0,"負","") &IF(ROUND(B9,2)=0,"零元整",IF(ROUND(ABS(B9),2)>=1,TEXT(INT(ROUND(ABS(B9),2)),"[DBNum2]")&"元","")&IF(RIGHT(TEXT(B9,".00"),2)*1=0,"整",IF(RIGHT(TEXT(B9,".00"),4)*1>=1,IF(RIGHT(TEXT(B9,".00"),2)*1>9,"","零"),IF(ROUND(ABS(B9),2)>=1,"零",""))&IF(RIGHT(TEXT(B9,".00"),2)*1>9,TEXT(LEFT(RIGHT(TEXT(B9,".00"),2)),"[DBNum2]")&"角","")&IF(RIGHT(TEXT(B9,".00"))*1>0,TEXT(RIGHT(TEXT(B9,".00")),"[DBNum2]")&"分","整")))註:B9是填寫的小寫數字。如是其它單元格,則把B9改成你要輸入的單元格即可。
❺ VB語言中如何將阿拉伯數字轉換成大寫人民幣金額
Private Sub Text2_Change() '小寫轉大寫
Dim i As Integer
Dim j As Integer
Dim myint As Integer
Dim myint1 As Integer
Dim mydoub As Double
Dim mystr As String
Dim mystr1 As String
Dim mystr2 As String
Dim mystr3 As String
Dim mystr4 As String
Dim money As Long
Dim money1 As Integer
Dim money2 As Long
mystr = Text2.Text
myint = InStr(mystr, ".")
If myint = 0 Then
mystr = Text2.Text
Else
mystr3 = Right(Text2.Text, Len(Text2.Text) - myint)
If mystr3 <> "" Then '轉換小數位
mystr4 = Left(mystr3, 1)
mystr3 = Right(mystr3, Len(mystr3) - 1)
If mystr4 <> "0" Then
mystr2 = mystr2 + setdata(Val(mystr4)) + "角"
End If
If mystr3 <> "" Then
mystr4 = Left(mystr3, 1)
mystr2 = mystr2 + setdata(Val(mystr4)) + "分"
End If
End If
mystr = Left(Text2.Text, myint - 1)
End If
j = Len(mystr)
For i = 1 To Len(mystr) '轉換整數位
money2 = Left(mystr, i)
money1 = Right(money2, 1)
If money1 = 0 Then
If j = 5 Then
If Right(mystr1, 1) <> "萬" Then mystr1 = mystr1 & "萬"
Else
If Right(mystr1, 1) <> "零" And Right(money, j) > 0 Then mystr1 = mystr1 & "零"
End If
Else
mystr1 = mystr1 & setdata(money1) + chang(j)
End If
j = j - 1
Next i
Text1.Text = mystr1 & "元" & mystr2 '顯示大寫
End Sub
❻ 如何在EXCEL中將阿拉伯數字轉換為大寫人民幣的形式
1、首先在excel單元格中輸入需要轉換為大寫金額的數字,例如輸入「98765」並選中該單元格。
❼ 阿拉伯數字 轉換成 人民幣大寫
用Excel在你想輸入數字的單元格右鍵快捷菜單選擇「設置單元格格式」在 「數字」的選項下的「特殊」中選擇中文大寫數字(有兩個,選第二個是繁體)點擊「確認」就好了
阿拉伯數字,是現今國際通用數字。最初由印度人發明,後由阿拉伯人傳向歐洲,之後再經歐洲人將其現代化。正因阿拉伯人的傳播,成為該種數字最終被國際通用的關鍵節點,所以人們稱其為「阿拉伯數字」(也可以說是人們弄錯,誤稱為阿拉伯數字)。
阿拉伯數字由0,1,2,3,4,5,6,7,8,9共10個計數符號組成。採取位值法,高位在左,低位在右,從左往右書寫。藉助一些簡單的數學符號(小數點、負號、百分號等),這個系統可以明確的表示所有的有理數。為了表示極大或極小的數字,人們在阿拉伯數字的基礎上創造了科學記數法。
中文大寫金額數字應用正楷或行書填寫,如壹、貳、叄、肆、伍、陸、柒、捌、玖、拾、佰、仟、萬、億、元、角、分、零、整(正)等字樣,不得用一、二(兩)、三、四、五、六、七、八、九、十、毛、另(或0)填寫,不得自造簡化字。如果金額數字書寫中使用繁體字,如貳、陸、億、萬、圓的,也應受理。
人民幣大寫的正確寫法還應注意以下幾項:
一、中文大寫金額數字到「元」為止的,在「元」之後、應寫「整」(或「正」)字;在「角」之後,可以不寫「整」(或「正」)字;大寫金額數字有「分」的,「分」後面不寫「整」(或「正」)字。
二、中文大寫金額數字前應標明「人民幣」字樣,大寫金額數字應緊接「人民幣」字樣填寫,不得留有空白。大寫金額數字前未印「人民幣」字樣的,應加填「人民幣」三字,在票據和結算憑證大寫金額欄內不得預印固定的「仟、佰、拾、萬、仟、佰、拾、元、角、分」字樣。
❽ 人民幣阿拉伯數字轉大寫
這個不一定,主要公式對了就行
❾ Excel如何把阿拉伯數字自動轉換成大寫金額(含元角分)
1、打開需要操作的excel表格,首先在A1單元格內輸入需要轉換成大寫金額的數字,例如數字「879」。