制作排班表

cunfu2010 · 发表于 2016-4-10 19:48

本帖最后由 cunfu2010 于 2016-4-13 08:42 编辑

工作上排班，创建日期工作表已经实现，现在想把人员排进去：
1、夜班和带班始终轮转，不分双休日和节假日；
2、白班周一到周五轮转，周六周日单独轮转：即这周是第一值周六、第二值周日，到下周第三值周六、第四值周日，依次类推，最后一人值完第一人接着3、当E2工作表变化时（1-12之间）自动排出当年的对应的月份的日期和星期
条件有些复杂，求帮忙

cunfu2010 · 发表于 2016-4-11 15:28

自己顶一下

jiangtaowoo · 发表于 2016-4-11 15:36

论坛里有很多自动排班程序

cunfu2010 · 发表于 2016-4-11 16:06

jiangtaowoo 发表于 2016-4-11 15:36
论坛里有很多自动排班程序

谢谢，我接触VBA时间不长，不太懂，能帮写一个吗？

zjdh · 发表于 2016-4-13 07:45

既然工作表已做好，就将其传上来，也好让帮助者完善，不然如何帮你？

cunfu2010 · 发表于 2016-4-13 08:43

zjdh 发表于 2016-4-13 07:45
既然工作表已做好，就将其传上来，也好让帮助者完善，不然如何帮你？

谢谢提醒，现在附件上传了，帮忙看看

zjdh · 发表于 2016-4-13 18:28

本帖最后由 zjdh 于 2016-4-13 18:37 编辑

排班表.rar (17.12 KB, 下载次数: 802)

cunfu2010 · 发表于 2016-4-13 21:24

zjdh 发表于 2016-4-13 18:28

太感谢了，能给个注释吗？还有下月起始序号的设定是怎么达到的？

cunfu2010 · 发表于 2016-4-13 21:37

本帖最后由 cunfu2010 于 2016-4-13 21:41 编辑

zjdh 发表于 2016-4-13 18:28

你的代码思路特别好，特别是能延续月份，能省不少事，而且代码特精简。有些地方看不懂。所以还要麻烦你。
1、如何实现自己首次定义白班第一人、夜班第一人、带班第一人、白班周末第一人？
2、如果夜班也同白班一样周末轮值，又如何实现3、把周六、周日所有行A列到E列用灰色高亮突显

zjdh · 发表于 2016-4-14 09:15

本帖最后由 zjdh 于 2016-4-14 13:00 编辑

1. 先设置前一个月的名单，修改“下月起始序号”，再设置需要的月份名单。
2. 见附件

排班表2.rar (17.01 KB, 下载次数: 835)

		自动登录	找回密码
密码			免费注册

[求助] 制作排班表