年假统计公式（紧急求助）

antimelody1983

单位对于年假的规定比较复杂，本人想编个公式，方便统计。无奈excel用的不好，请各位大侠帮我写下公式。
请看附件，休假规则附件里有写。谢谢各位！

杨成云

方法有好几种，例如：全部采用IF嵌套函数
或使用Vlookup结合IF函数
或使用VBA来自定义函数

杨成云

Function WorkDate(A As Range, B As Range)
  If A < 10 Then
    Select Case B
    Case Is <= 2
      WorkDate = 5
    Case Is <= 4
      WorkDate = 6
    Case Is <= 6
      WorkDate = 7
    Case Is < -8
      WorkDate = 8
    Case Is >= 9
      WorkDate = 9
    End Select
  ElseIf A >= 10 And A < 20 Then
    Select Case B
    Case Is <= 2
      WorkDate = 10
    Case Is <= 4
      WorkDate = 11
    Case Is <= 6
      WorkDate = 12
    Case Is < -8
      WorkDate = 13
    Case Is >= 9
      WorkDate = 14
    End Select
  Else
    WorkDate = 15
  End If
  Application.Volatile
End Function

自定义函数在计算的数据量不大比较好用，但数据量极大是会做恶梦的（运行太慢）

[ 本帖最后由 杨成云 于 2009-12-1 17:27 编辑 ]

wlmhit903

一开始被你的datedif函数弄迷糊了。后来总算是看懂了，哈哈。我用嵌套公式做的，已经到嵌套的最大层数了，再多加一个条件都不可能了。

sunya_0529

试着做了一个，看看好不好用。

H2的公式：
=CEILING(IF(C2>19,15,IF(C2=0,0,IF(G2=0,(DATE(2009,12,31)-D2)/365,1)*LOOKUP(G2,{0,5;3,6;5,7;7,8;9,9})+(C2>9)*5)),0.5)

antimelody1983

谢谢大家啊。帮我大忙了呵呵！真好

antimelody1983

原帖由 wlmhit903 于 2009-12-2 09:53 发表
一开始被你的datedif函数弄迷糊了。后来总算是看懂了，哈哈。我用嵌套公式做的，已经到嵌套的最大层数了，再多加一个条件都不可能了。

回去用了这个公式，发现还有一层没法满足。当工作年份在10年以上，但是入司时间小于1年时，应该是“剩余日历数/365*10”。这层没体现出来，再加一层不行了，怎么办呢？
我筛选了有问题的，打包了。大仙，帮我再看看，嘿嘿。

wlmhit903

原帖由 antimelody1983 于 2009-12-4 17:15 发表




回去用了这个公式，发现还有一层没法满足。当工作年份在10年以上，但是入司时间小于1年时，应该是“剩余日历数/365*10”。这层没体现出来，再加一层不行了，怎么办呢？
我筛选了有问题的，打包了。大仙，帮 ...

你的条件里 满10年不到20年的，入职当年到第二年都是10天， 应该是不考虑小于1年的。可能是我对题意理解有误？或者你的条件应该是满一年到第二年的10天，不足一年的按照日期计算。另外剩余日历数好像不太对，我公式里体现的是当年已工作日历数，还需要改动一下。剩余日历数应该是 datedif（E1,year（G1）&"-12-31","d")，你看哪种合适。

[ 本帖最后由 wlmhit903 于 2009-12-8 13:46 编辑 ]

wlmhit903

今天上传不了附件，公式拷出来吧。

=IF(D30>=20,15,IF(D30>=10,IF(H30>=9,14,IF(H30>=7,13,IF(H30>=5,12,IF(H30>=3,11,IF(H30=0,10*DATEDIF(E30,G30,"d")/365,10))))),IF(H30>=9,9,IF(H30>=7,8,IF(H30>=5,7,IF(H30>=3,6,IF(H30=0,5*DATEDIF(E30,G30,"d")/365,5)))))))

antimelody1983

谢谢楼上，这回好了。ok了。太强了！