分享

ExcelVBA实现招聘工作多学科多页批量打印抽签卡片

 L罗乐 2019-09-13
本文转载自公众号:哆哆数学,原创作者:fs哆哆老师。本文著作权归原创作者所有,本人收藏此文仅作为学习之用,不作其他目的,如有侵权,请联系我删除。
ExcelVBA实现招聘工作多学科多页批量打印抽签卡片

.

清世宗雍正的过失

雍正的过失

1.雍正大兴文字狱,株连人众,处刑严酷

2.雍正遵奉重农业、轻工商的信条

3.雍正在对外交往中亦固步自封

4.雍正还好大喜功,急于求成

.

ExcelVBA实现招聘工作多学科多页批量打印抽签卡片

【问题】某著名大企业要招聘岗位如下

现在工作人员要做的事是:打印抽签卡,给应聘者要抽签得到答辩的顺序,要求如下:

(1)等于或大于15,239,34,164……的数字的张数,

(2)尽可能的省纸张,

(3)每个岗位的抽签卡片标名那个岗位的。

(4)批量

你会怎么做,想一想

【目标】重复的工作自动化,重点是以后也可以利用,千万不要每年都重复的复制粘贴的工作

【解决方法】

(1)设计出一个模板如下,一张A4纸,打印8张卡片,

(2)如15人,2页就可以打16个卡片,239人30页就可以打240个卡片满足要求,……如下

(3)请出VBA小程序:首先计算出页数=数量/8再向上取整=CEILING(E2/8,1),再*8可以得出打印的最大数

(4)第一个岗位,我们要把标识统一标识为“学科:(岗位-AAAA)抽签卡”,再从1到2打印,完成后第二个岗位,标识要变化为“学科:(岗位-BBBB)抽签卡”再从1到30打印……,

(5)好了思路完成了。

=====代码=====

=======界面=======

【使用方法】

1.输入“岗位”

2.输入“报考人数”

3.点击:多科多页批量打印就可以啦

【代码解析】:

(1)首先自动取得S1:T最后一行存入数组,

(2)再矢循环数组每一个循环的工作是:首先修改标识,再页数循环,再来一次,

(3)程序完成会自动填写“打印A4张数”“打印最大数”得到一张清单。

你只要点击按钮就可以啦,放足纸张,去睡一会儿,睡醒了就可以拿了

.

.

=====今天学习到此====

    本站是提供个人知识管理的网络存储空间,所有内容均由用户发布,不代表本站观点。请注意甄别内容中的联系方式、诱导购买等信息,谨防诈骗。如发现有害或侵权内容,请点击一键举报。
    转藏 分享 献花(0

    0条评论

    发表

    请遵守用户 评论公约

    类似文章 更多