[原创]：VBA版 批量打印更新

lennie

老版本演示[/COLOR]
特点：
1、图名、图号可以自动提取（可以配合编写图纸目录）（图名、图号不是块属性，可以方便地自由编辑）
2、打印队列有顺序（出图有顺序 整理图纸就方便多了）
3、队列中的图纸可以指定不同的打印参数（包括使用不同的打印机、打印式样、纸张等几乎所有的打印参数）
4、配合第3点可以做到不同图幅的图纸用不同的纸张打印（一套图有多种图幅的情况非常普遍），通过简单设定即可一次出图
5、VBA执行速度较快（相对Lisp），出图快

[swf w=699 h=638]http://imgcash5.imageshack.us/img522/9720/82218168dr3.swf[/swf]

新版的改进以及未来的设想：
1、功能更加强大，不同的图纸可以具体指定参数
2、屏幕中选择框选的图框时，图框的图号和图名一定要在屏幕中显示，否则会提取失败（图元多时 ZOOMALL 消耗时间太多，故放弃）
3、界面变化较大，可以设定的参数更多
4、未来争取可以多文档执行（有些院图纸是一个文件一张图的）

casper14

能否提供个下载先？

smxsmx

怎么在做广告吗？

lennie

本来也是可以提供下载的，只不过因为VBA代码保密性太弱了，而且自己也不是专业开发的，代码里肯定有不少bug。放在这里主要是给正在搞这方面开发或者有这个打算的朋友一点思路。本人也是理正的fans，如果理正用arx搞这个功能，势必锦上添花，更进一步。

曹杰

一直在用秋枫兄的程序，感觉不错的

秋枫

我那个置顶的批量打印的贴子不知道给谁删掉了。

小毛草

最初由 秋枫 发布
[B]我那个置顶的批量打印的贴子不知道给谁删掉了。 [/B]

是的，前几天想下载找不了，希望QUN能加上！

秋枫

已经删掉了怎么加啊。
去我签名档的地址下载吧。

jack2913

秋风兄，为什么没找到你最新的下载文件了？

nainaide74

哪里有下载？

fengyunli

秋枫大哥，你给网址上不去呀

dhcad

模型空间的批量打印程序 v3.1.1
邱枫，2007年11月2日

程序简介：这是一个为AutoCAD2000以上版本设计的模型空间批量打印程序。程序根据自己判定的图框位置与尺寸，根据当前的打印机设置，自动调整打印的方式，实现批量打印。

免责声明：本程序仅提供作为应用上的参考, 而未声明或隐含任何保证；对于任何特殊用途之适应性, 以及商业销售所隐含作出的保证, 在此一概予以否认。

拒绝担保：拒绝任何责任担保，因使用该程序所致的全部风险及后果均由用户自己承担。

使用方法：直接在AutoCAD命令行上输入BPLOT或BatchPlot。

更新历史：


◆ 修正了一个重名处理的Bug 2007年11月2日 3.1.1
◆ 添加切分图纸为一张图一个dwg文件的功能 2007年10月30日 3.1.0
◆ 统一了PLT文件、布局、dwg文件的命名模块，添加使用特定图层的文字作为命名的方式 2007年10月30日 3.1.0Beta
◆ 修正了新的外框计算方法的一个坐标系转换错误 2007年8月14日 3.0.7
◆ 改进了对图块形式的图框的外框计算方法 2007年8月13日 3.0.6
◆ 自动去除重复的完全重合的图框 2007年7月13日 3.0.5
◆ 自动去除完全相互嵌套的图框（大框套小框）的情况 2007年7月13日 3.0.5
◆ 根据实际使用状况，使用特定图形的矩形PLINE作为图框时不再强行要求PLINE线全局宽度为0 2007年7月13日 3.0.5
◆ 去除只在模型空间中批量打印的限制 2007年7月13日 3.0.5
◆ 添加打印戳记选项与设置按钮 2006年6月1日 3.0.4
◆ 保存设置(按应用或确定)时不保存打印份数的值以免误操作 2006年6月1日
◆ 修正预览时按N时非正常退出的Bug 3.0.3
◆ 修正一个选择PLINE图框的Bug（2006年2月10日）3.0.2
◆ 添加“逐份打印”功能。（注意：逐份打印将耗用更多的计算机处理时间，2006年2月1日）
◆ 添加“应用”按钮。用于在不打印的情况下保存批量打印的设置（2006年2月1日）
◆ 添加命令DeleteBPlotData，用于清除保存在DWG图中的上次批量打印的数据（2006年2月1日）
◆ 在理正图框模式下添加支持的图层名"*-图框标题", "*-图框"（2006年2月1日）3.0.1
◆ 修正调试程序时的一个疏忽，把有用的代码注释掉了导致不能选取图块（7月22日）2.9.1
◆ 支持除理正图框层外的其它图层上的图框（封闭矩形PLINE）6月29日
◆ 支持反向打印（图纸旋转180度）6月29日
◆ 理正图框支持“*_TITLE”6月29日
◆ 添加支持“理正电气(ELE_TITLE)”图层的图框。(4月8日)
◆ 修正“在布局空间中强制使用模型空间线型比例”选项不起作用的问题(程序中笔误)(4月8日)
◆ 因DCS与UCS不一致而产生的Bug，Target系统变量（2005.2.24）
◆ 在状态栏显示比例与进度信息(7月5日)
◆ BUGFIX: 图块列表(7月5日)
◆ 提供打印多个Layout的功能（7月1日）
◆ 打印不出图框边线问题（6月30日）
◆ 在DWG文件中保存上次的批量打印设置（6月28日）
◆ 增加打印顺序调整功能（6月25日）
◆ 自动打印比例算法调整（6月25日）
◆ 支持在UCS下的图块图框（6月25日）
◆ 自动旋转设为可选。如选成不自动，可以在页面设置中调整方向（6月25日）
◆ 支持在UCS下的理正图框（6月24日）
◆ 2.2版。增加图纸偏移与居中选项（6月9日）
◆ 增加了一个打印份数的选项。
◆ 加入打印机驱动或打印机不存在时的出错处理。
◆ 第二版全面改写，新增对话框。
◆ 加入对理正图框的支持。
◆ 第一版。

