(相關資料圖)

大寫數字金額

壹萬叁仟肆佰貳拾伍元陸角柒分

基礎會計金額大小寫問題

這樣寫是錯的，應該是陸仟叁佰叁拾壹元伍角整，當分位是0時，大寫到角就可以，不用體現分位啦

大小寫金額轉換

int a =金額int b2 (百分位)，b1 (十分位)，b0 (個位)b2=a/100 ("/"運算是取整)b1=a0 ( %運算是取余)c1=b1 (這樣就取得了個位)b1=b1/10 (最后取得十位數字)就這種思路當然你format轉化為string然后按位讀取也是可以的

excel金額大小寫怎么轉換?

Excel自動轉換數字大小寫具體的操作步驟如下： 1. 啟動excel。按“alt+f11”快捷鍵打開“visual basic編輯器”。 2. 在“visual basic編輯器”中，單擊“插入”菜單欄中的“模塊”命令，插入一個模塊。雙擊左側“工程”窗口中的“模塊1”選項，在窗口右邊展開“模塊1（代碼）”編輯窗口，然后輸入如下代碼: function dx(q) dim cur as long,yuan as long dim jiao as integer,fen as integer dim cnyuan as string, cnjiao as string, cnfen as string if q = "" then dx = 0 exit function end if cur = round(q * 100) yuan = int(cur / 100) jiao = int(cur / 10) - yuan * 10 fen = cur - yuan * 100 - jiao * 10 cnyuan = application.worksheetfunction.text(yuan, "[dbnum2]") cnjiao = application.worksheetfunction.text(jiao, "[dbnum2]") cnfen = application.worksheetfunction.text(fen, "[dbnum2]") dx = cnyuan & "元" & "整" d1 = cnyuan & "元" if fen <> 0 and jiao <> 0 then dx = d1 & cnjiao & "角" & cnfen & "分" if yuan = 0 then dx = cnjiao & "角" & cnfen & "分" end if end if if fen = 0 and jiao <> 0 then dx = d1 & cnjiao & "角" & "整" if yuan = 0 then dx = cnjiao & "角" & "整" end if end if if fen <> 0 and jiao = 0 then dx = d1 & cnjiao & cnfen & "分" if yuan = 0 then dx = cnfen & "分" end if end if end function 輸 入完成后，關閉“visual basic編輯器”返回工作表。現在，我們可測試一下這個函數。首先，在a1單元格中輸入一個小寫數字的金額，例如123456.78，然后，在a2單元 格中輸入公式：=dx(a1)，確認后即可將a1所表示的小寫數字金額轉換為大寫的數字金額，并在a2單元格中顯示出來。怎么樣，方便吧？

這個excel里的大小寫金額如何實現？

上面的數字是每個單元格一個數字吧。設你輸入金額的單元格為a1，在分位的單元格輸入：=if(a1="","",mid($a$1,len($a$1),1))在角位的單元格輸入：=if(ROUNDDOWN($a$1*10),mid($a$1,len($a$1)-1,1),"￥")在元的個的單元格輸入：=if(and(x="￥",x=""),"",if(ROUNDDOWN($a$1*1),mid($a$1,len($a$1)-3,1),"￥"))上面的x為當前單元格右邊的那個單元格信息。之后將個位的公式向左拉，且每拉一個單元格將，“ROUNDDOWN($a$1*1)”中乘的1縮小10倍（即1改為0.1,0.1改為0.01）并將mid($a$1,len($a$1)-3,1)中的“3”每次減1（即3改為4,4改為5）。需要大寫的那個單元格輸入：=if(a1="","",a1)然后選中這個單元格->鼠標右鍵單擊->設置單元格格式->“數字”頁的“分類”中選擇“特殊”->在“類型”處選擇“人民幣大寫”->“確定”。