博文

目前显示的是标签为“假装专业”的博文

VBA学习笔记5:对文件路径的获取

图片
 VBA中经常需要对文件夹里的XLS文件进行打开、复制粘贴等操作,可以直接在代码中指定文件路径,但如果是要批量打开多个文件,就要想办法把所有的文件名存到数组里再一一读取。可以使用Application的FileDialog方法,来获取文件或文件夹的路径,再使用Dir函数读取具体的文件名。 调用FileDialog方法可以使用with语句构建,如下: With Application.FileDialog(msoFileDialogFolderPicker) End With 括号里面的参数可以有四种选择,分别是msoFileDialogFilePicker-允许用户选择文件,msoFileDialogFolderPicker-允许用户选择文件夹,msoFileDialogOpen-允许用户打开文件,msoFileDialogSaveAs-允许用户保存文件。直接运行此语句就会跳出文件对话框。这里以文件夹举例。 接下来就可以在with语句内部对文件对话框框的选择结果进行操作。这里涉及到FileDialog的show方法,show方法返回-1(操作)或者0(取消)。FileDialog还有一个SelectedItems属性,会返回一个集合,里面是所选文件的路径列表。可以用一个简单的语句理解.show和.SelectedItems的使用: If .Show = -1 Then      PathStr = .SelectedItems(1)      MsgBox PathStr Else      MsgBox "Cancel" End If 如果选了文件夹并点了确定按钮,Msg就会显示出所选文件夹的路径;如果选了取消,Msg就显示Cancel。实际应用中,通常在.Show返回0的情况后面跟Exit Sub,退出程序。 需要注意的是,如果上面的例子我们没有使用选择文件夹的参数,而是msoFileDialogOpen或msoFileDialogSaveAs,在文件对话框里选择了文件并确定后,系统并不会真的执行Open或者Save动作,而是要再写Workbook.Open语句进行操作。 FileDialog的参数可以使用msoFileDialogFilePicker来选择多个文件...

Power Query学习笔记1:多列聚合求和

图片
 需求分析:公司在全国有多个销售区域,每个销售区域又有多个项目组。现需从各销售区、各项目组收取1-12月的销售数据并汇总,汇总字段按照销售区区分。 此文目的:多个表格的简单整合比较容易,使用PQ可以实现自动更新,数据处理能力也大大提升。此文针对的是多表汇总后进行的按销售区域聚合的步骤。 解决思路:数据聚合可用的方法有”分类汇总“或”数据透视表“,但是因为上一步骤使用PQ对多表进行了整合,再对整合后的表另外单独数据透视就有点繁琐,何不一步到位在PQ中进行聚合?PQ中自带“分组依据”功能。下面是例表,同时先看下“分组依据”如何使用。 “分组依据”功能对于需要求和的列数不多的情况下很方便,但如果1-12月均需要进行求和,就要在第④步中操作12次。所以我想对这一步进行简化。 我们需要用到的函数是Table.Group[ 官方文档 ],先用最简单的形式写出这个函数,看看会抓取到什么结果。 可以看到,Group按照区域名称抓取了每个区域的数据,汇总成一个Table放在我们构建的”数据“列。对于单个Table,我们无需再进行聚合,直接对其每列数字进行相加就可以了。拿”北京“区域为例,先把它转换为列表,再使用List.Sum函数相加。 还要使用Table.FromRows函数把列表转换为一行表格。为了标识列,使用Table.ColumnNames函数获取源表的列名和汇总的结果拼接在一起。 退回步骤一,既然我们有了每个区域的汇总表格,那就可以在步骤一中用步骤二的代码对”数据“列进行替换了。 这时再对步骤一的"数据"列进行扩展即可。 最终表的效果如图

VBA学习笔记4:再说数组赋值

