Excel环境下金额数字大写转换的方法探讨

合集下载

如何转换【中文大写金额】

如何转换【中文大写金额】

如何转换【中文大写金额】点击上方“EXCEL应用之家”蓝字关注微信公众号点击文章底部“阅读原文”可领取阅读红包;模板文档可免费获取送人玫瑰,手有余香,请将文章分享给更多朋友动手操作是熟练掌握EXCEL的最快捷途径!在实际工作中,尤其是财务工作中,需要将数字金额转换为中文大写金额。

一般地,中文大写金额需要将每位数字都写出来。

我们仍以上一篇的表格为例,来向大家介绍一下如何将数字金额转换为中文大写金额。

步骤一:我们对单元格区域A3:A4求和,并将结果输入单元格A6 步骤二:合并单元格B7:I7,并在其中输入:“=TEXT(A6*100,"[DBNum2]0拾0万0仟0佰0拾0元0角0分")”即可得到正确的结果了。

思路:同上一篇的例子一样,我们把单元格A6的金额扩大100倍,这样就没有小数点了。

在使用中文大写格式“[DBNum2]0拾0万0仟0佰0拾0元0角0分”来逐位显示大写数字。

这里用到的TEXT函数应用也比较广泛。

它的语法结构如下:TEXT(value,format_text)value为数字值format_text 为设置单元格格式中自己所要选用的文本格式。

其中Format_text的清单比较长,也没有必要全部都列在这里。

常用的部分大家可以在【设置单元格格式】-【自定义】中查看了。

这里有个小技巧,当输入TEXT函数的格式参数是,你可以打开【自定义】,选择需要的格式,复制到公式中就可以了。

-END-欢迎关注【Excel应用之家】专栏,了解更多的Excel实际应用技能,尽在Excel应用之家!版权声明:本文归Excel应用之家专栏(微信公众号Excel应用之家)原创撰写,未经允许不得转载。

欢迎关注专栏/公众号。

excel 金额大写转换公式

excel 金额大写转换公式

excel 金额大写转换公式摘要:一、介绍Excel 金额大写转换公式二、分析金额大写转换公式的原理三、讲解如何使用Excel 金额大写转换公式四、总结Excel 金额大写转换公式的优点与局限性五、提供使用Excel 金额大写转换公式时的注意事项正文:在Excel 中,我们常常需要将数字金额转换为大写金额。

为了方便用户实现这一功能,Excel 提供了一个金额大写转换公式。

本文将详细介绍这个公式,并分析其原理及使用方法。

首先,我们来了解一下Excel 金额大写转换公式的原理。

这个公式基于汉字数字与阿拉伯数字的对应关系,通过嵌套IF 函数,实现将阿拉伯数字转换为大写金额的功能。

接下来,我们来讲解如何使用Excel 金额大写转换公式。

假设A1 单元格中存储的数字金额为1234.56,我们可以在B1 单元格中输入以下公式:```=IF(A1>=10000, "壹万零" & TRANSPOSE(TEXT(A1-10000, ";负数;零;壹;贰;叁;肆;伍;陆;柒;捌;玖;拾")), IF(A1>=1000, "壹仟零" & TRANSPOSE(TEXT(A1-1000, ";负数;零;壹;贰;叁;肆;伍;陆;柒;捌;玖;拾")),IF(A1>=100, "壹佰零" & TRANSPOSE(TEXT(A1-100, ";负数;零;壹;贰;叁;肆;伍;陆;柒;捌;玖;拾")), IF(A1>=10, "十元" & TRANSPOSE(TEXT(A1-10, ";负数;零;壹;贰;叁;肆;伍;陆;柒;捌;玖;拾")), TEXT(A1, ";负数;零;壹;贰;叁;肆;伍;陆;柒;捌;玖;拾")))```以上公式可以根据需要进行调整,以适应不同的金额格式需求。

Excel表格怎么自动换算金额大写

Excel表格怎么自动换算金额大写

Excel表格怎么自动换算金额大写EXCEL表格怎么自动换算金额大写:A1是123.45,A2我怎么能出现壹佰贰拾叁元肆角伍分第一步,打开已有的表格,同时把这个网页也打开,稍后能用到这个公式。

因为公式太长,必须得用复制,粘贴的方法,才保准。

第二步,复制公式,冒号后一个也不能落下。

即:=SUBSTITUTE(SUBSTITUTE(IF(A1<0,"负","")&TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"元"&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(R OUND(A1,2)*10)),"[DBNum2]"))&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"角","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROU ND(A1,2)),"[D BNum2]")&"分",IF(ROUND(A1,2)=0,"","整")),"零元零",""),"零元","") 。

第三步,双击进入A2,使A2单元格中有光标在闪,点粘贴。

第四步,回车。

2.如果没有小数点的,就直接在单元格右击-设置单元格格式-特殊-中文大写数字。

3. a列格式为数值-货币,b列格式为特殊-中文大写数字-自定义-格式后加上圆整函数:b1=a1EXCEL表格中怎么设置美元的大写金额1.比如说1.2美元输入自动变成“壹美元贰美分”这样。

Excel中金额大小写转换(解决负数无法显示问题)

Excel中金额大小写转换(解决负数无法显示问题)

Excel中金额大小写转换(解决负数无法显示问题)一、Excel自动转换数字大小写具体的操作步骤如下:1. 启动excel。

按“alt+f11”快捷键打开“visual basic编辑器”。

2. 在“visual basic编辑器”中,单击“插入”菜单栏中的“模块”命令,插入一个模块。

双击左侧“工程”窗口中的“模块1”选项,在窗口右边展开“模块1(代码)”编辑窗口,然后输入如下代码:Function NtoC(n) 'n as singleConstcNum = "零壹贰叁肆伍陆柒捌玖-万仟佰拾亿仟佰拾万仟佰拾元角分"ConstcCha = "零仟零佰零拾零零零零零亿零万零元亿万零角零分零整-零零零零零亿万元亿零整整"NtoC = ""sNum = Trim(Str(Int(n * 100)))For i = 1 To Len(sNum) '逐位转换NtoC = NtoC + Mid(cNum, (Mid(sNum, i, 1)) + 1, 1) + Mid(cNum, 26 - Len(sNum) + i, 1)NextFor i = 0 To 11 '去掉多余的零NtoC = Replace(NtoC, Mid(cCha, i * 2 + 1, 2), Mid(cCha, i + 26, 1))NextEnd Function3.练习A1=-10135.33 A2=NTOC(ABS(A1))二、Excel中金额大小写转换公式公式1:“=IF(ROUND(E19,2)=0,"",IF(ROUND(ABS(E19),2)>=1,TEXT(INT(ROUND(ABS(E19),2)),"[DBNum2]" )&"元","")&IF(RIGHT(TEXT(E19,".00"),2)*1=0,"整",IF(RIGHT(TEXT(E19,".00"),4)*1>=1,IF(RIGHT(TEXT(E19,".00"),2)*1>9,"","零"),IF(ROUND(ABS(E19),2)>=1,"零",""))&IF(RIGHT(TEXT(E19,".00"),2)*1>9,TEXT(LEFT(RIGHT(TEXT(E19,".00"),2)),"[DBNum2]")&"角","")&IF(RIGHT(TEXT(E19,".00"))*1>0,TEXT(RIGHT(TEXT(E19,".00")),"[DBNum2]")&"分","整")))”公式2:“=IF(F4<1,IF(F4<0.1,TEXT(INT(F4*100),"[DBNum2]G/通用格式")&"分",IF((INT(F4*100)-INT(F4*10)*10=0),TEXT(INT(F4*10),"[DBNum2]G/通用格式")&"角整",TEXT(INT(F4*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(F4*100)-INT(F4*10)*10,"[DBNum2]G/通用格式")&"分")),TEXT(INT(F4),"[DBNum2]G/通用格式"&"元")&IF((INT(F4*10)-INT(F4)*10)=0,IF((INT(F4*100)-INT(F4*10)*10)=0,"","零"),IF((INT(F4*0.1)-INT(F4)*0.1)=0,"零","")&TEXT(INT(F4*10)-INT(F4)*10,"[DBNum2]G/通用格式")&"角")&IF((INT(F4*100)-INT(F4*10)*10)=0,"整",TEXT(INT(F4*100)-INT(F4*10)*10,"[DBNum2]G/通用格式")&"分"))”公式3:“=IF(B10<1,IF(B10<0.1,TEXT(INT(B10*100),"[DBNum2]G/通用格式")&"分",IF((INT(B10*100)-INT(B10*10)*10=0),TEXT(INT(B10*10),"[DBNum2]G/通用格式")&"角整",TEXT(INT(B10*10),"[DBNum2]G/通用格式")&"角"&TEXT(INT(B10*100)-INT(B10*10)*10,"[DBNum2]G/通用格式")&"分")),TEXT(INT(B10),"[DBNum2]G/通用格式"&"元")&IF((INT(B10*10)-INT(B10)*10)=0,IF((INT(B10*100)-INT(B10*10)*10)=0,"","零"),IF((INT(B10*0.1)-INT(B10)*0.1)=0,"零","")&TEXT(INT(B10*10)-INT(B10)*10,"[DBNum2]G/通用格式")&"角")&IF((INT(B10*100)-INT(B10*10)*10)=0,"整",TEXT(INT(B10*100)-INT(B10*10)*10,"[DBNum2]G/通用格式")&"分"))”。

