Word2000下创建名片制作模板(转)
尽管Word2000提供的"向导"、"信封和标签";功能可以用来制作名片,但操作比较复杂,格式也不够灵活。我们用Word2000的宏创建一个名片制作模板,简单实用,甚至可以和专业的名片制作系统相媲美。用它进行实际名片设计、打印,效果非常理想。
一、页面及图文框设置
首先,按标准的名片纸张规格定义纸张大小、页边距,并定义一个与名片尺寸相一致的图文框。
进入Word 2000,在"文件"菜单中选择"页面设置"命令。选定"纸型"卡,指定"宽度"和"高度"分别为19.5厘米和29.5厘米(标准名片纸张规格)。选定"页边距"卡,指定上、下、左、右边距均为0.7厘米。单击"确定"按钮,退出"页面设置"。
从"插入"菜单中选择"文本框|横排"命令,在当前文档空白处拖动鼠标,任意画一个文本框。从"格式"菜单中选择"文本框"命令,在"文本框"卡中,单击"转换为图文框"按钮,确认后,再选"格式|图文框"菜单,设置固定宽度、高度值分别为8.6厘米和5.4厘米(标准名片规格)。单击"确定"按钮,退出"图文框"设置。
从"格式"菜单中选择"边框和底纹"命令,在"边框"卡中,设置"无"边框。单击"确定"按钮,将图文框的边框取消。
二、定义"复制排版"工具按钮
接下来,我们定义一个"复制排版"工具按钮,用来将设计好的单个名片样板复制10份并均匀地排列在整张名片纸上。
选中图文框,选择"工具|宏|宏录制"菜单。在"宏录制"对话框中:
①指定一个宏名--"复制排版";
②指定将宏保存在当前文档; ③单击"工具栏"按钮,弹出"自定义"对话框。
在"自定义"对话框的"工具栏"卡中,单击"新建"按钮。指定工具栏名为"名片",工具栏的有效范围为当前文档,然后"确定"。
在"自定义"对话框的"命令"卡中,将宏"Project.NewMacros.复制排版"拖动到新建工具栏。单击"更改所选内容"按钮,修改工具栏按钮名为"复制排版"。
"关闭"自定义对话框,"停止"宏录制。
用"工具|宏|宏"菜单,选择前面定义宏"复制排版",单击"编辑"按钮,进入编辑状态。
将以下代码输入或复制进去:
Selection.Cut '剪切选中的图文框
For k = 1 To 10 '粘贴10次
Selection.Paste
Next
Selection.MoveLeft Unit:=wdItem '选中第1个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameLeft '水平相对于页边距、左侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = wdFrameBottom '垂直相对于页边距、低端 .RelativeVerticalPosition = wdRelativeVerticalPositionMargin
End With
Selection.MoveLeft Unit:=wdItem '选中第2个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameRight '水平相对于页边距、右侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = wdFrameBottom '垂直相对于页边距、低端 .RelativeVerticalPosition = wdRelativeVerticalPositionMargin
End With
Selection.MoveLeft Unit:=wdItem '选中第3个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameRight '水平相对于页边距、右侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = CentimetersToPoints(17.7) '垂直相对于页面、17.7厘米 .RelativeVerticalPosition = wdRelativeVerticalPositionPage
End With
Selection.MoveLeft Unit:=wdItem '选中第4个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameLeft '水平相对于页边距、左侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = CentimetersToPoints(17.7) '垂直相对于页面、17.7厘米 .RelativeVerticalPosition = wdRelativeVerticalPositionPage
End With
Selection.MoveLeft Unit:=wdItem '选中第5个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameLeft '水平相对于页边距、左侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = wdFrameCenter '垂直相对于页边距、居中 .RelativeVerticalPosition =wdRelativeVerticalPositionMargin
End With
Selection.MoveLeft Unit:=wdItem '选中第6个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameRight '水平相对于页边距、右侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = wdFrameCenter '垂直相对于页边距、居中 .RelativeVerticalPosition =wdRelativeVerticalPositionMargin
End With
Selection.MoveLeft Unit:=wdItem '选中第7个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameRight '水平相对于页边距、右侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = CentimetersToPoints(6.4) '垂直相对于页面、6.4厘米 .RelativeVerticalPosition = wdRelativeVerticalPositionPage
End With
Selection.MoveLeft Unit:=wdItem '选中第8个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameLeft '水平相对于页边距、左侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = CentimetersToPoints(6.4) '垂直相对于页面、6.4厘米 .RelativeVerticalPosition = wdRelativeVerticalPositionPage
End With
Selection.MoveLeft Unit:=wdItem '选中第9个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameRight '水平相对于页边距、右侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = wdFrameTop '垂直相对于页边距、顶端 .RelativeVerticalPosition = wdRelativeVerticalPositionMargin
End With
Selection.MoveLeft Unit:=wdItem '选中第10个图文框
With Selection.Frames(1)
.HorizontalPosition = wdFrameLeft '水平相对于页边距、左侧
.RelativeHorizontalPosition = wdRelativeHorizontalPositionMargin .VerticalPosition = wdFrameTop '垂直相对于页边距、顶端 .RelativeVerticalPosition = wdRelativeVerticalPositionMargin
End With
最后,关闭宏编辑器,用"另存为"菜单,将文档保存为"文档模板",取名"名片模板"。整个一个名片制作模板即告完成。
三、使用方法
用前面的方法建立一个名片模板后,可随时方便地用它来设计、打印名片,可谓一劳永逸。
1. 直接用鼠标双击"名片模板"或进入WORD后,打开"名片模板"。
2. 在图文框中输入名片的具体内容、设置字体字号、进行排版,也可以插入图片和进行艺术加工,设计出一张名片样板。 3. 选中名片样板图文框。 4. 单击"名片"工具栏上的"复制排版" 按钮,Word便自动将设计好的名片样板复制10份并均匀地排列在整张名片纸上。 5. 用"文件"菜单中的"打印"命令将整联名片打印输出。 6.如果需要,可"另存为"一个Word文档。
以上操作简单、方便、高效,读者不妨试一试。
来自 “ ITPUB博客 ” ,链接:http://blog.itpub.net/14102/viewspace-115507/,如需转载,请注明出处,否则将追究法律责任。
转载于:http://blog.itpub.net/14102/viewspace-115507/
Word2000下创建名片制作模板(转)相关推荐
- 网站制作模板下载之后如何使用
对于网站制作模板下载以后如何使用呢?首先,企业应该了解自己下载网站制作模板的程序.因为不同的程序它的使用方式是不同的.现在市面上比较流行的网站制作模板的制作程序就是程序,这个程序是开源源码,使用的人比 ...
- springboot下生成复杂word文档方案 在Word软件里面制作模板
系列文章目录 第二章:根据模板导出word,复合格式表格生成.可变列表格生成 第三章:doc和docx插入多图 第四章:web环境下word文档预览 springboot freemarker 生成复 ...
- 名片制作:25款现代名片设计实例及模板
名片是一个企业最重要和最符合成本效益的营销工具之一,尤其是对于刚刚起步的企业.然而,名片如果设计不好,往往错失给人留下深刻印象的机会.这里收集了25款现代名片设计实例,在文章结尾,您可以下载免费的名片 ...
- linux系统制作裸设备,在unix下和linux下创建裸设备总结
(一)AIX下创建裸设备: 1.创建VG卷组: #mkvg -S -y'datavg' -s'128'hdisk1 hdisk2.... 其中:-S表示创建scalable-type的VG:-y表示创 ...
- 详解linux下auto工具制作Makefile源码包(制作篇)
2019独角兽企业重金招聘Python工程师标准>>> 详解linux下auto工具制作Makefile源码包(制作篇) 水木杨 一. 概述 为了更好的制作configure ...
- Java报表工具技巧--如何在Style Report创建用户自定义报表模板
2019独角兽企业重金招聘Python工程师标准>>> 曾经讨论过自定义报表设计的思路,此篇文章旨在用Style Report创建用户自定义报表模板的过程,体验一下自定义报表设计的新 ...
- 使用 .NET Core模板引擎创建自定义的模板和项目
本文要点 .NET CLI 包含了一个模板引擎,它可以直接利用命令行创建新项目和项目项.这就是"dotnet new"命令. 默认模板集涵盖了默认控制台和基于 ASP.NET 的应 ...
- cnsl是什么意思_VS2010下创建静态链接库和动态链接库
VS2010下创建静态链接库和动态链接库 类封装成dll如果你的工作长期与某个领域相关,比如说长期做直接体绘制 (DVR)方面的开发,那么你可能经常使用自己的传递函数类,如果每一个工程你都把传递函数类 ...
- CentOS下使用rpm-build制作nginx的RPM包
一.RPM包的分类 RPM有五种基本的操作功能:安装.卸载.升级.查询和验证. linux软件包分为两大类: (1)二进制类包,包括rpm安装包(一般分为i386和x86等几种) (2)源码类包,源码 ...
最新文章
- Javascript中函数提升和变量提升
- Ping一下Github,确认本地DNS无法解析方法
- BZOJ 1020——[SHOI2008]安全的航线flight
- ubuntu apt 相关命令
- python常见内置函数_python常见的内置函数
- 元素或为1或为-1的行列式的值的估计
- dataframe 一列的不同值_python数据分析包|Pandas-02之缺失值(NA)处理
- 计算机概论在线阅读,计算器概论 or 计算机概论
- [Ahoi2013]连通图
- HDU1225 字符串
- 停止页面定时刷新_Flutter实现倒计时功能、定时任务功能
- 【SSO-CAS】sso 之 cas 实现的几个问题
- Xlib: connection to :0.0 refused by server解决方法
- PHP+新浪微博开放平台+新浪云平台(SAE)
- java生成二维码(底部添加文字+linux安装微软雅黑)
- mt2503 [ShapeEngine]泰语音标字符发生偏移
- 关于笔记本电脑插上网线没反应的解决方案
- 2020-8-15 无线充电原理和注意事项 WCP/铁氧体
- FXCM富汇官网:通过十个问题学习外汇知识
- 程序设计入门C语言 --- 时间换算