之前以为自己把数据的概念搞清楚了,在工作中多次涉及到相关知识点,但还是有一次出了问题。在给数组变量赋值时,发现直接引用单元格的方式行不通了,提示“类型不匹配”。我用了如下语句:  Dim sht() sht = Worksheets(1).Range("B4:B6") 在 《VBA学习笔记2:数组的使用》 中,我曾总结: 直接引用区域也是创建数组的办法,因为range的默认方法是value,所以直接使用arr=range("A1:B6")这样的语句就能为数组赋值了。 但是用 sht = Worksheets(1).Range("B4:B6") 却出现错误。使用Debug检查发现一些问题。 首先用 Debug.Print TypeName(Worksheets(1).Range("B4:B6")) 检查了数据类型,返回“range”,而dim sht()时,sht的默认属性是variant,是否是这个原因造成无法赋值呢? 但是当我把Worksheets(1)去掉时,这个语句居然奏效了,虽然 Debug.Print TypeName(Range("B4:B6")) 出来的还是“range”类型,但sht = Range("B4:B6")的赋值确实是有效的。 那如果我要赋值的数据不是当前工作表呢?试着把Dim sht()去掉,也就是说赋值前不声明数组变量, sht = Worksheets(1).Range("B4:B6") 居然也奏效了, Debug.Print TypeName(Worksheets(1).Range("B4:B6")) 依然返回“range“。 再试一下,如果直接声明Dim sht,或Dim sht as variant,则后面的语句无论加不加worksheets都能生效。 这让人感觉有点混乱,稍微一个不小心就会出错。在微软官方文档并没有找到相关说明。 总结了一下引用区域对数组赋值的两个规则: 1.range对象可以为未声明变量或variant变量(Dim x)赋值,其值会转换为variant类型。 2.声明数组变量后再赋值,只适合当前工作表,不能引用range的父对象。

VBA学习笔记3:Inputbox的函数与方法

 问题来源:一个项目需要使用inputbox来获取用户输入值,如果用户点击了“取消”或者输入了未在备选里的值将自动退出程序。获取输入值我使用了 num = inputbox(optfm) 语句,接下来使用 If num = false Then Exit Sub 语句来退出。测试中却发现点击了“取消”程序并未退出,而是继续执行了后面的语句。搜索后发现,原来inputbox语句分“函数”和“方法”两种,其返回值不同,所以处理方式也不相同。 Inputbox函数,是VBA的内置函数,无论是在Excel、Word,任何使用VB脚本语言的程序都能使用,而Inputbox方法,完整写法是Application.Inputbox,是Excel这个App特有的,其语法与Inputbox函数稍有不同,是为Excel量身定做的。使用中,直接输入Inputbox就是函数的用法,使用“方法”的话就必须在前面加上Application.。 Inputbox函数和方法的主要区别 1.提示文字的限制不同。两个语句第一个参数均是提示文本,但是Inputbox函数的提示文本最大可以是1024个字符,而Inputbox方法最大是255个字符。两者均可在提示文本中使用Chr(10)换行符。 2.Inputbox方法多了一个Type参数,这个参数可以指定返回数据的类型,如果省略则默认返回文本。此参数在Excel很有用,如果使用参数8(range类型),则可以直接用鼠标选择对应的单元格区域。 3.此点最为重要,Inputbox函数如果 用户选择"取消  ",  函数将返回一个零长度字符串 ("");而Inputbox方法用户选择“取消”,会直接 返回  False。 引用微软的官方总结: InputBox  方法与  InputBox  函数的区别在于,前者可以对用户输入进行选择性验证,并能与 Excel 对象、错误值和公式结合使用。 回到开头的问题,可以得出结论,如果使用了 num = inputbox(optfm) 语句,则后面判断用户是否“取消”要使用 if num="" Then Exit Sub ;如果使用 num = Application.Inputbox(optfm) ,后面的判断应使用 if num=False Then...

VBA学习笔记2:数组的使用

