第一篇：去年会计检查违规金额高达552亿.doc
去年会计检查违规金额高达552.29亿
苏州会计培训捷梯教育近日收到财政部的有关信息，财政部近日公示去年会计检查:违规问题金额552.29亿，并对有关责任单位和责任人进行了有关处罚。苏州会计培训希望我们苏州会计培训班的学员能在以后的工作岗位上引以为戒，严格按照国家的法律法规进行我们的会计工作。
国家财政部网站2012年12月28日连发三个公告，向社会公开了去年全国开展的会计信息质量检查结果，并对检查发现有问题的企业进行逐户公告，以加大公众的监督力度。此次发布的财政部会计信息质量检查第二十三号、第二十四号公告分别对28家金融类企业和144家非金融企业和证券会计师事务所的检查结果进行公告。
检查结果表明：大部分企业会计信息质量逐年提高。多数证券资格会计师事务所风险意识增强，审计执业质量提升。但检查也发现，仍有部分企业未有效执行会计准则、财务管理不规范、信息披露不充分、偷漏税款、侵占国有资产等违规问题。
针对检查发现的问题，财政部门依法进行了处理处罚，责成被查单位调整账务、补缴税款、完善制度、加强管理，并追究相关人员责任。
苏州会计培训希望大家在学好会计知识的同时，也能够在法律法规方面进行研究，这样子我们以后走向工作岗位才不会犯错误，严格按照国家的法律法规进行会计工作的进行。苏州会计培训希望苏州会计培训班的学员能有所成就。
第二篇：交通违规检查
交通违章检查
公司各位领导：
由于本人在道路上超速行驶，违反了交通规则，给正常行驶的车辆造成了不便，构成了严重的交通安全隐患。如若发生交通事故，后果将不堪设想，不仅危及他人及自己的生命安全，损坏公共设施，影响公共治安秩序，而且还会造成一定的经济损失。我疏于安全防范，心存侥幸心理，每当顾及此处，悔不当初，有负于集团领导对我的期望。
我无视交通法规，交通安全意识淡薄，在交警同志众目睽睽之下违反交通法规，给公司造成不必要的损失，确实是我的过错。其实在日常生活中，我是一个遵纪守法，维护社会道德的良好公民，扪心自问我对道路交通安全法规是谙熟于心的，我也是有着几年驾龄的老司机了，深知每年交通事故伤亡人数列国家伤亡人数之首，这次确实不应该因超速行驶而无视交通法规。此次事件我已深刻检讨自己，深深的认识到了遵守交通安全法规的重要性，今后将认真学习交通法规，严格遵守交通规则，增强交通安全意识，一切以公司为中心，全心全意为公司服务，请领导相信我，再给我一次改过的机会。
检讨人：
日期： 年 月 日
第三篇：阿拉伯数字金额转换为英文会计金额
怎样用自定义函数将阿拉伯数字金额转换为英文会计金额，如：123.45 变为：One Hundred Twenty Three Dollars and Forty Five Cents
A：按Alt+F11，插入→模块→在VBE窗口中输入以下代码：
1.Function SpellNumber(ByValMyNumber)2.Dim Dollars, Cents, Temp 3.Dim DecimalPlace, Count 4.ReDim Place(9)As String 5.Application.Volatile True 6.Place(2)= “ Thousand ” 7.Place(3)= “ Million ” 8.Place(4)= “ Billion ” 9.Place(5)= “ Trillion ” ' String representation of amount 10.MyNumber = Trim(Str(MyNumber))' Position of decimal place 0 if none 11.DecimalPlace = InStr(MyNumber, “.”)12.'Convert cents and set MyNumber to dollar amount 13.If DecimalPlace> 0 Then 14.Cents = GetTens(Left(Mid(MyNumber, DecimalPlace + 1)& “00”, 2))15.MyNumber = Trim(Left(MyNumber, DecimalPlace3)23.Else 24.MyNumber = “" 25.End If 26.Count = Count + 1 27.Loop 28.Select Case Dollars 29.Case ”“ 30.Dollars = ”No Dollars“ 31.Case ”One“ 32.Dollars = ”One Dollar“ 33.Case Else 34.Dollars = Dollars & ” Dollars“ 35.End Select 36.Select Case Cents 37.Case ”“ 38.Cents = ” and No Cents“ 39.Case ”One“ 40.Cents = ” and One Cent“ 41.Case Else 42.Cents = ” and “ & Cents & ” Cents“ 43.End Select 44.SpellNumber = Dollars & Cents 45.End Function 46.'******************************************* 47.' Converts a number from 100-999 into text * 48.'******************************************* 49.Function GetHundreds(ByValMyNumber)50.Dim Result As String 51.If Val(MyNumber)= 0 Then Exit Function 52.MyNumber = Right(”000“ &MyNumber, 3)'Convert the hundreds place 53.If Mid(MyNumber, 1, 1)<> ”0“ Then 54.Result = GetDigit(Mid(MyNumber, 1, 1))& ” Hundred “ 55.End If 56.'Convert the tens and ones place 57.If Mid(MyNumber, 2, 1)<> ”0“ Then 58.Result = Result &GetTens(Mid(MyNumber, 2))59.Else 60.Result = Result &GetDigit(Mid(MyNumber, 3))61.End If 62.GetHundreds = Result 63.End Function 64.'********************************************* 65.' Converts a number from 10 to 99 into text.* 66.'********************************************* 67.Function GetTens(TensText)68.Dim Result As String 69.Result = ”“ 'null out the temporary function value 70.If Val(Left(TensText, 1))= 1 Then ' If value between 10-19 71.Select Case Val(TensText)72.Case 10: Result = ”Ten“ 73.Case 11: Result = ”Eleven“ 74.Case 12: Result = ”Twelve“ 75.Case 13: Result = ”Thirteen“ 76.Case 14: Result = ”Fourteen“ 77.Case 15: Result = ”Fifteen“ 78.Case 16: Result = ”Sixteen“ 79.Case 17: Result = ”Seventeen“ 80.Case 18: Result = ”Eighteen“ 81.Case 19: Result = ”Nineteen“ 82.Case Else 83.End Select 84.Else ' If value between 20-99 85.Select Case Val(Left(TensText, 1))86.Case 2: Result = ”Twenty “ 87.Case 3: Result = ”Thirty “ 88.Case 4: Result = ”Forty “ 89.Case 5: Result = ”Fifty “ 90.Case 6: Result = ”Sixty “ 91.Case 7: Result = ”Seventy “ 92.Case 8: Result = ”Eighty “ 93.Case 9: Result = ”Ninety “ 94.Case Else 95.End Select 96.Result = Result &GetDigit _ 97.(Right(TensText, 1))'Retrieve ones place 98.End If 99.GetTens = Result 100.End Function 101.'******************************************* 102.' Converts a number from 1 to 9 into text.* 103.'******************************************* 104.Function GetDigit(Digit)105.Select Case Val(Digit)106.Case 1: GetDigit = ”One“ 107.Case 2: GetDigit = ”Two“ 108.Case 3: GetDigit = ”Three“ 109.Case 4: GetDigit = ”Four“ 110.Case 5: GetDigit = ”Five“ 111.Case 6: GetDigit = ”Six“ 112.Case 7: GetDigit = ”Seven“ 113.Case 8: GetDigit = ”Eight“ 114.Case 9: GetDigit = ”Nine“ 115.Case Else: GetDigit = ”" 116.End Select 117.End Function 复制代码
然后在A1单元格输入需要的数值，在其他单元格输入=SpellNumber(A1)即可
第四篇：大小写金额的会计标准写法
大小写金额的会计标准写法
（1）小写金额的标准写法。
①在没有数位分隔线的凭证、账表上的标准写法。
a.元以上每三位用分位“，”隔开，元与角位之间点一小数点，如2,781.24元。
b.有角无分的，在分位上写“0”字，如“3.20”，不得写成“3.2”或“3.2—”。
c.角分位如没有金额，仍在元位后点小数点，并在小数点后写“00”或在字体度中间划一短横线，如32.00或32.—。
d.如在一位金额栏内书写两行以上金额，从第二行起，应逐位对准上一行数字书写。
②在有数位分隔线的凭证、账簿上的标准写法。
a.小写金额要对准元、角、分位置书写。
b.只有角分位金额的，在元位上不写“0”字；只有分位金额的，在元和角位上均不写“0”字。
c.有角无分的，在分位上写“0”字；角分位没月金额的，在角和分位上均写一个“0”字，不得以符号“—”代替。
d.合计的小写金额前应加注币值符号，如“￥”、“HK＄”、“US＄”等。币值符号与阿拉伯金额数字之间不得留有空。
（2）大写金额的标准写法。
①大写金额要靠“人民币”后书写（须空出半个汉字大写数字的位置）
②元位是0或金额中间连续有几个0，但角位不是0，大写金额均不写“零”字，如10.42元，应写成“壹拾元肆角贰分”，又如，5000.74元应写成“伍仟元柒角肆分”。
③金额中间有0或连续有几个0，但元位不是0的，大写金额均写一个“零”字，如107,006.08元，应写成“壹拾万柒仟零陆元零捌分”。
④大写金额有分的，后面不加“整”字，其余一律末尾加“整”字；大写金额前还应加注币值单位，注明“人民币”、“美元”、“港币”等字样，且币值单位与金额数字之间以及各金额数字之间不得留有空隙。
第五篇：才溪镇：破获一起集资诈骗大案 涉案金额高达3000余万元
3月30日，上杭县公安局破获一起特大集资诈骗案，犯罪嫌疑人王某元夫妇以高额利息为诱饵，集资诈骗3000余万元。近年来，上杭县才溪镇的王某元伙同其妻杜某玉以经营毅力源米业及投资经营开发“鱼子坑”山庄为由，以支付高利息为诱饵，从社会人员中大额大量非法集资，经初步查明，王某元夫妇非法集资诈骗金额已达3000余万元，资金除部分用于投资外，大部分已挥霍。2011年6月在资金链断裂，无法支撑下去的情况下，王某元夫妇选择关机外逃隐匿。上杭警方接到众多被骗群众报案后，经审查，立为集资诈骗案侦查，并将王某元夫妇上网列为逃犯。3月30日中午，经侦大队会同才溪派出所在市局的大力支持下，在才溪镇才溪村一山场山庄内将犯罪嫌疑人王某元抓获。经审查，犯罪嫌疑人王某元供认了伙同其妻杜某玉向社会众多人员非法集资诈骗的犯罪事实。目前，犯罪嫌疑人王某元因涉嫌集资诈骗已被警方刑事拘留，案件仍在进一步审理深挖中。（李碧英 吴绍川）上杭网 YSXY
点击咨询 