Access挑战Excel第十八期：工卡打印

roych

    关于第十五期挑战，小妖姐姐表示不服，工卡打印这种事情，Word的合并功能表示毫无压力，还在朋友圈里说Roy用了一堆代码（其实除去错误处理部分，代码并不多。请允许我去厕所一会儿）

       既然毫无压力，那看来还是得继续挑战啊。我们先假定流程是这样的：

• 员工入职后，按一定的规格上传照片，且需以姓名来命名。
• 离职时则删除员工信息表的记录，并删除对应的照片。【本例暂不做处理】
• 实际过程中，一般只打印新入职或者补办的工卡，用户选择后可预览打印效果。
• 打印后可更新已打印的数据。【本例暂不做处理】
  基于上述假定，因此这里不再对代码进行错误处理。所以代码就一句（很眼熟？是的，在第十五期出现过。如果是绝对路径的话，甚至可以用表达式代替代码）：
  
  1. Private Sub 主体_Format(Cancel As Integer, FormatCount As Integer)
     
  2.     Me.ImgUser.Picture = CurrentProject.Path & "\img" & Me.姓名 & ".jpg"
     
  3. End Sub

  复制代码
  
  

       现在我们打开frmMain，随便勾选几个人，再点击“预览工卡”，看看效果吧：

       还记得曾经有人炫耀Excel把多页打印在同一页的事情吗？……好了，这次看你们发挥了。

-------------------------------------
2016-4-19 增加视频制作教程和微博视频（请下载三个分卷压缩包后解压，如下载后无法观看，请点击文末的微博链接，以便在线观看）-------------------------------------



--------------------------------------
http://video.weibo.com/show?fid=1034:92669ae41c326d4a07d9d33b1242333f

hxx3970

急需学习一下

pureshadow

欢迎支持Excel版超级变态解法：

cfedf

呵呵，这样的帖子对于新手来说真的很好。支持roych继续调战。

风中漫步

表演赛也很精彩

纸鸽

前排出售小板凳，矿泉水喽。

pureshadow

tmtony 发表于 2016-4-19 12:42
后妈难当啊。
做得不好呢，就说虐待呢
做得好了，又说假情假义

你啥时候见有人说你假情假义了？

pureshadow

purplerose 发表于 2016-4-18 21:39
还有，您何时认王站老师为后妈了？王站老师认了这么有能耐的女儿，也不说一下呀，要请客哟！！

王站当后妈从十几年前就开始了，只有Access才是他亲生的，而我们这些混Excel、Word、PPT的，都只当他后妈来着。

pureshadow

purplerose 发表于 2016-4-18 21:38
小妖老师，您好！其实ROYCH并没有欺负您了，他只是想激发您的EXCEL潜能，看您能发挥到什么程度了，不这样子 ...

童鞋你有点幽默感好不好

tmtony

后妈难当啊。
做得不好呢，就说虐待呢
做得好了，又说假情假义
怎么都不讨好呢，后妈其实比亲妈难多了。怎么都是错的。