对于办公人员来说,使用数据最大的好处是,需要写入或计算的数据会在内存里组织好后一次性贴入单元格内,而不是逐个贴入。这样可以大大提升VBA代码的运行速度,特别是针对数据量大的表格,避免了屏幕反复刷新的情况。本文梳理几个常与数组配合使用的知识点。 1.数组的参数 数组的参数指明对数组的引用,类似对单元格区域的引用,如果是二维数组,同样遵循“先行后列”原则。如: range("A1:B6")(3,2)     '引用区域 "A1:B6"中第3行第2列的值 arr(3,2)     '引用二维数组 第3行第2列的值 但是,Range("A1:B6")(3) 是引用区域"A1:B6"中的第3个单元格的值(先行后列),而对二维数组arr使用“arr(3)”语句的话,就会“下标越界”,因为二维数组必须使用两个参数。 2.数组的产生 数组产生的方式有多种,每种方式产生的结果有细微差异。 ①最简单的方式,和工作表中的数组公式类似,即使用{}括住数组的内容,横向数组采用“,”分隔,纵向数组采用“;”分隔。VBA中的数组还要在大括号外面加上一对“[]”。 Sub 数组产生() Dim arr(), arr1() arr = [{"语文";"数学";"英语";"体育"}]     '产生纵向二维数组 arr1 = [{"语文","数学","英语","体育"}]      '产生横向一维数组 Debug.Print arr(2, 1)     ‘结果:数学 Debug.Print arr1(2)      ‘结果:数学 End Sub 上例,arr是纵向数组,因为VBA中只有横向一维数组,没有纵向一维数组,所以arr是二维数组,引用时必须用两个参数。而arr1则是一维数组。 ②以上手工录入数组元素的方式,中括号可以用evaluate函数代替。但是evaluate函数的参数是文本类型,所以要在大括号外加上双引号。为了避免产生歧义,大括号内的双引号要变成”双双引号“。如:arr = evaluate("{...

VBA学习笔记1:错误语句的处理方式

案例分析:现有工作簿A和工作簿B,A中有一些工作表与B中的工作表同名,也有一些工作表B中没有。需要把A和B同名的那些工作表内容从B数值化粘贴到A对应的表里。 此案例看起来比较简单,最重要的一步就是复制粘贴,很容易实现;通过A工作簿里的表名去找B里对应的表也比较容易,把表名设定为变量即可。难点在于A有,B没有的工作表如何处理。 首先设置几个变量,便于后面的引用: Dim Nonesht As String '在B中找不到对应工作表的提示 Dim shtname As String '需要复制粘贴的表名 Dim Desbook As Workbook '目标工作簿A Dim Soubook As Workbook '来源工作簿B 因为工作簿名比较长,所以用Desbook和Soubook来表示。用如下语句开启循环,确保A中的每个工作表都能进入循环中。同时为shtnam赋值当前A中工作表的表名,以便后续复制粘贴时可以引用。 For i = 1 To Desbook.Worksheets.Count Shtname = Desbook.Worksheets(i).Name 如果A中的工作表在B中没有对应,我初步的想法是用goto语句跳转。如何判断shtname是否在B工作簿中呢?我用了is nothing语句 If Soubook.Worksheets(Shtname) Is Nothing Then     GoTo skip Else 但是这个语句会报”下标溢出“的错误,因为如果Shtname不在B里,那表达式Soubook.Worksheets(Shtname)就是错误的。 所以我在前面加上了on error resume next的语句,期望如果报错忽略继续运行,结果依然报错。 这样犯了逻辑上的错误。系统无法判断一个错误的东西是不是不存在!既然Worksheets(Shtname)的语句错误,那后面is nothing根本无从谈起。 改进后如下:      On Error Resume Next      shtnam = Soubook.Worksheets(Shtname).Name        ...

一张图搞懂长期股权投资处理方法

图片
 长期股权投资的初始确认有两种情况,后续计量有两种方法,转换又有7种情况。遇到问题时可按图索骥,按照初始-后续-转换-处置的步骤,逐步分析所属分支,进行相应处理。掌握此图则应付中级会计考试无忧矣。

用Excel进行个人OKR管理

图片
 何为OKR?OKR是 Objective and  Key Result 的缩写,意为”目标与关键成果“,是一种流行的企业战略管理方法,也可以用于个人发展。不过搜索了市面上的OKR工具,基本是面向企业的收费版本;个别有免费版本,又显得过于臃肿复杂,要花一定的时间去学习掌握其操作。本着简单实用的原则,我用Excel制作了一个模板,用于个人OKR管理。 OKR的第一个要素就是Objective,即目标。我认为个人长期目标不一定像企业那样明确,因为更多时候个人的目标是一种“状态”,较难量化。我喜欢的是在目标下的关键成果里进行具体的量化控制。日期区间一般以年为单位,方便进行总结回顾。 第二个要素 Key Result ,即关键成果,这一部分不得不进行具体量化,否则任务无法进行下去。并且可以根据需要进行进一步细分。我把目标设置为“时长”、“个数”这样的具体数字,进行进度追踪。小结周期一般为周,但对于阅读书籍这样的目标可以设置为“月”,通过下拉选项选择小结周期,“小结日期”会随之变化。 这里有一个 其他博主 设计的表格。我觉得她的优点一是比较美观,二来有整体进度的比例。第三就是在一张表上集合了目标和关键成果,但这样每个目标及小目标没有办法设置Deadline。另外其进度我觉得可以用量化方式改进。 不过既然用Excel,大可根据自己的需要自由设计,没有什么标准可言,最终目的还是有助于我们实现目标。 下载模板: 个人目标管理OKR.xlsx

2021年实施的新租赁准则主要关注点

2018 年 12 月,财政部会计司会计准则委员会发布了《关于修订印发 < 企业会计准则第 21 号 —— 租赁 > 的通知》,该通知要求在境内外同时上市的企业自 2019 年 1 月 1 日起实施修订后的租赁准则,其他执行企业会计准则的企业自 2021 年 1 月 1 日起实施。 旧的租赁准则将租赁分为经营租赁和融资租赁两类,出租人和承租人根据不同的租赁类型采用不同的会计处理。但是有个显著的问题就是财务报告无法全面反映因租赁交易取得的权利和承担的义务,融资租赁和经营租赁一个进表一个不进表的会计处理也给企业进行报表粉饰提供了操作空间,降低了会计信息可比性。新修订的租赁准则要求对经营租赁确认使用权资产和租赁负债,有利于真实反映企业的资产负债情况。 主要关注点 一. 承租人 1.        初始确认和计量 租赁期开始日,企业应当对租赁确认使用权资产和租赁负债。 使用权资产成本 = 租赁负债初始计量金额 + 已支付的租赁付款额 - 已享受的租赁激励 + 初始直接费用 + 合同到期预计发生成本 租赁负债初始计量金额 = 尚未支付的租赁付款额现值 这里需要注意首先是租赁期的确定,如果承租人有续租选择权,且合理确定将行使该选择权的,租赁期应当包含可续租选择权覆盖的期间,即租赁付款额也应当考虑这部分。 其次是尚未支付的租赁付款额现值的折现率的确定。准则要求使用租赁内含利率,即“使出租人的租赁收款额的现值与未担保余值的现值之和等于租赁资产公允价值与出租人的初始直接费用之和的利率”。从这个定义可以看出,租赁内含利率的计算部分依赖于出租人的初始直接费用,对于承租人来说这个不太可能获得。 “无法确定租赁内含利率的,应当采用承租人增量借款利率作为折现率”。所谓增量借款利率,简单来说就是承租人如果要借款购入这项租赁资产所要承担的利率。实务中我觉得可以以当下承担的借款成本来进行合理调整确定。 实务中常遇到的还有一种情况是,租金根据承租方在租赁资产上取得的业绩比例来计算。如果是纯抽成租金,即并非是取决于指数或比率的可变租赁付款额,初始计量时不需要包括在租赁付款额中,待金额确定后再确认。但如果租金约定了保底金额,属于“形式上包含变量但实质上无法避免”,则初始计量时便需确认。 2. ...

用博弈论方法分析为何小企业更容易选择逃税

目前国内税制还不完善,再加上税之外的各种“费”,使得企业的压力非常大,也就催生了一些想方设法逃税的企业。通常我们直观的认为,利润大的企业更容易逃税,因为可以从中获取的利益巨大。但实际上这个看法是不对的。此文用博弈论的方法来分析究竟何种企业更有逃税意图。(注:上下文所说“大企业”“小企业”均以利润大小划分,而非利润率) 在市场上,纳税人有逃税和不逃税两种选择,同时,税务机关也有监管和不监管两种选择。如下图所示,如果纳税人逃税,税局监督,税局得到5,纳税人亏3;如果纳税人逃税,税局不监督,纳税人就赚了4,而税局亏了4;如果纳税人不逃税,税局监督,但是发现纳税人没偷懒,反而浪费了人力物力检查,税局亏了1,纳税人赚了1;如果纳税人不逃税,税局也不检查,那么税局获得2,纳税人获得1。 逃税 不逃税 监管 5,-3 -1,1 不监管 -4,4 2,1 按照这个例子,纳税人不逃税,税局不监督是最好的,总收益最大为3,但这并未达到纳什均衡状态。因为假如纳税人知道税局不会检查,纳税人的最优选择是逃税;如果税局知道纳税人要逃税,税局的最优选择是监管;而纳税人知道税局要监管,他肯定不逃税。这就形成了一个循环。所以纳税人和税局最好的办法就是,以一定概率随机选择逃税or不逃税、监管or不监管,让对方不知道自己会选择什么,而这个概率会使得自己的预期收益最大。 我们设定税局以Q的概率选择监管,1-Q的概率选择不监管,这时从纳税人的角度,选择逃税的预期收益是: Q×(-3) +(1-Q)×4 = 4-7Q 不逃税的预期收益为: Q×2 +(1-Q)×2 = 2 从税局的角度,税局不希望纳税人猜到自己选择监管还是不监管,即要使纳税人的预期收益在逃税和不逃税之间没有区别,也就意味着两种预期收益应该相等: 4-7Q = 2 求得Q = 2/7,即对于纳税人而言,如果税务监管的概率大于2/7,则不应该逃税。 现在我们把表格的数字改一下,逃税时的收益率改小(利润小的企业逃税的绝对收益也小) 逃税 不逃税 监管 5,-1 -1,1 不监管 -4,2 2,1 用上面的方法可以求得这时的Q=1/3,也就是说,只有当税务监管的概率大于1/3时,纳税人才不应该逃税。 因为 1/3 > 2/7 ,我们就可以得出结论,利润越小,对监管概率的的容忍度就越大。小企业预期税局监管的概率为33%时才不会逃税,而大企业预...

EXCEL VBA案例实操——批量复制数据到目标工作簿

图片
工具:MS EXCEL 2007,宏 目的:把“源”中的数据依次复制到各个分表中。 目标工作簿 数据源 第一步:录制宏。 把“源”表中的数据手工复制到分表“1店成本”和”3店成本”中一月份的数据中。 录制宏 第二步:查看并分析代码。 代码界面 可以看出,复制动作的代码是下面这段(称为主体代码): Sheets("源").Select Range("C3:C4").Select Selection.Copy Sheets("1店成本").Select Range("C5").Select Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _ :=False, Transpose:=False 下一段代码更改的只是两个函数Range(单元格的范围),Sheets(目标工作簿)。 第三步:复制主体代码。 只需要更改第二行Range(“C3:C4”).Select和第五行Sheets(“1店成本”)的参数,例如改成C9:C10和C12:C13;Sheets(“4店成本”)和Sheets(“5店成本”)。假如后面还有更多的店别,就复制更多次。 但是这样做有个很明显的弊端:假如店别特别多的话,要复制修改很多次代码,一不小心就会出错(例如我想解决这个问题的原因是需要复制90多家店)。 既然每段代码中只改变的是Range和Sheets的参数,那我们可以使用循环格式和变量来替代——让一段代码在特定范围内循环执行。 第四步:增加循环结构。 Dim定义一个变量i,是循环的标的,for i =1 to 5意思是i 将从1到5依次运行,共5次。工作簿的命名是“店号”+“店成本”,所以可以把i变量加入Sheets的参数里。这样每次循环的目标工作簿就依次是”1店成本”, ”2店成本”, ”3店成本”……”5店成本”。 Dim i As IntegerFor i = 1 To 5 Sheets("源").Select Range("C3:C4").Select Selection.Copy Sheets(i ...

预付年金终值现值的计算

题目:某人连续5年每年年初存款1000元,如银行利率为10%。问:此人在第五年末能一次取出本利和多少钱? 答:F=A*F/A(10%,5)=6105.10 注意,上述结果是错误的! 如果每年年初存钱的话,计息期实际上是5年,所以终值系数选择时应该用F/A(10%,6)=7.716(n期普通年金系数的计息期即为n-1年),但是实际上又比6年期的后付年金少付了1次款,所以还要减去一次付款。 F=1000*F/A(10%,6)-1000=6716。这样计算才正确! 第二种方法: 预付年金终值 = 同期的普通年金终值×(1+i)=A×(F/A,i,n)×(1+i) 也就是说就本题来说,终值 = 1000 × (F/A,10%,5) × (1+10%)=6716 预付年金终值 方法1:=同期的普通年金终值×(1+i)=A×(F/A,i,n)×(1+i) 方法2:=年金额×预付年金终值系数=A×[(F/A,i,n+1)-1] 预付年金现值 方法1:=同期的普通年金现值×(1+i)=A×(P/A,i,n)×(1+i) 方法2:=年金额×预付年金现值系数=A×[(P/A,i,n-1)+1] 可以看出,预付年金终值系数相比于普通年金期数加一,系数减一(即减一期年金额);预付年金现值系数相比于普通年金现值期数减一,系数加一(加一期年金额)。 本文来源于2015年在 百度知道 回答的一个问题,现重学财管,居然搜到了当时自己的回答,故重新整理归纳。

关于“三代”手续费的几个问题

近日财务界朋友圈都在转发财行〔2019〕11号《关于进一步加强代扣代收代征税款手续费管理的通知》 这一发文,该文主要规范了“三代”手续费的比例、限额以及将该项目纳入预算管理。作为曾在第一线为企业办理过多次“三代”手续费支付的财务人,这里把自己的经验总结一下。 什么是“三代”? 从发文标题可以看出个大概,“三代”即代扣代缴、代收代缴、委托代征这三种税款征收方式的简称。代扣代缴最常见的是个人所得税,凡是向员工发工资的企业或者单位,都是个人所得税的扣缴义务人,要依法履行代扣代缴义务。代收代缴常见的是消费税,委托加工产品,受托方在收取加工费的同时,有义务向委托方代收其应纳的消费税。而委托代证并非法定义务,而是税务机关和受托单位或个人之间的协议,一般是零星、分散、异地等一些不方便税收征管的项目。 为什么会有“三代”手续费?怎么申请? 说白了,企业或个人协助税务机关征收税款,是有功劳和苦劳的,而且银行代扣税款也会收取一定的手续费,所以这部分可以看做是企业的“辛苦费”。但这个钱并不是国家主动返还给企业,必须要在税务机关登记后,才会回到企业账上。 现在很多事项可以在电子税务局直接办理,比如在广东省电子税务局网站,进入“事项办理- 涉税事项办理-征收”模块下面,有个“代扣代收代征手续费”的项目,点进去填写“代扣、代收、代征税款手续费申请”,并扫描附上相关资料提交即可。 “三代”手续费申请下来的税务和账务处理 发文中说道,这笔钱返还给企业可以用作“与“三代”业务直接相关的人员成本、信息化建设等管理支出,意味着可以发放给办税人员作为奖励,所以有些企业就将其挂在”其他应付款“项目。这样做并不合理。 国家税务总局12366平台2016年增值税类(含营改增)热点问题汇总中对此已有回复:  “企业代扣代缴个人所得税取得的2%手续费返还是否缴纳增值税?  答:按照目前营改增政策相关规定,纳税人代扣代缴个人所得税取得的手续费收入应属于增值税征税范围,应缴纳增值税。“ 实际中,也有地方的税局要求企业领取返还支票时需要按照 “经纪代理服务” 开具增值税发票,一般纳税人适用税率6%税率,小规模纳税人适用征收率3%。 企业所得税的话,根据发文, “三代”单位所取得的手续费收入应单独核算,计入本单位收入, 依据《中华人民共和国企业所得税法》第六条规定, 企业以货币形式和非货币形式从各种来源取得的收入,为收入...

偷税的“时机”——范冰冰和刘晓庆截然不同的命运

崔永元曝出娱乐圈“阴阳合同(明星的个人所得税大多实行“源泉扣缴”,就是支付方在付给纳税人劳动报酬的同时,预先为对方上缴其个人所得税,这就可以明处签一份低报酬的合同,私下再签一份高报酬的合同来逃税)”逃税的事情已经几个月了,主角范冰冰也在公众视野中消失了一百多天。10月3号,江苏省税务局终于向范冰冰正式下达了《税务处理决定书》和《税务行政处罚决定书》要求其将追缴的税款、滞纳金、罚款共计约8.84亿元在规定期限内缴清。8.84亿包含三部分,一是范冰冰及其企业应缴而未缴的税款,2.55亿元;二是按天计算的滞纳金0.33亿元;三是罚款,接近6亿元,包括对「阴阳合同」隐瞒真实收入处以4倍罚款2.4亿元;对利用工作室账户隐匿个人报酬处以3倍罚款,有2.39亿元。 对范冰冰事件的处理并没有涉及到刑事处罚,不由的让人联想到十几年前因为偷税而遭受牢狱之灾的另一个演艺界大佬刘晓庆,而刘晓庆当时逃税额一千多万,是范冰冰的十分之一,却被羁押了四百多天(最终并未被判刑)。其实之所以两人的结果不同,是因为《刑法》在2009年进行的一次修订。 刘晓庆偷税在2002年,当时的《刑法》第二百零一条规定: 纳税人采取伪造、变造、隐匿、擅自销毁帐簿、记帐凭证,在帐簿上多列支出或者不列、少列收入,经税务机关通知申报而拒不申报或者进行虚假的纳税申报的手段,不缴或者少缴应纳税款,偷税数额占应纳税额的百分之十以上不满百分之三十并且偷税数额在一万元以上不满十万元的,或者因偷税被税务机关给予二次行政处罚又偷税的,处三年以下有期徒刑或者拘役,并处偷税数额一倍以上五倍以下罚金;偷税数额占应纳税额的百分之三十以上并且偷税数额在十万元以上的,处三年以上七年以下有期徒刑,并处偷税数额一倍以上五倍以下罚金。 而范冰冰案适用《中华人民共和国刑法修正案(七)》,对于第二百零一条已经更改为: 纳税人采取欺骗、隐瞒手段进行虚假纳税申报或者不申报,逃避缴纳税款数额较大并且占应纳税额百分之十以上的,处三年以下有期徒刑或者拘役,并处罚金;数额巨大并且占应纳税额百分之三十以上的,处三年以上七年以下有期徒刑,并处罚金。 扣缴义务人采取前款所列手段,不缴或者少缴已扣、已收税款,数额较大的,依照前款的规定处罚。 对多次实施前两款行为,未经处理的,按照累计数额计算。 有第一款行为,经税务机关依法下达追缴通知后,补缴应纳税款,缴纳滞纳金,已受行政处罚的...

增值税发票丢失的处理

最近遇到了许多发票丢失的问题,不管是我方开给对方的发票丢失还是对方开给我方的丢失,总有客户跑来要开什么证明。其实发票丢失不一定全部都需要开具《丢失增值税专用发票已报税证明单》的,而且作为购货方,你让我开具《证明单》,也实在是爱莫能助啊! 根据国家税务总局公告2014年第19号,丢失发票分票种以及联次多少来处理,具体如下: 丢失专用发票 (1)丢失增值税专用发票的发票联和抵扣联 丢失前已认证相符的,购买方可凭销售方提供的相应专用发票记账联复印件及销售方主管税务机关出具的《丢失增值税专用发票已报税证明单》或《丢失货物运输业增值税专用发票已报税证明单》(以下简称《证明单》),作为增值税进项税额的抵扣凭证,专用发票记账联复印件和《证明单》留存备查。 丢失前未认证的,购买方凭销售方提供的专用发票记账联复印件进行认证,认证相符的可凭专用发票记账联复印件及销售方主管税务机关出具的《证明单》,作为增值税进项税额的抵扣凭证,专用发票记账联复印件和《证明单》留存备查。 (2)丢失增值税专用发票的抵扣联 如果丢失前已认证相符,可使用专用发票发票联复印件留存备查;如果丢失前未认证,可使用专用发票发票联认证,发票联复印件留存备查。 (3)丢失增值税专用发票的发票联 可将专用发票抵扣联作为记账凭证,抵扣联复印件留存备查。 丢失普通发票发票联 将记账联复印件加盖开票方发票专用章后,交给受票方进行入账。 从上述规定可知,发票丢失后购买方用于认证及入账的《证明单》,是由销售方当地税局出具的。假如销售方自己把开具的发票弄丢了,也是要先报税,后找税局开出《证明单》,和发票联复印件一起交给购货方,购货方是可以正常抵扣入账的。这里需要知道,以前的程序是购货方还需要拿着这些资料让税局审核,现在则不用了,税局只是事后抽查。 为了简化纳税人操作,北京市国家税务局关于取消一批涉税事项和报送资料的通知京国税函〔2018〕1号通知中,正式取消了《丢失增值税专用发票已报税证明单》的开具。也就是说,如果销货方所在地是北京,那购货方是无论如何也要不来《证明单》了。相比之下,上海税局的做法就周全的多,上海电子税务局开通了自助办理《证明单》功能,纳税人不用跑前台也能方便打印,这就避免了一些销售方怕麻烦拒绝帮助购货方开具证明,而购货方所在地又没有取消证明开具的情况。 当然造成发票丢失的过错方还是要老老实实登报处理,并接受税务机关处...

会计信息系统课程教学思考

我们其实面临两个选择,即会计信息系统的课堂教学应该教"如何使用会计信息系统"还是教"如何开发会计信息系统"。 我们现在的课堂显然选择了教"如何使用会计信息系统"。这有其显而易见的优点就是社会需要。学会使用市面上主流的会计软件显然符合社会需要,我们的大学正是要培养能够适应社会的人才。如果教"如何开发会计信息系统",首先一点就是作为会计学专业而非计算机专业的学生,大部分人的计算机基础都不牢固,很难应付"开发一套信息系统"的学习。 但这是不是意味着现有的教学内容能够持久呢?会计电算化的出现代替了手工记账、算账、报账等会计核算工作,会计人员只需要操纵几个简单的指令即可完成重复繁琐的工作,这固然是一种必备技能,但也意味着从事会计职业门槛的降低,未来甚至可能无需懂得会计知识就能操纵软件进行会计工作,这样基础会计工作必然由脑力劳动转型为体力劳动。这就对我们会计工作者提出了更高要求。要么向管理会计发展,要么从事会计软件的开发与完善。前者有其固有限制,企业的管理者毕竟是少数;而后者,随着市场经济的发展,不同企业之间经营差异的分化,每个企业都会发展出适合本企业情况的会计信息系统,这时既懂得会计原理又有编程能力的人才就成为了企业会计工作的中心,只懂会计而不会编程的人只能做"体力"劳动,但他们的教育程度使得雇佣他们的成本高于雇佣教育程度相对较低的劳动者。或者极端的情况,复核型人才直接包揽本企业信息系统设计和使用的所有工作,单纯的会计将不复存在。 综上,我认为作为会计学专业学生,如果只沉浸在会计知识领域,无法应对未来社会的发展方向,只有与未来的主流,信息化社会的基础,计算机与人工智能相结合才能避免淘汰。这个任务只有落到会计信息系统这门课程的教学上,因为只有这们课程的老师才有能力既教授"如何使用会计信息系统"又教授"如何开发会计信息系统",这门课未来或许也会取代其他理论课程成为会计主干课程。

民间借贷的一些问题

过年回家,听到大人们说年底资金需求量激增,贷款利息甚至有2分、3分。我听了很迷茫,学校里只学过年利率是百分之多少多少,这个2分、3分是什么意思呢? 上网查了资料,原来,所谓年利率、月利率、日利率,按照行业规则,他们的表示方法也是不一样的。一般情况下,日利率用万分之一( ‱)来表示,月利率用千分之一(‰)来表示,年利率用百分之一(%)来表示。如果没有特别注明,‱就表示日利率,‰就表示月利率,%就表示年利率。 人们常说的“年(月)息多少厘(分)”是指一元本金一年(月)应该支付多少厘(分)利息。比如“月息2分”的意思就是一元钱每月的利息二分钱,月利率是0.02元/1元=20‰,化成年利率就是20‰×12=24%。1万元钱每年的利息就要2400元。 但是,最高人民法院《关于人民法院审理借贷案件的若干意见》第六条规定,民间借贷的利率可以适当高于银行的利率,各地人民法院可根据本地区的实际情况具体掌握,但最高不得超过银行同类贷款利率的四倍(包含利率本数)。超出此限度的,超出部分的利息不予保护。如果按照人民银行公布的基准利率来算的话,按现行一年期贷款利率6%,换算成月利率是6%/12=5‰,四倍是5‰*4=20‰,也就是月息2分。也就是说,民间借贷如果一年期贷款利率超过月息2分的话,超出部分利息法律是不予保护的。 实际中,一些担保公司会把钱以远远高出4倍基准利率的利率水平借给急需用钱的公司或个人,一些小额贷款公司的主要业务就是高利贷。

经济纠纷的解决途径

    经济纠纷是指市场经济主体之间因经济权利和经济义务的矛盾而引起的权益争议。解决经济纠纷的途径和方式主要有仲裁、民事诉讼、行政复议与行政诉讼。   仲裁   (一)仲裁的特征   仲裁是由经济纠纷的各方当事人共同选定仲裁机构,对纠纷依法定程序作出具有约束力的裁决的活动。   仲裁以双方当事人自愿协商为基础;由双方当事人自愿选择的中立第三者(仲裁机构)进行裁判;仲裁裁决对双方当事人都具有约束力。(二)仲裁的适用范围   平等主体的公民、法人和其他组织之间发生的合同纠纷和其他财产权益纠纷,可以仲裁。   (三)仲裁的基本原则   自愿原则;依据事实和法律,公平合理地解决纠纷的原则;独立仲裁原则;一裁终局原则。   (四)仲裁机构   仲裁委员会独立于行政机关,与行政机关没有隶属关系。仲裁委员会之间也没有隶属关系。   (五)仲裁协议   仲裁协议是双方当事人自愿把他们之间可能发生或者已经发生的经济纠纷提交仲裁机构裁决的书面约定。仲裁协议应以书面形式订立。口头达成仲裁的意思表示无效。   仲裁协议的内容应包括:请求仲裁的意思表示;仲裁事项;选定的仲裁委员会。   仲裁协议对仲裁事项或者仲裁委员会没有约定或者约定不明确的,当事人可以补充协议;达不成补充协议的,仲裁协议无效。   仲裁协议一经依法成立,即具有法律约束力。仲裁协议独立存在,合同的变更、解除、终止或者无效,不影响仲裁协议的效力。   (六)仲裁裁决   仲裁应当开庭进行。当事人协议不开庭的,仲裁庭可以根据仲裁申请书、答辩书以及其他材料作出裁决。仲裁不公开进行。当事人协议公开的,可以公开进行;但涉及国家秘密的除外。   当事人申请仲裁后,可以自行和解。仲裁庭在作出裁决前,可以先行调解。调解书经双方当事人签收后,即发生法律效力。   裁决书自作出之日起发生法律效力。当事人应当履行裁决。一方当事人不履行的,另一方当事人可以依照《民事诉讼法》的有关规定向人民法院申请执行。    民事诉讼   (一)民事诉讼的适用范围   公民之间、法人之间、其他组织之间以及他们相互之间因财产关系和人身关系发生纠纷,可以提起民事诉讼。   (二)审判制度   1.合议制度。   2.回避制度。   3.公开审判制度。   4.两审终审制度。   (三)诉讼管辖   诉讼管辖是各级法院之间以及不同地...