用Word2003制作名片

用Word2003制作名片

ID:40868757

大小:41.00 KB

页数:7页

时间:2019-08-09

用Word2003制作名片_第1页
用Word2003制作名片_第2页
用Word2003制作名片_第3页
用Word2003制作名片_第4页
用Word2003制作名片_第5页
资源描述:

《用Word2003制作名片》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、在Word2003下名片制作模板   关键字:宏 名片模板     尽管Word2003提供的"向导"、"信封和标签";功能可以用来制作名片,但操作比较复杂,格式也不够灵活。我们用Word2003的宏创建一个名片制作模板,简单实用,甚至可以和专业的名片制作系统相媲美。用它进行实际名片设计、打印,效果非常理想。一、页面及图文框设置   首先,按标准的名片纸张规格定义纸张大小、页边距,并定义一个与名片尺寸相一致的图文框。   进入Word2000,在"文件"菜单中选择"页面设置"命令。选定"纸型"卡,指定

2、"宽度"和"高度"分别为19.5厘米和29.5厘米(标准名片纸张规格)。选定"页边距"卡,指定上、下、左、右边距均为0.7厘米。单击"确定"按钮,退出"页面设置"。   从"插入"菜单中选择"文本框

3、横排"命令,在当前文档空白处拖动鼠标,任意画一个文本框。从"格式"菜单中选择"文本框"命令,在"文本框"卡中,单击"转换为图文框"按钮,确认后,再选"格式

4、图文框"菜单,设置固定宽度、高度值分别为8.6厘米和5.4厘米(标准名片规格)。单击"确定"按钮,退出"图文框"设置。

5、   从"格式"菜单中选择"边框和底纹"命令,在"边框"卡中,设置"无"边框。单击"确定"按钮,将图文框的边框取消。二、定义"复制排版"工具按钮   接下来,我们定义一个"复制排版"工具按钮,用来将设计好的单个名片样板复制10份并均匀地排列在整张名片纸上。   选中图文框,选择"工具

6、宏

7、宏录制"菜单。在"宏录制"对话框中:①指定一个宏名--"复制排版";②指定将宏保存在当前文档;③单击"工具栏"按钮,弹出"自定义"对话框。   在"自定义"对话框的"工具栏"卡中,单

8、击"新建"按钮。指定工具栏名为"名片",工具栏的有效范围为当前文档,然后"确定"。   在"自定义"对话框的"命令"卡中,将宏"Project.NewMacros.复制排版"拖动到新建工具栏。单击"更改所选内容"按钮,修改工具栏按钮名为"复制排版"。   "关闭"自定义对话框,"停止"宏录制。   用"工具

9、宏

10、宏"菜单,选择前面定义宏"复制排版",单击"编辑"按钮,进入编辑状态。   将以下代码输入或复制进去:Selection.Cut'剪切选中的图文框Fork=1T

11、o10'粘贴10次Selection.PasteNextSelection.MoveLeftUnit:=wdItem'选中第1个图文框WithSelection.Frames(1).HorizontalPosition=wdFrameLeft'水平相对于页边距、左侧.RelativeHorizontalPosition=wdRelativeHorizontalPositionMargin.VerticalPosition=wdFrameBottom'垂直相对于页边距、低端.RelativeVerticalPosit

12、ion=wdRelativeVerticalPositionMarginEndWithSelection.MoveLeftUnit:=wdItem'选中第2个图文框WithSelection.Frames(1).HorizontalPosition=wdFrameRight'水平相对于页边距、右侧.RelativeHorizontalPosition=wdRelativeHorizontalPositionMargin.VerticalPosition=wdFrameBottom'垂直相对于页边距、低端.Relati

13、veVerticalPosition=wdRelativeVerticalPositionMarginEndWithSelection.MoveLeftUnit:=wdItem'选中第3个图文框WithSelection.Frames(1).HorizontalPosition=wdFrameRight'水平相对于页边距、右侧.RelativeHorizontalPosition=wdRelativeHorizontalPositionMargin.VerticalPosition=CentimetersToPoint

14、s(17.7)'垂直相对于页面、17.7厘米.RelativeVerticalPosition=wdRelativeVerticalPositionPageEndWithSelection.MoveLeftUnit:=wdItem'选中第4个图文框WithSelection.Frames(1).Ho

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。