在EXCEL中将数字转换为人民币大写的三种方式

在EXCEL中将数字转换为人民币大写的三种方式

在EXCEL中将数字转换为人民币大写的三种方式鉴于EXCEL本身提供将数字转换为大写表示的功能根本不能正常应用在实际投标或财务应用之中,所以要自己建设,暂时找到了三种实现途径,经过测试均功能正常,还有一种是在书上找到的,懒得KEYIN进来了,反正也差不多了。

方法1,通过在EXCEL表格框(例如在“B1”单元)中直接输入以下公式:=IF(A1<0,"金额为负无效",(IF(OR(A1=0,A1=""),"(人民币)零元",IF(A1<1,"(人民币)",TEXT(INT(A1),"[dbnum2](人民币)G/通用格式")&"元"))))&IF((INT(A1*10)-INT(A1)*10)=0,IF(INT(A1*100)-INT(A1*10)*10=0,"","零"),(TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角"))&IF((INT(A1*100)-INT(A1*10)*10)=0,"整",TEXT((INT(A1*100)-INT(A1*10)*10),"[dbnum2]")&"分")然后在“A1”中输入数字,就可看到效果。

方法2,通过VBA(宏)输入转换公式: 点击菜单“工具”->“宏”->“VisualBasic编辑器”,在编辑器窗口中,点击菜单“插入”->“模块”,在出现的窗口中输入以下内容:Function daxie(ByVal Num) ' 人民币中文大写函数Application.Volatile TruePlace = "分角元拾佰仟万拾佰仟亿拾佰仟万"Dn = "壹贰叁肆伍陆柒捌玖"D1 = "整零元零零零万零零零亿零零零万"If Num < 0 Then FuHao = "(负)"Num = Format(Abs(Num), "###0.00") * 100If Num > 999999999999999# Then: daxie = "数字超出转换范围!!": Exit FunctionIf Num = 0 Then: daxie = "零元零分": Exit FunctionNumA = Trim(Str(Num))NumLen = Len(NumA)For J = NumLen To 1 Step -1 ' 数字转换过程temp = Val(Mid(NumA, NumLen - J + 1, 1))If temp <> 0 Then ' 非零数字转换NumC = NumC & Mid(Dn, temp, 1) & Mid(Place, J, 1) Else ' 数字零的转换If Right(NumC, 1) <> "零" ThenNumC = NumC & Mid(D1, J, 1)ElseSelect Case J ' 特殊数位转换Case 1NumC = Left(NumC, Len(NumC) - 1) & Mid(D1, J, 1)Case 3, 11NumC = Left(NumC, Len(NumC) - 1) & Mid(D1, J, 1) & "零"Case 7If Mid(NumC, Len(NumC) - 1, 1) <> "亿" ThenNumC = Left(NumC, Len(NumC) - 1) & Mid(D1, J, 1) & "零"End IfCase ElseEnd SelectEnd IfEnd IfNextdaxie = "(人民币)" & FuHao & Trim(NumC)End Function然后切换回excel,在“A2”单元中输入数字,在“B2”单元中输入:“=DaXie(A2)”,就可看到效果。

excel金额大写自动生成的公式

excel金额大写自动生成的公式

一、介绍Excel金额大写自动生成的公式在日常工作中,我们经常会遇到需要将阿拉伯数字金额转换为大写金额的情况。

而在Excel中,我们可以利用公式来实现这一转换,从而提高工作效率。

本文将介绍Excel中金额大写自动生成的公式的使用方法和注意事项。

二、公式的基本原理1. 在Excel中,可以利用VBA编程语言来编写宏以实现金额大写自动生成的功能。

通过编写相应的VBA代码,可以使Excel自动将输入的数字金额转换为大写金额。

2. 公式的基本原理是将输入的阿拉伯数字金额拆分成整数和小数部分,然后分别进行转换为大写金额,最后将整数和小数部分的大写金额合并为最终结果。

三、公式的具体实现步骤1. 在Excel中,首先需要按下Alt + F11组合键打开VBA编辑器,在项目资源管理器中选择需要添加宏的工作簿。

2. 在选中的工作簿中插入一个新的模块,然后在模块中编写相应的VBA代码。

可以借助搜索引擎查找金额大写自动生成的VBA代码,然后将其粘贴到模块中。

3. 在编写完成VBA代码后,可以利用快捷键Alt + F8来运行宏,或者将宏添加到快速访问工具栏,方便日常使用。

四、注意事项1. 在使用金额大写自动生成的公式时,需要确保输入的金额格式正确,且没有特殊符号和字母等非数字字符。

2. 由于VBA代码的复杂性和灵活性,建议在使用前充分了解其功能和运行原理,以避免出现不必要的错误和问题。

3. 在日常工作中,需要根据具体的需求,对金额大写自动生成的公式进行必要的修改和调整,以满足不同的应用场景。

五、结语通过以上介绍,相信大家对Excel金额大写自动生成的公式有了一定的了解。

在实际工作中,合理利用Excel的功能和公式,可以提高工作效率,减少重复劳动,帮助我们更好地处理各类金额转换的需求。

希望本文的介绍能够对大家有所帮助。

六、如何修改VBA代码以适应不同的需求1. 调整显示格式:根据实际需求,我们可以修改VBA代码中的显示格式,包括小数点后保留位数、显示大写金额的格式等。

excel中如何将数字变成大写金额的函数

excel中如何将数字变成大写金额的函数

excel中如何将数字变成大写金额的函数如何在Excel中将数字转化为大写金额在Excel中,我们经常需要将数字转化为大写金额,以便更直观地展示数值。

虽然Excel本身并没有提供直接将数字转化为大写金额的函数,但我们可以通过一些方法来实现这个功能。

本文将介绍两种常用的方法,分别是使用Excel的内置函数和使用自定义宏。

一、使用Excel的内置函数Excel提供了一个内置的函数——“人民币大写”函数,可以将数字转化为大写金额。

下面是使用该函数的步骤:步骤1:打开Excel并选择一个单元格,例如A1,用于输入要转化的数字。

步骤2:在另一个单元格中,例如B1,输入以下公式:=人民币大写(A1)步骤3:按下回车键,即可将A1单元格中的数字转化为大写金额。

需要注意的是,“人民币大写”函数只能将数字转化为中文大写金额,而不能转化为其他语言的大写金额。

如果需要转化为其他语言的大写金额,可以考虑使用自定义宏的方法。

二、使用自定义宏自定义宏是一种基于VBA(Visual Basic for Applications)语言的编程方式,可以在Excel中实现各种自定义功能。

下面是使用自定义宏将数字转化为大写金额的步骤:步骤1:按下Alt+F11键,打开VBA编辑器。

步骤2:在VBA编辑器中,选择“插入”菜单,然后选择“模块”。

步骤3:在新建的模块中,输入以下VBA代码:```Function ConvertToChineseNumber(ByVal MyNumber)Dim MyCurrency, DecimalPlace, CountReDim Place(9) As StringPlace(2) = " Thousand "Place(3) = " Million "Place(4) = " Billion "Place(5) = " Trillion "' Convert MyNumber to String, trimming extra spaces.MyNumber = Trim(CStr(MyNumber))' Check for valid input.If MyNumber = "" ThenConvertToChineseNumber = ""Exit FunctionEnd If' Convert MyNumber to Currency figures.ReDim DecimalPlace(9) As StringDecimalPlace(2) = " Hundred "DecimalPlace(3) = " Thousand "DecimalPlace(4) = " Million "DecimalPlace(5) = " Billion "' Convert MyNumber to Currency figures.MyNumber = Trim(CStr(MyNumber))' Remove leading zeros' DecimalPlace = GetVal(Trim(Mid(MyNumber, DecimalPlace + 1, 2)))Count = 1Do While MyNumber <> ""ReDim Preserve MyCurr(Count) As StringCount = Count + 1MyCurr(Count - 1) = GetTens(Trim(Mid(MyNumber, 1, 2)), MyNumber)If Len(MyNumber) > 2 ThenMyNumber = Trim(Mid(MyNumber, 3))ElseMyNumber = ""End IfLoopCount = Count - 1For DecimalPlace = Count To 1 Step -1MyCurrency = MyCurrency & " " & MyCurr(DecimalPlace) If DecimalPlace = 1 Then' -- If place is ten thousand and greater than 0 set nother name to RupeesIf Len(MyNumber) = 1 Then MyCurr(1) = " and " & MyCurr(1)MyCurrency = MyCurrency & Place(DecimalPlace)End IfNext DecimalPlaceConvertToChineseNumber = MyCurrencyEnd FunctionFunction GetTens(TensText, ByVal Amount)Dim Result As StringResult = "" ' Null out the temporary function value.If Val(Left(TensText, 1)) = 1 Then ' If value between 10-19...Select Case Val(TensText)Case 10: Result = "Ten"Case 11: Result = "Eleven"Case 12: Result = "Twelve"Case 13: Result = "Thirteen"Case 14: Result = "Fourteen"Case 15: Result = "Fifteen"Case 16: Result = "Sixteen"Case 17: Result = "Seventeen"Case 18: Result = "Eighteen"Case 19: Result = "Nineteen"Case ElseEnd SelectElse ' If value between 20-99...Select Case Val(Left(TensText, 1))Case 2: Result = "Twenty "Case 3: Result = "Thirty "Case 4: Result = "Forty "Case 5: Result = "Fifty "Case 6: Result = "Sixty "Case 7: Result = "Seventy "Case 8: Result = "Eighty "Case 9: Result = "Ninety "Case ElseEnd SelectResult = Result & GetDigit _(Right(TensText, 1)) ' Retrieve ones place. End IfGetTens = ResultEnd FunctionFunction GetDigit(Digit)Select Case Val(Digit)Case 1: GetDigit = "One"Case 2: GetDigit = "Two"Case 3: GetDigit = "Three"Case 4: GetDigit = "Four"Case 5: GetDigit = "Five"Case 6: GetDigit = "Six"Case 7: GetDigit = "Seven"Case 8: GetDigit = "Eight"Case 9: GetDigit = "Nine"Case Else: GetDigit = ""End SelectEnd Function```步骤4:按下Ctrl+S保存宏,并关闭VBA编辑器。

Excel表格里怎么将数字金额转换为大写

Excel表格里怎么将数字金额转换为大写

Excel表格里怎么将数字金额转换为大写
Excel表格里怎么将数字金额转换为大写?很多朋友都有这样的需求,手动打字太慢而且容易错,大家可以尝试把数字金额直接转换成大写,今天系统之家我就来讲解office软件里Excel表格怎么将金额转成大写的方法,感兴趣的小伙伴快来这里学习一下。

Excel表格将金额转成大写的方法
1、进入Excel后,将金额复制到大写的一列,并选中这一列。

2、单击鼠标右键,在弹出的功能栏中选择设置单元格格式。

3、在左侧栏中点击特殊,选择中文大写数字,点击确定。

4、此时小写的金额就变成大写的金额了。

以上就是系统之家给大家分享的Office Excel表格将金额转成大写的快捷方法,希望对你有帮助。

EXCEL中小写数字转换为中文大写货币金额格式方法

EXCEL中小写数字转换为中文大写货币金额格式方法

学习使人进步心之所向,所向披靡关于EXCEL中小写数字转换为中文大写货币金额格式方法第一种方法:复制红字体部分至需大写金额单元格=TEXT(INT(B12),"[DBNum2]G/通用格式")&"元"&IF((INT(B12*10)-INT(B12)*10)=0,IF((INT(B12*100)-INT(B12)*100)>0,"零",""),TEXT(IN T(B12*10)-INT(B12)*10,"[DBNum2]G/通用格式")&"角")&IF((INT(B12*100)-INT(B12*10)*10) =0,"整",TEXT(INT(B12*100)-INT(B12*10)*10,"[DBNum2]G/通用格式")&"分")B12为小写金额所在单元格()第二种方法:复制红字体部分至需大写金额单元格=IF(ROUND(B12,2)<0,"无效数值",IF(ROUN D(B12,2)=0,"零",IF(ROUND(B12,2)<1,"",TEXT(INT(ROUND(B12,2)),"[dbnum2]")&"元")&IF(I NT(ROUND(B12,2)*10)-INT(ROUND(B12,2))*10=0,IF(INT(ROUND(B12,2))*(INT(ROUND(B12, 2)*100)-INT(ROUND(B12,2)*10)*10)=0,"","零"),TEXT(INT(ROUND(B12,2)*10)-INT(ROUND (B12,2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(B12,2)*100)-INT(ROUND(B12,2)*10)*10)= 0,"整",TEXT((INT(ROUND(B12,2)*100)-INT(ROUND(B12,2)*10)*10),"[dbnum2]")&"分")))B12为小写金额所在单元格1、这个看起来比较烦琐,不过终究达到了效果。

Excel--手把手教你转换出中文大写金额

Excel--手把手教你转换出中文大写金额

手把手教你转换出中文大写金额大家在使用Excel的时候,是否会遇到要把一个或一些阿拉伯数字转换成中文大写金额的计算要求呢?如果只是偶尔需要对少数几个数字进行转换,干脆手工操作啦,但如果要进行转换的数字较多或经常要转换时,该怎么办呢?一向无往不胜的Excel能为你做些什么呢?其实,这个不难,最少有三种方法可以实现。

一、设置单元格格式:用这个办法能直接将阿拉伯数字转换成中文大写金额,而且操作简单。

右击需要转换的单元格,在弹出的快捷菜单中选择“单元格格式”,然后在“数字”选项卡中选择“自定义”,在“类型”中写入“[DBNum2]G/通用格式"元"”后按确定即可。

瞧,321是不是已经变成了“叁佰贰拾壹元”了?可惜的是,这个办法只能处理整数,而对带有小数的数字无能为力。

当然也有过朋友通过对此法进行一定的扩展而可以处理部分带小数的数字,但效果不是很理想。

二、利用公式进行转换:所谓“自力更生,丰衣足食”,这第三种方法就是自己编写公式进行转换。

为了照顾一些Excel初学者,我们先来了解一下什么是Excel里的公式与函数。

Excel之所以计算功能异常强大,百分之八十的功劳就在于用户可以创建公式进行计算。

所谓公式,实际上就是一个计算表达式(通常是包含函数与单元格引用的计算表达式)。

在Excel里,以“=”作为公式的标志,在任何一个非文本值类型的单元格内,只要以“=”开头,就必定是Excel公式,举一最简单的例子:如果A1、B1单元格的值为别为1和2,那么如果在C3单元格内输入“=A1+B1”,则Excel会自动将A1和B1的值相加,得到数值3,再返回给C3单元格。

再来说函数,函数其实就是包装好的公式,它能根据你提供的参数自动进行复杂的计算,从而最大限度地减轻你的工作量。

Excel内置了大量具备各种功能的函数,而且Excel还允许用户自己添加函数,这样一来,在Excel里几乎没有计算不出来的东西了。

Excel中人民币小写金额转换大写的技巧【会计实务经验之谈】

Excel中人民币小写金额转换大写的技巧【会计实务经验之谈】

Excel中人民币小写金额转换大写的技巧【会计实务经验之谈】在Excel表格里面,想要将人民币小写金额转换成大写格式,可以用自定义格式类型中的“[dbnum2]G/通用格式”改为“[dbnum2] G/通用格式“元””来实现。

但在转换小数时却出现了问题,比如¥6&#8218;050.09只能转换为“陆仟零伍拾.零玖圆”。

那么用Excel能不能解决这一先天不足呢?其方法有以下两种(以下均对B1转换,假设B1是通过函数ROUND( )四舍五入取得二位小数的小写金额数,其值为¥6&#8218;050.09)。

一、在三个连续的同行单元格中转换1. B2中输入公式“=IF(B1〈0,”金额为负无效”,INT(B1))”,计算结果为¥6&#8218;050.00,然后点击“格式→单元格→数字→特殊→中文大写数字→确定”,B2显示“陆仟零伍拾”,再点击“格式→单元格→数字→自定义”,将“类型”编辑框中的“[dbnum2]G/通用格式”修改为:[dbnum2](“人民币”)G/通用格式“元”,此时B2显示:“(人民币)陆仟零伍拾元”。

2. C2中输入“=IF(B1〈0,”“,INT(B1 10)-INT(B1) 10)”,同样C2改为:[DBNum2]G/通用格式“角”,C2显示:“零角”。

3. D2中输入“=IF(B1〈0,”“,INT(B1 100)-INT(B1 10) 10)”,同样D2改为:[DBNum2]G/通用格式“分”, D2显示:“玖分”。

这样在连续的三个同行单元格中实现了大写金额格式的转换,如图1所示。

为了使转换符合财务格式,B2应右对齐,C2列宽无间隔,且不设左右边框线,D2要左对齐。

图1 显示大写金额二、用Excel提供的函数转换个位为0,则不显示;不为0,显示“XXX元”;不为0、且角位和分位均为0,显示“XXX元整”;元角分位均为0,则显示“零元整”。

小数点后面第一位为0、且元位或分位有一为0,则不显示;为0、且元位和分位均不为0,则显示“零”;不为0,显示“X角”。

excel小写转大写金额的三种常见方法Excel人民币金额自动大写

excel小写转大写金额的三种常见方法Excel人民币金额自动大写

excel小写转大写金额的三种常见方法Excel人民币金额自动大写之前有财务岗的伙伴问过小雅这个问题,在工作中经常要填写中文大写金额,如果一个个填写大写金额,既耗时费力,又事半功倍。

并且面对大量数据,效率低下且极易出错。

今天小雅休息,给大家整理出来一起学习。

第一,单元格格式转大写金额1、将A列的数字小写金额,复制到B列,单击右键,选择设置单元格。

2、在左侧的类别栏中,单击:特殊,就会在右侧出现类型,选择---中文大写数字即可。

总结:这种excel自动大写金额方法优势在于速度快,不过如果带转换的小写数字含有小数,则会出错。

该方法只适合整数的转换。

第二, Numberstring函数转大写金额在Excel中有一个隐藏函数:numberstring函数,专门用来将小写数字金额转为大写金额的函数。

其函数语法为:Numberstring(number,参数),有三种参数,分别为1、2、3,其对应的转为大写的格式分别为中文大写金额,会计大写金额,数学大写金额。

请参考下面小雅的截图:总结:excel人民币金额大写使用到了numberstring函数,仅能将整数部分转为大写,无法将小数部分也转为大写金额,小数部分将四舍五入到整数部分。

第三,公式转大写金额我们在B2中输入公式:=SUBSTITUTE(SUBSTITUTE(TEXT(INT(A2),"[DBNum2][$-804]G/通用格式元"&IF(INT(A2)=A2,"整",""))&TEXT(MID(A2,FIND(".",A2&".0")+1,1),"[DBNum2][$-804]G/通用格式角")&TEXT(MID(A2,FIND(".",A2&".0")+2,1),"[DBNum2][$-804]G/通用格式分"),"零角","零"),"零分","")按回车键,双击之后就能自动填充,迅速将小写的数字金额转为标准的会计的大写数字金额。

在EXCEL中将数字转换为人民币大写的三种方式

在EXCEL中将数字转换为人民币大写的三种方式

在EXCEL中将数字转换为人民币大写的三种方式鉴于EXCEL本身提供将数字转换为大写表示的功能根本不能正常应用在实际投标或财务应用之中,所以要自己建设,暂时找到了三种实现途径,经过测试均功能正常,还有一种是在书上找到的,懒得KEYIN进来了,反正也差不多了。

方法1,通过在EXCEL表格框(例如在“B1”单元)中直接输入以下公式:=IF(A1<0,"金额为负无效",(IF(OR(A1=0,A1=""),"(人民币)零元",IF(A1<1,"(人民币)",TEXT(INT(A1),"[dbnum2](人民币)G/通用格式")&"元"))))&IF((INT(A1*10)-INT(A1)*10)=0,IF(INT(A1*100)-INT(A1*10)*10=0,"","零"),(TEXT(INT(A1*10)-INT(A1)*10,"[dbnum2]")&"角"))&IF((INT(A1*100)-INT(A1*10)*10)=0,"整",TEXT((INT(A1*100)-INT(A1*10)*10),"[dbnum2]")&"分")然后在“A1”中输入数字,就可看到效果。

方法2,通过VBA(宏)输入转换公式: 点击菜单“工具”->“宏”->“VisualBasic编辑器”,在编辑器窗口中,点击菜单“插入”->“模块”,在出现的窗口中输入以下内容:Function daxie(ByVal Num) ' 人民币中文大写函数Application.Volatile TruePlace = "分角元拾佰仟万拾佰仟亿拾佰仟万"Dn = "壹贰叁肆伍陆柒捌玖"D1 = "整零元零零零万零零零亿零零零万"If Num < 0 Then FuHao = "(负)"Num = Format(Abs(Num), "###0.00") * 100If Num > 999999999999999# Then: daxie = "数字超出转换范围!!": Exit FunctionIf Num = 0 Then: daxie = "零元零分": Exit FunctionNumA = Trim(Str(Num))NumLen = Len(NumA)For J = NumLen To 1 Step -1 ' 数字转换过程temp = Val(Mid(NumA, NumLen - J + 1, 1))If temp <> 0 Then ' 非零数字转换NumC = NumC & Mid(Dn, temp, 1) & Mid(Place, J, 1) Else ' 数字零的转换If Right(NumC, 1) <> "零" ThenNumC = NumC & Mid(D1, J, 1)ElseSelect Case J ' 特殊数位转换Case 1NumC = Left(NumC, Len(NumC) - 1) & Mid(D1, J, 1)Case 3, 11NumC = Left(NumC, Len(NumC) - 1) & Mid(D1, J, 1) & "零"Case 7If Mid(NumC, Len(NumC) - 1, 1) <> "亿" ThenNumC = Left(NumC, Len(NumC) - 1) & Mid(D1, J, 1) & "零"End IfCase ElseEnd SelectEnd IfEnd IfNextdaxie = "(人民币)" & FuHao & Trim(NumC)End Function然后切换回excel,在“A2”单元中输入数字,在“B2”单元中输入:“=DaXie(A2)”,就可看到效果。

Excel中数字转换为中文大写的几种方法

Excel中数字转换为中文大写的几种方法

Excel中数字转换为中⽂⼤写的⼏种⽅法Excel中数字转换为中⽂⼤写的⼏种⽅法记得⼏年之前,⼀个朋友问我,如何在EXCEL中将⾦额转换成中⽂⼤写?本以为⽤单元格格式很容易解决,其实不然,因这其中涉及到⼩数点的转换及元⾓分的判断,所以它⽐想象中的问题要⿇烦很多。

现整理出来,供⼤家参考!仔细想来,其实实现数字读法的⽅法实际上⾄少有五种,即单元格替换、VB编程法、⾃动更正法及⼯作表函数的替换法等。

⽤VB编程实际上是最复杂的⼀种⽅法(但也是⼀劳永逸的⽅法),在很多时候完全可以⽤较简单的⽅法实现。

以下分别介绍这⼏种⽅法。

1、单元格替换如果只是为了将数值转换为中⽂⼤写,可直接选择单元格,然后单击…格式/单元格?,在单元格格式对话框中选择…分类/特殊?,在…类型?中选择…中⽂⼤写数字?,最后单击…确定?。

2、⾃动更正法使⽤⾃动更正功能,可以简化⽤户对⼤写汉字的输⼊操作,例如可以将“1//”定义更正为“壹”,那么当要输⼊“壹”时,就可通过键⼊“1//”来实现。

另外,这种定义以后不仅在Excel中有效,在Word中也同样有效,因为“⾃动更正”程序是Office组件所公⽤的。

⽤“⾃动更正”是最简单易⾏的,⽤户可⾃由、⽅便地输⼊要写的⼤写读法。

然⽽它的局限性也很明显,即它虽然给使⽤者提供了输⼊⼤写数字的⽅便⼿段,但终究还是需要⼈⼯输⼊,不能⾃动、实时地依当前的实际数字结果进⾏更新。

3、⼯作表函数替换法要做到数值的⾃动更新,⼀般都会想到⽤VB构造函数法,但其实我们可采⽤⼀个简单的⽅法,即⼯作表函数的替换法。

顾名思义,所谓“⼯作表函数的替换法”,就是将原来的结果换去⼀部分。

那么换什么,⼜怎样换?我们知道,在Excel中,提供了多种数字的显⽰格式。

其中⽂版实际上也包括数字的⼤写读法显⽰格式,但遗憾的是这个功能对⼀般⽤户来说基本上不能⽤,因为Microsoft在实现这个数字显⽰格式时犯了⼀个⼩⼩的错误,例如“33.56”这个数,它显⽰出来的是“叁拾叁.伍陆”。

excel技巧保留两位小数小写转大写金额的方法

excel技巧保留两位小数小写转大写金额的方法

excel技巧保留两位小数小写转大写金额的方法本文讨论的是小写金额转大写,当小写的金额数字带小数的时候,通常就是两位小数,比如123.45元,本文只针对两位小数的小写转大写金额转换。

1、十万以内范围转换:将小写数字转换成大写中文:右击需要转换的单元格,在弹出的快捷菜单中选择设置单元格格式,本文讨论的是小写金额转大写,当小写的金额数字带小数的时候,通常就是两位小数,比如123.45元,本文只针对两位小数的小写转大写金额转换。

1、十万以内范围转换:将小写数字转换成大写中文:右击需要转换的单元格,在弹出的快捷菜单中选择“设置单元格格式”,然后在“数字”选项卡中选择“自定义”,在“类型”中输入入:[DBNum2]0"万"0"仟"0"佰"0"拾"0"元".0"角"0"分""整"百以内的大写格式: [DBNum2][$-804]"大""写"!:0"佰"0"拾"0"元".0"角"0"分""整"小写格式: ¥#,##0.00_),[红色](¥#,##0.00)2、十万以外范围转换:将小写数字转换成大写中文:右击需要转换的单元格,在弹出的快捷菜单中选择“设置单元格格式”,然后在“数字”选项卡中选择“自定义”,在“类型”中输入:[DBNum2]0"万"0"仟"0"佰"0"拾"0"万"0"仟"0"佰"0"拾"0"元".0"角"0"分""整"199条建筑设计知识1. 公共建筑通常以交通、使用、辅助三种空间组成2. 美国著名建筑师沙利文提出的名言‘形式由功能而来’3. 密斯.凡.德.罗设计的巴塞罗那博览会德国馆采用的是‘自由灵活的空间组合’开创了流动空间的新概念4. 美国纽约赖特设计的古根海姆美术馆的展厅空间布置采用形式是串联式5. 电影放映院不需采光6. 点式住宅可设天井或平面凹凸布置可增加外墙面,有利于每层户数较多时的采光和通风7. 对结构形式有规定性的有大小和容量、物理环境、形状的规定性8. 功能与流线分析是现代建筑设计最常用的手段9. 垂直方向高的建筑需要考虑透视变形的矫正10. 橙色是暖色,而紫色含有蓝色的成分,所以偏冷;青色比黄色冷、红色比黄色暖、蓝色比绿色冷11. 同样大小冷色调较暖色调给人的感觉要大12. 同样距离,暖色较冷色给人以靠近感13. 为保持室内空间稳定感,房间的低处宜采用低明度色彩14. 冷色调给人以幽雅宁静的气氛15. 色相、明度、彩度是色彩的三要素;三元色为红、黄、蓝16. 尺度的概念是建筑物整体或局部给人的视角印象大小和其实际大小的关系17. 美的比例,必然正确的体现材料的力学特征18. 不同文化形成独特的比例形式19. 西方古典建筑高度与开间的比例,愈高大愈狭长,愈低矮愈宽阔20. ‘稳定’所涉及的要素是上与下之间的相对轻重关系的处理21. 人眼观赏规律H 18°~45°局部、细部2H 18°~27°整体3H <18°整体及环境22. 黄金分隔比例为1:1.61823. 通风屋面只能隔离太阳辐射不能保温,适宜于南方24. 总图布置要因地制宜,建筑物与周围环境之间关系紧凑,节约因地;适当处理个体与群体,空间与体形,绿化和小品的关系;合理解决采光、通风、朝向、交通与人流的组织25. 热水系统舒适稳定适用于居住建筑和托幼蒸汽系统加热快,适用于间歇采暖建筑如会堂、剧场26. 渐变具有韵律感27. 要使一座建筑显得富有活力,形式生动,在构图中应采用对比的手法对比的手法有轴线对比、体量对比、方向对比、虚实对比、色彩对比28. 要使柱子看起来显得细一些,可以采用暗色和冷色29. 巴西国会大厅在体型组合中采用了对比与协调的手法30. 展览建筑应使用穿套式的空间组合形式31. 室外空间的构成,主要依赖于建筑和建筑群体组合32. 在意大利威尼斯的圣马可广场的布局中,采用了强调了各种空间之间的对比33. 当坡地坡度较缓时,应采用平行等高线布置34. 建筑的有效面积=建筑面积-结构面积35. 加大开窗面积的方法来解决采光和通风问题较易办到36. 中国古代木结构大致可分为抬梁式、穿斗式和井干式三种37. 建筑构图原理的基本范畴有主从与重点、对比与呼应、均衡与稳定、节奏与韵律和比例与尺度38. 建筑构图的基本规律是多样统一39. 超过8层的建筑中,电梯就成为主要的交通工具了40. 建筑的模数分为基本模数、扩大模数和分模数41. 建筑楼梯梯段的最大坡度不宜超过38°42. 住宅起居室、卧室、厨房应直接采光,窗地比为1/7,其他为1/1243. 住宅套内楼梯梯段的最小净宽两边墙的0.9M,一边临空的0.75M住宅室内楼梯踏步宽不应小于0.22M,踏步高度不应小大0.20M44. 住宅底层严禁布置火灾危险性甲乙类物质的商店,不应布置产生噪声的娱乐场所45. 地下室、贮藏室等房间的最低净高不应低于2.0米46. 室内坡道水平投影长度超过15米时,宜设休息平台47. 外墙内保温所占面积不计入使用面积烟道、风道、管道井不计入使用面积阳台面积不计入使用面积壁柜应计入使用面积48. 旋转楼梯两级的平面角度不大于10度,且每级离内侧扶手中心0.25处的踏步宽度要大于0.22米49. 两个安全出口之间的净距不应小于5米50. 楼梯正面门扇开足时宜保持0.6米平台净宽,侧墙门口距踏步不宜小于0.4米,其门扇开足时不应减少梯段的净宽35. 加大开窗面积的方法来解决采光和通风问题较易办到36. 中国古代木结构大致可分为抬梁式、穿斗式和井干式三种37. 建筑构图原理的基本范畴有主从与重点、对比与呼应、均衡与稳定、节奏与韵律和比例与尺度38. 建筑构图的基本规律是多样统一39. 超过8层的建筑中,电梯就成为主要的交通工具了40. 建筑的模数分为基本模数、扩大模数和分模数41. 建筑楼梯梯段的最大坡度不宜超过38°42. 住宅起居室、卧室、厨房应直接采光,窗地比为1/7,其他为1/1243. 住宅套内楼梯梯段的最小净宽两边墙的0.9M,一边临空的0.75M住宅室内楼梯踏步宽不应小于0.22M,踏步高度不应小大0.20M44. 住宅底层严禁布置火灾危险性甲乙类物质的商店,不应布置产生噪声的娱乐场所45. 地下室、贮藏室等房间的最低净高不应低于2.0米46. 室内坡道水平投影长度超过15米时,宜设休息平台47. 外墙内保温所占面积不计入使用面积烟道、风道、管道井不计入使用面积阳台面积不计入使用面积壁柜应计入使用面积48. 旋转楼梯两级的平面角度不大于10度,且每级离内侧扶手中心0.25处的踏步宽度要大于0.22米49. 两个安全出口之间的净距不应小于5米50. 楼梯正面门扇开足时宜保持0.6米平台净宽,侧墙门口距踏步不宜小于0.4米,其门扇开足时不应减少梯段的净宽35. 加大开窗面积的方法来解决采光和通风问题较易办到36. 中国古代木结构大致可分为抬梁式、穿斗式和井干式三种37. 建筑构图原理的基本范畴有主从与重点、对比与呼应、均衡与稳定、节奏与韵律和比例与尺度38. 建筑构图的基本规律是多样统一39. 超过8层的建筑中,电梯就成为主要的交通工具了40. 建筑的模数分为基本模数、扩大模数和分模数41. 建筑楼梯梯段的最大坡度不宜超过38°42. 住宅起居室、卧室、厨房应直接采光,窗地比为1/7,其他为1/1243. 住宅套内楼梯梯段的最小净宽两边墙的0.9M,一边临空的0.75M住宅室内楼梯踏步宽不应小于0.22M,踏步高度不应小大0.20M44. 住宅底层严禁布置火灾危险性甲乙类物质的商店,不应布置产生噪声的娱乐场所45. 地下室、贮藏室等房间的最低净高不应低于2.0米46. 室内坡道水平投影长度超过15米时,宜设休息平台47. 外墙内保温所占面积不计入使用面积烟道、风道、管道井不计入使用面积阳台面积不计入使用面积壁柜应计入使用面积48. 旋转楼梯两级的平面角度不大于10度,且每级离内侧扶手中心0.25处的踏步宽度要大于0.22米49. 两个安全出口之间的净距不应小于5米50. 楼梯正面门扇开足时宜保持0.6米平台净宽,侧墙门口距踏步不宜小于0.4米,其门扇开足时不应减少梯段的净宽51. 入地下车库的坡道端部宜设挡水反坡和横向通长雨水篦子52. 室内台阶宜150*300;室外台阶宽宜350左右,高宽比不宜大于1:2.553. 住宅公用楼梯踏步宽不应小于0.26M,踏步高度不应大于0.175M54. 梯段宽度不应小于1.1M(6层及以下一边设栏杆的可为1.0M),净空高度2.2M55. 休息平台宽度应大于梯段宽度,且不应小于1.2M,净空高度2.0M56. 梯扶手高度0.9M,水平段栏杆长度大于0.5M时应为1.05M57. 楼梯垂直杆件净空不应大于0.11M,梯井净空宽大于0.11M时应采取防护措施58. 门洞共用外门宽1.2M,户门卧室起居室0.9M,厨房0.8M,卫生间及阳台门0.7M,所有门洞高为2.0M59. 住宅层高不宜高于2.8M60. 卧室起居室净高≥2.4M,其局部净高≥2.1M(且其不应大于使用面积的1/3)61. 利用坡顶作起居室卧室的,一半面积净高不应低于2.1M利用坡顶空间时,净高低于1.2M处不计使用面积;1.2--2.1M计一半使用面积;高于2.1M全计使用面积62. 放家具墙面长3M,无直接采光的厅面积不应大于10M263. 厨房面积Ⅰ、Ⅱ≥4M2;Ⅲ、Ⅳ≥5M264. 厨房净宽单面设备不应小于1.5M;双面布置设备间净距不应小于0.9M65. 对于大套住宅,其使用面积必须满足45平方米66. 住宅套型共分四类使用面积分别为34、45、56、68M267. 单人卧室≥6M2;双人卧室≥10M2;兼起居室卧室≥12M2;68. 卫生间面积三件3M2;二件2--2.5M2;一件1.1M269. 厨房、卫生间净高2.2M70. 住宅楼梯窗台距楼地面净高度低于0.9米时,不论窗开启与否,均应有防护措施71. 阳台栏杆净高1.05M;中高层为1.1M(但要<1.2);杆件净距0.1172. 无外窗的卫生间应设置防回流构造的排气通风道、预留排气机械的位置、门下设进风百叶窗或与地面间留出一定缝隙73. 每套应设阳台或平台、应设置晾衣设施、顶层应设雨罩;阳台、雨罩均应作有组织排水;阳台宜做防水;雨罩应做防水74. 寒冷、夏热冬冷和夏热冬暖地区的住宅,西面应采取遮阳措施75. 严寒地区的住宅出入口,各种朝向均应设防寒门斗或保温门76. 住宅建筑中不宜设置的附属公共用房有锅炉房、变压器室、易燃易爆化学物品商店但有厨房的饮食店可设77. 住宅设计应考虑防触电、防盗、防坠落78. 跃层指套内空间跨跃两楼层及以上的住宅79. 在坡地上建住宅,当建筑物与等高线垂直时,采用跌落方式较为经济80. 住宅建筑工程评估指标体系表中有一级和二级指标81. 7层及以上(16米)住宅必须设电梯82. 宿舍最高居住层的楼地面距入口层地面的高度大于20米时,应设电梯83. 医院病房楼,设有空调的多层旅馆,超过5层的公建室内疏散楼梯,均应设置封闭楼梯间(包括首层扩大封闭楼梯间)设歌舞厅放映厅且超过3层的地上建筑,应设封闭楼梯间。

再议“Excel环境下金额数字大写转换的方法探讨”

再议“Excel环境下金额数字大写转换的方法探讨”

再议“Excel环境下金额数字大写转换的方法探讨”[摘要] 利用公式法对Excel环境下金额数字进行大写转换是非常实用的方法,通过对公式代码进行优化,不仅增加了公式的功能,还可以简化录入、增强公式的可理解性、方便公式再加工,通过对公式法进行原理解析,可以方便初学者使用和理解公式,也有利于对公式的改造和应用领域的拓展。

[关键词] Excel;大写转换;公式;代码优化;原理解析一、引言拜读了《中国管理信息化》2009年第6期王光伟的文章《Excel环境下金额数字大写转换的方法探讨》(以下简称王文)后收获很大,该文中列举的金额数字大写转换的几种方法在财会工作中具有很强的实用性和较高的实用价值。

在实际工作中广大财会人员并非都具备丰富的计算机编程知识,利用VBA编写金额大写转换程序或自定义函数有一定难度,且不同财会人员对金额大写转换有不同需求,为了适应不同需求而修改程序或自定义函数的过程比较烦琐,为此,本文只探讨利用公式法对金额数字实施大写转换。

二、公式法代码优化王文中公式法的公式为=IF(TYPE(FIND(“.”,TEXT(E2,”[dbnum2]”),1))=16,TEXT(E2,”[dbnum2]”)&”元整”,LEFT(TEXT(E2,”[dbnum2]”),FIND(“.”,TEXT(E2,”[dbnum2]”),1)-1)&”元”&IF(LEN(MID(TEXT(E2,”[dbnum2]”),FIND(“.”,TEXT(E2,”[dbnum2]”),1)+1,2) )=1,MID(TEXT(E2,”[dbnum2]”),FIND(“.”,TEXT(E2,”[dbnum2]”),1)+1,1)&”角整”,IF(MID(TEXT(E2,”[dbnum2]”),FIND(“.”,TEXT(E2,”[dbnum2]”),1)+1,1)=“零”,”零”&MID(TEXT(E2,”[dbnum2]”),FIND(“.”,TEXT(E2,”[dbnum2]”),1)+2,1)&”分”,(MID(TEXT(E2,”[dbnum2]”),FIND(“.”,TEXT(E2,”[dbnum2]”),1)+1,1)&”角”&(MID(TEXT(E2,”[dbnum2]”),FIND(“.”,TEXT(E2,”[dbnum2]”),1)+2,1)&”分”)))))(以下简称公式1)。

EXCEL中数字大小写转换方法

EXCEL中数字大小写转换方法

EXCEL中数字大小写转换方法EXCEL中数字大小写转换方法不知道大家工作中有没有遇到这样的问题,投标报价时,报价汇总时还需要大写形式,一个字一个字的敲进去,容易出错,更为不便的是,当报价修改后,需要重新敲一遍,那么有没有一种方法自动将小写转成大写呢? 答案是肯定的,一种最为简单的方法就是在需要大写的单元格直接引用小写数字,然后它会显示为大写的中文.我是通过摸索而得出,如果哪位朋友还有更好的相关知识请给予接下去讨论,学海无涯,更希望用得着的朋友能得到一点帮助,现将我自己摸索的结果发经广大朋友分享!EXCEL大小写转换方法1. 结果数据无小数点范围转换:将小写数字转换成大写中文:右击需要转换的单元格,在弹出的快捷菜单中选择“单元格格式”,然后在“数字”选项卡中选择“自定义”,在“类型”中写入[DBNum2][$-804]"大""写"!:G/通用格式"元整"后按确定即可。

2. 结果数据保留两位小数数值且在十万以内范围转换:将小写数字转换成大写中文(万范围内):右击需要转换的单元格,在弹出的快捷菜单中选择“单元格格式”,然后在“数字”选项卡中选择“自定义”,在“类型”中写入:[DBNum2]0"万"0"千"0"百"0"拾"0"元".0"角"0"分""整"3. 结果数据保留两位小数数值且在十万以外范围转换:将小写数字转换成大写中文(万范围内):右击需要转换的单元格,在弹出的快捷菜单中选择“单元格格式”,然后在“数字”选项卡中选择“自定义”,在“类型”中写入:[DBNum2]0"万"0"千"0"百"0"拾"0"万"0"千"0"百"0"拾"0"元".0"角"0"分""整"附:本人愿意结交天下朋友,共同讨论电脑相关知识,下一请教是CAD的网络版本下载安装及三维二维之间转换,3D的制作,平立面图的快捷速成……希望朋友们能提供相关资料,谢谢。

Excel也可以实现对数字的大写转换及读写!

Excel也可以实现对数字的大写转换及读写!

Excel也可以实现对数字的⼤写转换及读写! Excel中数字⼤写,应⽤的⾮常普遍,尤其是财会⼈员,显得更为重要,但是你真的会对其进⾏设置吗?⼀、单元格格式法。

⽅法:1、选中⽬标单元格。

2、快捷键Ctrl+1打开【设置单元格格式】对话框。

3、选择【分类】-【特殊】-【中⽂⼤写数字】并【确定】。

解读:1、此⽅法的应⽤⾮常的普遍,也较为简单。

可以先录⼊数值然后进⾏转换,也可以先对单元格格式进⾏设置,然后输⼊,达到的效果都是⼀样哦!2、对数字进⾏直接转换,不进⾏四舍五⼊操作。

⼆、函数公式法。

(⼀)、NumberString函数法。

1、功能:对给定的数字根据指定的类型转换为⼤写形式。

2、语法结构:=NumberString(数值或引⽤,转换类型)。

其中转换类型有:1、2、3三种,其中1为“汉字⼩写”、2为“汉字⼤写”、3为“汉字读写”。

⽅法:在⽬标单元格中输⼊公式:=NUMBERSTRING(D3,1)、=NUMBERSTRING(D3,2)、=NUMBERSTRING(D3,3)。

解读:1、Numberstring函数为系统隐藏函数,在系统中是⽆法查询到相关说明的哦,⼤家只需要掌握其语法结构和代码1、2、3代表的意义即可哦!2、从转换的结构中可以得出,Numberstirng函数在转换为指定的类型时是按照“四舍五⼊”的⽅式进⾏的。

例如:66.98的转换结果为:六⼗七、陆拾柒、六七。

所以⼤家要注意哦!(⼆)公式法。

⽅法:在⽬标单元格中输⼊公式:=TEXT(LEFT(RMB(D3),LEN(RMB(D3))-3),'[dbnum2]G/通⽤格式元;负[dbnum2]G/通⽤格式元; ;')&TEXT(RIGHT(RMB(D3),2),'[dbnum2]0⾓0分;;整')。

解读:此公式⽐较复杂,⼤家在使⽤的时候只需要复制即可哦,但需要注意将公式中的参数做对应的修改。

具体请看下图。

EXCEL的金额大小写转换方法存在问题

EXCEL的金额大小写转换方法存在问题

EXCEL的金额大小写转换方法存在问题EXCEL的金额大小写转换方法存在问题按现在财务制度书写要求,我试过的金额大小写转换方法都不合格,比如按现在的财务制度要求,金额203405.01正确的大写应该是“贰拾万零叁仟肆佰零伍元零壹分”,注意这里的蓝颜色的零,是必须有的。

而我所试过的方法只能转换为“贰拾万叁仟肆佰零伍元零壹分”,零没有了,是一种错误的大写。

有高手请重新给出一个正确的转换方法吧,谢谢了。

你这是哪门子的规定?我看到的制度规定却是:阿拉伯金额数字万位或元位是“0”,或者数字中间连续有几个“0”,万位、元位也是“0”,但仟位、角位不是“0”时,中文大写金额中可以只写一个零字,也可以不写“零”字,如¥1,680.32,应写成人民币壹仟陆佰捌拾元零三角贰分,或者写成人民币壹仟陆佰捌拾元三角贰分;又如¥107,000.53,应写成人民币壹拾万柒仟元零伍角叁分,或者写成人民币壹拾万柒仟元伍角叁分。

这就是说,这种情况下可以有零,也可以没零。

不过,要加上零也并非难事,不过公式效率要打些折扣了。

四舍五入公式=IF(A1=0,"",IF(ABS(A1)<0.995,"",IF(AND(RIGHT(INT(ROUND (ABS(A1),2)/10000))="0",RIGHT(INT(ROUND(ABS(A1),2)/1000))< >"0"),SUBSTITUTE(TEXT(INT(ROUND(ABS(A1),2)),"[DBNum2]"),"万","万零"),TEXT(INT(ROUND(ABS(A1),2)),"[DBNum2]"))&"元")&IF(RIGHT(TEXT(A1,".00"),2)*1=0,IF(ABS(A1)<0.005,"","整"),TEXT(IF(ABS(A1)<0.095,"",LEFT(RIGHT(TEXT(A1,".00"),2))),"[db num2]")&IF(LEFT(RIGHT(TEXT(A1,".00"),2))*1=0,"","角")&IF(RIGHT(TEXT(A1,".00"))*1=0,"整",TEXT(RIGHT(TEXT(A1,".00")),"[dbnum2]")&"分")))截尾公式=IF(A1=0,"",IF(ABS(A1)<1,"",IF(AND(RIGHT(TRUNC(ABS(A1)/10000))="0",RIGHT(TRUNC(ABS(A1)/1000))<>"0"),SUBSTITUTE( TEXT(TRUNC(ABS(A1)),"[DBNum2]"),"万","万零"),TEXT(TRUNC(ABS(A1)),"[DBNum2]"))&"元")&IF(RIGHT(TRUNC(A1*100),2)*1=0,IF(ABS(A1)<0.01,"","整"),IF(ABS(A1)<0.1,"",TEXT(RIGHT(TRUNC(A1*10)),"[dbnum2]"))&I F(RIGHT(TRUNC(A1*10))*1=0,"","角")&IF(RIGHT(TRUNC(A1*100))*1=0,"整",TEXT(RIGHT(TRUNC(A1*100)),"[dbnum2]")&"分")))公式出处:/1549898_d.html效率是指在表格公式比较多的情况下,去处速度比较慢。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

对仟位上的数字转换公式 :
=I ( E ( E T(N ( 1 ,# ) F L N T X I T E ) ” ” )> = M D ” 壹 4, I B( 零
xd z = IS ( , r ds ) . ) sw n t 1 T i xt ,” ” r m( r XW = M d ds , sw + 1 S i( xt xd z r ) d l = L f ds , sw 一 1 x e ( xt xd z t r )& ” ” 元
xo = d td x End Fu to nci n
如下公式 , 可将 E 就 2单元格的小写数字转换为大写 :
注意 , V sa B s 在 i l ai u c语句 中可 以使用 E cl工 作表 函 xe
需要通过 A pi t n WokheF nt n对象 来使用 工作 p l a o . rsetuci ci o = F T P FN ” ” T X E ” d n m ]' , ) 数 , I ( Y E( I D( . , E T( 2, [ b u 2 ' 1 ) )
元 ” I ( E ( D T X ( 2 ” d n m ]1 , ID( . , & F L N MI ( E T E , [ b u 2 | FN ” ” )
编 写 自定 义 函数 时 , 参 数 应 作 为 双 精 度 数 据 类 型 其
T X ( 2 ” dn m ] ) 1 E T E , [ b u 2 t , )+1 2 )=1 MI T X E , 1 ,) , D( E T( 2 ” “ obe 定义 , x d A cA o be , 能作 为单精度数据 D u l” 即 t ( b sD u l) 不 o
种方法 , 使用者要根据 自身的兴趣 和水 平来选择适 合 自己的
方 法
主 要参 考 文 献
[ ] ・ 巴赫. xe 20 1沃 肯 E cl 0 3公式 与函数应用宝典 [ .路 晓村 , M] 等
图 1 模 拟 运 算 表 对 话 框
1 /CHf MANAGE 2 NA MENT I OR ATONIAT ON NF M I Z I
22整体转换 .
22 1编 程 法 ..
d2 = M d Ti ds ) sw x i( r m( xt ,xd z+ 1 )& ” r , ,1 角整”
Es f i(S 1 1 = ” ”T e l I M d XW, , ) e 零 hn d2 = xw & ” ” x s 分
Ele s
表2
A B
综 合 公 式
C D
表3
A B
模 拟运 算 表
C D
l 2



姓 张

名 健

应 纳 税 金 额 29 0 6
37 0 5
应缴 所 得 税
1 7
1 8




应 纳 税 金 额
= El 2
应 缴 所 得 税
对位转 换就 是对相 应数 位上 的小写 数字转 换 为大写 数 字, 然后在 已印有万仟佰十 元角分 的汉字之 问套打 相应数 位
的大写数字 , 如对 E 单 元格万位上 的数字 , 1 其大写 转换公 式
为:

[ B u 2 f D N m 11 )
I( E T X (N ( 1 , # ) F L N( E T I T E ) ” ” )> = , D ( 零 壹 5 MI B ”
译 .北 京 : 电子 工 业 出 版社 ,0 2 16 —10 20 :5 6
会 计 信 息化
2 大写转换 的方法
2 1对 位 转 换 .
数 。如下宏代码定 义函数 xo , td 可将小写转换为大 写 , 使用 时
在单元格 中输入 “=x d ) 即可 , t(” o 非常方便 。
P bi F nt nx d A cA obe s tn u l u co t ( b sD u l)A r g c i o Si
bnl = A pi t n WokheF nt n Fxd A c 2 it p l a o. rsetu c o. i ( b , ) ci i e
d s : Ap l ain xt r pi t .Wok h eF n t n et(bnl, ” c o r se tu ci .T x o it
出格 式 的 打 印 。
1 数 字 大 写 转换 的意 义
金额 数字 大 写 在 会 计 核 算 中 有 广泛 的运 用 , 支票 、 如 领
[ 收稿 日期] 0 8— 9—2 20 0 4 [ 作者简介] 王光伟( 9 6 )男 , 16 , 重庆人 , 重庆市 长寿 区人 民医 院 总 会 汁 师 , 计‘ 、 师 。 统 师 会计
贰叁肆伍陆柒捌玖拾” V I E( 1 B(N ( 1 ,E T X , A M D I T E ) L N( E T U
(N ( 1 ,# ) 3 1 )¥ I T E ) ” ” )一 , ) 2+12 ,” 。 , ) ” )
I L n XW = 1T e f e(S) hn
[ b u 2 ’ ,I D( . , E T( 2 ”[ b u 2] ) 1 dn m ] ) FN ” ” T X E , dn m t , )+1 类型“ i l 定义 , . | , Sn e g” 否则 , 转换 将 出现偏差 。如 1. 1 3 15元 , 双
1 &” ) 角整 ” I ( D( E T E , [ b u 2 ’ , I D( . , 精度转换为“ , MI T X ( 2 ” d n m ] ) FN ” ” F . 壹拾 叁元壹 角贰分 ” 单精 度转换 为 “ , 壹拾 叁元 T X ( 2 ”[ bu 2]' , )+1 1 E T E , dnm | 1 ) , ):”零 ” ”零 ”& D 壹 角壹 分 ” , MI 。 ( E T (E , TX 2 ”[d nm . ,FN (” ” E T (E , b u 2]1 ) ID . ,T X 2” 4 [ b u 2] ) 1) +2 1)&”分 ” d nm . , . , ,(MI ( E T ( 2 ” D TX E ,
无 元角分 等字样 。注意参 数”[ bu 2] 是 函数 T X ( 转 dnm ” ET )
End I f
换 为大写的关键 。接 着再根 据 转换 结果 中有 无小 数点 以及
有无角分位 的情 况分别加 上“ 整” “ 元 、 角整 ” “ 、 零几分 ” “ 、 几
角几分 ” 。如将 E 2单 元格 的数字 转换 , 在 F 可 2单元 格 输入
( )右键单击 1 4 8行的行标 , 弹出菜单 中选择“ 隐藏” 。 ( )注意 , 5 使用模拟运算表功能时 , 必须保证 表 1和表 3
在同一个工作簿 中。
六 、总 结
本文提供 的方法 , 创新 点在 于“ 位函数 ” 定 的应用 , 难点
在于综合公式中“ 数引用” 参 。用 E cl 算个 人所 得 税 有 多 xe 计
对 财 务 会 计 相 关 数 据 的 管理 和规 定格 式 的 输 出。
[ 关键词 ] 大写转换 ; 数据管理 ; xe公 式; E cl 自定义函数
[ 中图分类号 ] 22 F 3 [ 文献标识码 ] A [ 文章编 号]6 3— 14 20 )6— 0 2— 2 17 0 9 (0 9 0 0 1 0 款单的填写等。手 工填 写大写 数字 , 时会 出现错误 , 能 有 如 在计算机 中实现金额数字大写的 自动转换 , 则不用专 门的计 算机程序 , 就可实现对财务会计相关数据 的管理 和按 规定输

1 ,E T( 2 ” d nm t &” 整” L F ( E T E , 表 函数 。 6 T X E , [ b u 2] ) 元 1 ,E T T X ( 2 ”
[b u 2 . ,I D( . , E T E , [ b u 2] ) 1 d nm ]I FN ” ” T X ( 2 ” d n m t , )一1 3 自定义 函数法 的比较 ) t )
=E 4 l
N01 00
N)0 【H O2
l 9
N0 1 o0


290 6
4 5 6
7 8
N o3 0o N 04 o0 N05 oo
No6 0O N) 7 fo o
刘 钱 楚
徐 邓
畅 进 欢
言 爽
28 0 8 27 0 6 330 5
390 2 190 8
2 0
2 1
N02 00
N ∞3 d




370 5
280 8
2 2
2 3
N 04 00
N o5 o0




27 o 6
330 5
2 4
2 5
N 06 0H 0N (7 Biblioteka o )徐邓言

39 0 2
王 光 伟
( 重庆 市 长 寿 区人 民 医院 , 重庆
[ 摘
4 12 ) 0 20
要] 金额数字 大写在 会计工作 中有广泛 的运 用, 如支票、 领款单的填写等。人 工转换 大写数字 , 时会 出现错 有
误, 本文探讨 了在 E cl xe 环境下利用带”[ b u 2 ” d nm ] 参数的 T X ( 函数进行金 额数字 大写的转换 方法 , ET ) 主要 用 于
20 0 9年 3月
中 国 管

相关文档
最新文档