adison 发表于 2005-4-4 20:39:00

使用VBA进行多文档打印时出现问题

我想同时打印多个CAD文档，使用如下语句，在CAD2002下没有问题，但在CAD2005下总是出现错误，请问该如何解决？急!多谢!我有多个文档需要打印
For Each DOC In Documents
                                                       DOC.Activate
                                                       DOC.ActiveLayout.ConfigName = ComboBox1.Text
                                                       DOC.ActiveLayout.StyleSheet = ComboBox3.Text
                                                       DOC.ActiveLayout.CanonicalMediaName = ComboBox2.Text
                                                       DOC.ActiveLayout.PlotRotation = IsRotate

                                                       If CheckBox1.Value = True Then
                                                                       Response = MsgBox("确定打印以下文档： " & msg & DOC.WindowTitle, Style)
                                                                               If Response = vbYes Then
                                                                                       DOC.Plot.PlotToDevice
                                                                       End If
                                                       Else
                                                                               DOC.Plot.PlotToDevice
                                                       End If
                       Next

neteasy 发表于 2005-4-5 23:09:00

打开选项，把如图的后台处理选项取消试一下。

mccad 发表于 2005-4-6 21:52:00

先用RefreshPlotDeviceInfo 方法对设备的信息进行刷新
页: [1]
查看完整版本: 使用VBA进行多文档打印时出现问题