|
年轻的小伙伴，与恋人相依相恋，终于修成正果，“执子之手，与子偕老”，步入婚姻的殿堂。结婚人生大事，一定会要亲友酌酒庆贺，分享快乐。你的喜酒喝不了，今天介绍一下喜帖批量打印，给您添添喜气。 一、先建立一个启用宏的EXCEL工作簿。
批量打印需要VBA代码，启用宏的EXCEL工作簿可以保存代码。 二、扫描喜帖
扫描时要求边框水平、垂直 三、图片插入工作表，对图片进行裁剪。
裁剪时左右分别裁掉一部分，作为调整页边距使用。图片设为非打印对象 四、工作表视图模式设为“页面布局”，设置裁剪后图片大小。
图片高宽按实际裁剪以后的实物尺寸设置。其他按红框设置 五、将图片拖到左上角。将要打印区域插入矩形框，设置填充色、边框。
矩形框除长宽外，按第四步设置 六、设置页边距。现将A1单元格加边框打印，然后计算实际打印页边距和设置页边距差值，作为调整依据。 七、调整列，使列边和行边与矩形框边重合，将每个要打印区域合并单元格，并命名区域为'quyu'+顺序号的格式，如：'quyu1”,'quyu2'等。 八、设置并录入批量打印数据，加入批量打印代码，设置好页面。 对不变的数据直接录入到模板中，对邀请的亲友（亲友数据放在'亲友名单'工作表A列），由VBA控制填入模板，填完一个打印一次。代码（放在模板工作表下）如下： for i=1 to 11 me.range('quyu'&i)=sheets('亲友名单'）.range('a'&i) me.printout next i 好了，喜帖的批量打印到这一步就完成了，谢谢朋友们的关注。上次介绍席卡批量打印没有列出批量打印的代码，有朋友要介绍下，希望大家喜欢。有需要模板或帮助的朋友，可以关注我或留言，我会第一时间和大家探讨。 |
|
|
