频道首页 | 行业资讯 | 市场研究 | 政府采购 | 行情前线 | 产品导购 | 产品评测 | 聪聪学堂
IT市场 | 笔记本 | MP3 | DC | 蓝牙 | 耗材| 打印机| 路由器| 服务器 | 2006年IT行业网展会
慧聪网首页 > IT行业 > 打印机
行业搜索
比例随心变换!Word文档缩放打印要更自由点
2006年6月26日 11:43  来源:现代计算机
  在Word中打印文档时,经常需要按照一定比例缩放或扩大。而在Word自带的缩放打印功能中,只能按照Word提供的几种模式版面来缩放文档(如在1张A4纸上打印2版、4版等,而要将文档打印在A4纸的1/4版上则无法实现),却不能按照任意比例缩放。下面咱们来动动手,让Word缩放打印给你更自由的天空。

  一、设计打印窗体

  1.插入窗体

  启动Word,执行“工具→宏→Visual Basic编辑器”命令,在弹出的代码窗口中,激活左侧的“工程资源管理器”窗口中的“Normal”对象,然后单击代码窗口菜单栏上的“插入”按钮,在下拉菜单中选择“用户窗体”命令,此时,编辑器为工程自动生成一个空白的窗体UserForm1,将该窗体的Caption属性改为“缩放打印”(图1)。

  2.添加控件

  要实现图2的效果,需要添加2个标签控件、2个文字框和一个命令按钮。具体步骤如下:执行“视图→工具箱”命令,打开“工具箱”对话框,单击[标签]按钮,在图一所示的窗体编辑窗口上插入Label1控件,并将控件名称改成“缩放比例(长)”,用同样的方法,再依次插入Label2控件和1个命令按钮,将名称改为“缩放比例(高)”和“打印”。最后向窗体插入2个文字框,并且按图2的版式进行编排。

  二、编写代码

  在窗体编辑窗口中,双击新添加的“打印”按钮,进入“Visual Basic编辑器”,编辑该按钮的单击响应代码如下所示。

  Private Sub CommandButton1_Click()

  ActiveDocument.PrintOut _

  printzoompaperwidth:= _

  Val(TextBox1.Text) * (8.5 * 1440), _

  printzoompaperheight:= _

  Val(TextBox2.Text) * (11 * 1440)

  UserForm1.Hide

  End Sub

  该代码显示了打印区域的大小变化。为了操作方便,我们还需编写一段宏代码来调用这个窗体。方法如下:在“Normal”对象下,插入模块1,在代码窗口中输入以下代码:

  Sub show()

  UserForm1.Show

  End Sub

  输入完成后,关闭VBA窗口,返回到Word编辑窗口。

  三、将程序添加到菜单中

  由于每次打印文档时,都要执行“工具→宏→宏”命令,在宏对话框中运行宏“show”,这样不是很方便,所以还需要将它添加到菜单中。

  在Word文档编辑模式下,执行“工具→自定义”命令,打开“自定义”对话框,在“类别”下拉列表中选择“宏”(图3)。同时在右边的“命令”下拉列表中找到刚刚编写的宏,选中并按住鼠标左键,将它拖曳到菜单栏上。在添加的菜单命令上单击鼠标右键,在“命名”文本框中输入新名称“缩放打印”。最后关闭“自定义”对话框。

  打印文档时,单击“缩放打印”按钮,系统弹出图2所示的窗体,输入缩放比例,点击“打印”按钮,文档就会按要求自动打印出来了。

  小提示:在本例中,读者可以按照任意比例缩小并打印文档。由于文档允许扩大的最大数字为32767,我们在代码中已将纸张设置为:高11×1440、宽为8.5×1440,因此,将文档扩大打印时,会受一定比例限制。

 
 [关键词]:打印机 一体机 传真机  发表评论    【推荐】 【打印

相关文章 更多 
·05《超女》冠军 李宇春打印样张下载  (6.26 10:45)
·Photoshop精彩实例 新方法制作怀旧照片  (6.22 8:52)
·世界杯球星广告壁纸  (6.20 16:35)
·多实用!12大品牌打印机驱动下载大全  (6.20 8:14)
·长期闲置的喷墨打印机应该如何保养  (6.19 12:8)
·了解暗藏的种种秘笈 佳能喷墨打印技术剖析  (6.19 11:35)
·解决奇怪故障提示 让网络打印机用得更顺畅!  (6.19 11:21)
·自己动手打印世界杯个性T恤  (6.19 11:19)
·激光打印机工作原理与系统解析  (6.16 10:7)
·长期闲置喷墨打印机应如何保养  (6.16 6:53)
我来评两句〖查看最新评论〗 
请您注意:
·遵守中华人民共和国的各项有关法律法规
·承担一切因您的行为而导致的法律责任
·本网留言板管理人员有权删除其管辖留言内容
·您在本网的留言,本网有权在网站内转载或引用
·参与本留言即表明您已经阅读并接受上述条款
昵称:匿名

文字广告
产品导购
DIY劝败 4大理由买锋行双核3600+整机
·运筹帷幄 近期最值得购..
·狂降至2888元!三星旗..
·[上海]不是名牌我不要..
·最大跌幅900元 近期D..
产品交易市场
·路由器价格狂降优惠多
·数码相机伴侣价格超低
·求购视频分配器
·求购管家婆服装版
·紧急求购 手机原装电池
·主流时尚笔记本
·精彩专题金诺数码
市场分析
·降价+促销 2006年暑促..
·英特尔取消PC返点 厂商..
·2006年5月最受关注前五..
·2006年5月最受关注的前..
·2006年5月中国MP4播放..
·2006年中国家用电脑市..
·2006年全球笔记本生产..
14秒SPT打印技术 评测惠普3308一体机
数码冲印店专用 驰能照片打印机评测