简要使用说明：

◇ 图框：图框的判断方式
. 理正图框：判断依据————在图层*_TITLE或*-图框、*-图框标题层中的4个顶点的零宽度闭合多义线，程序就认为是理正的图框。
. 图块：这种情况，图框是图块。程序根据用户提供的数据判定。
. 图层：在指定图层中的4个顶点的零宽度闭合多义线，程序就认为是图框。
程序自动消除重复图框与相互嵌套的图框。

◇ 图块：图框为图块时的判断设置。可以从下列表中指定一个图块名告诉程序图框的图块名，或者用“拾取”按钮从图中点取一个图块样本指定图框。

◇ 输出方式：提供了3种输出方式。
. 直接批量打印，即以当前设置输出到打印机
. 批量生成布局。根据所选的图框生成布局，以后就无需模型空间批量打印程序了。可以使用标准的PLOT命令，打印所选择的布局。
. 生成PLT文件。根据设定生成。
. 切分图纸为单独DWG。这个是使用WBlock方式把每张图纸存成一个单独的DWG文件。应网友要求增加这个功能。
. 打印已有布局。以显示的标签顺序打印全部或选择的布局。这个命令比AutoCAD2005的Publish命令节省内存。有时在Publish命令无法正常工作时可以作为部分功能的替代。

◇ 选择批量打印图纸：这是最主要的一步。从图中选择图框，自动过滤非图框物体。当没有任何图纸选中时，预览与确定两个按钮是灰显不可用的。命令启动时自动记忆上次批量打印选择的图框。

◇ 亮显: 在图中以红色虚线框加叉表示当前选中的图纸。

◇ 打印设置：使用AutoCAD的页面设置命令对当前打印机、当前纸张大小、当前打印样式表进行设定。最后请点击“确定”或“OK”回到主对话框。无需设定窗选范围，居中打印，打印比例、旋转等等，因为本程序会根据选中的各个图纸的不同情况自动设定。
. 预设配置：用户可以从列表中选择一个预设配置。添加／删除／编辑预设配置列表在“打印设置..”对话框页面设置栏中点“添加(Add)”修改。
. 份数：打印份数会自动记忆上次的打印份数，因此打印前请小心设置，确认份数，以免多印。

◇ 打印比例：
. 自动比例：图纸大小与图框外轮廊线匹配，并对比例自动取整（一般建筑中用的整数比例），即允许图框有点误差，如果计算出比例为1:199.6之类的数值，自动取为1:200
. 适合图纸：图纸可打印区域与图框外轮廊线匹配，这样可以打印出外轮廓线。相当于AutoCAD标准比例中的"Scale To Fit"
. 固定比例：对所有选中的图纸使用指定的固定比例。需用户手动输入比例值。

◇ 图纸定位：
. 自动旋转：打印时自动 根据图框形状与纸张决定是否旋转90度打印。
. 自动 居中打印：打印时自动居中打印。
. 偏移：同AutoCAD标准Plot命令。需手动输入X, Y方向的偏移数值。

◇ 打印顺序：
. 按选择顺序：打印时按照在屏幕上选择图框时的顺序打印。
. 左→右，上→下：按先左右后上下的顺序打印。
. 上→下，左→右：按先上下后左右的顺序打印。
. 逆序：按前面设定的顺序的反向顺序打印。
. 逐份打印：多张图纸打印多份的情况下，按1，2，3，……，n；1，2，3……n的顺序打印；如不勾选这项，按1,1,1,…1;2,2,2,…2; …n,n,n,…n的顺序打印。使用逐份打印的方式需要计算机逐份处理，比较费时。

◇ 文件／布局名设置：在这里指定生成的布局名称、PLT文件名称或dwg文件名称。
. 名称：文件名。默认是当前的DWG文件名加"_" 如果勾选了自动编号，则依次在文件名后面加数字，如果碰到重名文件，自动数字加1直到不重名；如果没有勾选自动编号，若碰到重名，则自动修改原文件名为bak文件，用户自己根据需要删除。如果勾选了“用特定图层文字内容替换#LTEXT#”,则用图框范围内的指定图层上的TEXT物体的文字内容替换文件名中的#LTEXT#字样。用户可根据需要在这个文件名中增加#LTEXT#字样。
. 删除已有同前缀名的PLT文件。生成PLT文件前把目标目录的同前缀名的PLT文件删除。
. 保存位置：PLT保存的位置。默认为当前DWG文件位置。

◇ 布局设置： . 在布局中强制使用图纸空间的线型比例。这一项选中后，在生成的布局中打印也将使用模型空间的显示线型比例。

◇ 预览：依次预览各图

◇ 应用：用于在不打印的情况下保存批量打印的设置

◇ 确定：开始批量打印／生成布局／生成PLT文件

◇ 取消：退出，不保存设置

◇ 帮助：显示本文。

wyh4030

dsgvsfgfsagasdfgfasdgadfgadfgadfggfdsagsdfagasdfgfdsaasdfgasdfgfsadgh