excel自动排班表

一个学生想做一个全自动排字表,但有人建议他半手工操作,因为它需要vba 。但是,他觉得努力学习就能学会,所以加油 。
计划表
模板,模板的内容会批量生成一周表 。比如周三,表头会引用排班表第一行的所有数据 。
我们来看看vba跑步后的效果 。
本来排班表的内容分散在很多栏目里,不方便参考 。h列使用了一个辅助列来合并内容 。合并时,日期会变成数字,嵌套的text会转换成日期格式 。每天都有几个记录人,用textjoin组合分隔 。
=text(a2," m,m,d,e") b2 "类纪律检查记录记录器:" textjoin(",",1,c2:g2)
开发工具,vb,插入模板,输入代码 。
子计划
申请 。屏幕更新=假
申请 。显示警报=假
删除多余的工作表
对于x=张 。数到3第一步
工作表(十) 。删除
然后
带表(“明细表”)
对于x=2至 。单元格(行 。计数,1) 。结束(3) 。排
这相当于将模板工作表移动或复制到比较后并创建一个副本
表单(“模板”) 。copyafter:=纸张(纸张 。计数)
活动工作表的名称是根据计划的b列命名的
活动纸 。名称= 。单元格(x,2)
活动工作表a1根据计划的h列引用数据
[a1]= 。(x,8)
然后 。挑选
以…结尾
【excel自动排班表】申请 。显示警报=真
申请 。屏幕更新=真
末端接头
比较后,如果您使用vba,您需要启用所有宏 。
除了困难,vba没有缺点 。