(word)作明信片打印模板不费神.docVIP

作明信片打印模板不费神 2006-02-27 09:39:37 一、用WpsOffice文字框制作套打模板 1.先用扫描仪将明信片扫描下来，注意扫描时比例选择100％，扫描分辨率设为75dpi即可。为确保扫描图片大小不变，扫描前用黑色钢笔或铅笔将明信片四周边缘涂上一圈黑线条。将图片扫描完成后，用Photoshop图片处理软件将黑线条之外的多余部分剪切掉，同时将黑线条擦掉。将图片大小设置为明信片实际大小，保存图片为gif或jpg格式。 2.打开WpsOffice，将扫描的图片插入，插入的图片和明信片本身尺寸略有出入。选中图片，单击鼠标右键，打开图片对象属性对话框，将“边线端点”设置为实线，“图像尺寸”设置为原图比例，将“位置尺寸”中的宽高设定为原图大小，选中“不打印”复选框，按下“确定”按钮，如图1，这样就设置好了图片属性。 3.在图片上需要填充文字的地方，按照明信片方框大小添加文字框，并设定文字框属性。方法是：选定文字框，单击鼠标右键，打开文字框属性对话框，在“版式”中选择横排，在“边框风格”选项卡“内外留空”中的“外”选无，在内框中左右或上下留一定空格尽量使文本居中。在“位置尺寸”选项卡中设定文字框，高和宽与原图大小保持一致。并将“边线颜色”设为白色，如图2。 4.打印明信片。单击菜单栏中的“文件→页面设置→纸张边距”，用尺子量取所打明信片中文字框边框到纸张左边和上边的距离，把量取的尺寸直接输入到页面设置对话框中相应的左、上页边距中，右、下边距则要设小一点，让整张表格都可以打印出来就行了。单击“确定”按钮，然后将所设计的图片、文字框移至和页面上端和下边对齐，就可以正常打印了。即使出现水平或垂直移位，只要微调，增减相应的上、左页边距即可。我们设置为背景的图片虽然在屏幕上可以看到，但是并不会被打印出来，所以无须考虑。模板设计好后，将其保存，打印时将内容直接输入文本框后就可轻松实现明信片的打印了。不过这种方法不适宜明信片的批量打印，而且打印数据不能存储。 二、用Excel函数制作套打模板 1.新建一个Excel工作簿，将表Sheet1命名为“打印模板”，将表Sheet2命名为“数据源”，打开数据源工作表，建立如图3所示数据，该数据将和打印模版关联。 2.打开打印模板工作表，点击A1单元格，将扫描好的明信片图片插入工作表中，打开“设置图片格式”对话框，将“图片线条”定为黑色实线，“大小”设为原图比例，在“属性”选项卡中取消“打印对象”复选框，然后按下“确定”按钮。 3.执行“视图→工具栏→绘图”命令，在明信片相应部位插入矩形框，如图4。设置矩形框格式，包括字体，大小、对齐、颜色和线条等，特别是将“边线”设为白色。 4.在A22-G22，A24-D24单元格中依次输入“序号、邮编1”等字段（如图4），利用VLOOKUP函数建立数据源和打印模板之间的联系。 我们将A23单元格作为查询的关键数值，在B24单元格中输入公式：“＝VLOOKUP（A23，数据源!A2：K152，2）”，在C24单元格中输入公式：“＝VLOOKUP（A23，数据源!A2：K152，3）”，其他以此类推。这样就建立了打印模板与数据源间的关联。下一步就是要建立所查询的数据与相应矩形框的关联，以邮政编码第一个字符所在的矩形框为例，鼠标单击该矩形框，在编辑栏右侧输入“＝”符号，然后用鼠标点击需要填入数据的B23单元格，这样矩形框就和B23单元格中的数据建立了联系，在A23单元格输入序号值，那么数据源工作表相应序号行的数据就会在打印模板中自动生成。 5.编写VBA代码。执行“工具→宏→VisulBasic编辑器”命令，在VisulBasic编辑器中选择“插入→添加模块”，插入模块1，在代码窗口输入以下代码： Sub打印（） Application.ScreenUpdating＝False＇关闭执行程序时发生的屏幕更新，加快运行速度。 OnErrorGoToPro1：Sheets（“Sheet1”）.SelectX＝InputBox（“请输入打印起始记录号：”） Y＝InputBox（“请输入打印结束记录号：”） Fori＝XToYCells（23，1）＝i＇在B13单元格中填入数值i（记录号） ActiveWindow.SelectedSheets.PrintOut NextiPro1：EndSub上述代码输入完成后，保存并关闭VBA编辑窗口。将图片所在的单元格区域设定为打印区域。执行“视图→工具栏→窗体”命令，在图片区域外拖出一个命令按钮，并指定刚才建立的宏，将按钮名称命名为“打印”，这样，按下按钮就可以实现明信片的批量打印了。 三、用Word邮件合并制作打印模板 除了上述两种方法外，我们用Word的邮件合并功能也可实现明信片的批量打印。具体方法如下： 1.建立