[求助]打印时无法确定图框所在的布局

xuxt

我们公司画施工图不喜欢在布局中一个布局只放一张图，而是在一个布局中放很多个图框，为此打印很是头疼。

我写了个批量打印程序，方法如下：

1、先是全选图中名为“图框”的块，

        Set SS_Frm = ThisDrawing.SelectionSets.Add("SS_PlotFrm")
       
        ReDim Preserve FltType(0)
        ReDim Preserve FltData(0)
        FltType(0) = 2
        FltData(0) = "图框"
        SS_Frm.Select acSelectionSetAll, , , FltType, FltData

2、再根据块的尺寸，GetBoundingBox，取得打印区域，然后进行批量打印。

程序运行的结果是输出的图纸页数与选中的图框的块的个数是相同的，但是有的图纸打出来不对，我仔细对照发现，在当前激活的布局中的图框打印出来是正确的，而在其它布局中的图框则是打印不正确，按这个现象那么，只要打印某个图框时激活相应的布局就可以了，那么就是要确定某个图框在哪个布局上，但是我找不到哪个语句可以实现，请路过的各位大侠帮助，如果有其它的方法实现也可以，希望能提供一点思路，先谢啦。

我的QQ是106548763，

xuxt

怎么没有人回复呢，是不是没人看到这个贴子

fjfhgdwfn

这个好像没有办法解决。他的选择和在CAD中手工选择是不一样的。

不要全选了。用窗口选再打印了。

xuxt

用窗选的话，就达不到自动批量打印的效果了。或者还有没有其它的思路呢

fjfhgdwfn

xuxt发表于2008-11-21 20:49:00用窗选的话，就达不到自动批量打印的效果了。或者还有没有其它的思路呢

在模型中和布局中窗选循环了。一样的批打。

xuxt

谢谢fjfhgdwfn，我已解决，我没有使用窗选的方法，而是使用的是布局块分别列举的方法来实现。