|
马上注册,结识高手,享用更多资源,轻松玩转三维网社区。
您需要 登录 才可以下载或查看,没有帐号?注册
x
本帖最后由 NC@jiang@nan 于 2017-6-21 17:07 编辑 - j. ?( N L9 P6 S3 Z/ O$ y2 l
9 ?+ {; C& A, b- e
各位大侠们,我今天突然想研究下SW批量打印某文件夹下所有的工程图的宏文件。因为打印时可能打印成PDF也可能直接打印到打印机,所以想在打印开始前可以调出选择打印机窗口的对话框,但不知道在SW API中用什么语句调用。在网上找到有EXCEL中调用打印机选择对话框的代码如下:
% | Y, ?) a5 E- y
% c9 I" a' r& U4 \ d4 rPrivate Sub Workbook_BeforePrint(Cancel As Boolean) 5 J" f* z* d- Z# f% Y# ]$ ^! ]
Dim dyj As Boolean'遍历打印机
& }8 R+ G6 ]$ ^% u5 f3 O, Ydyj = Application.Dialogs(xlDialogPrinterSetup).Show
3 A m/ E" L" @+ \If dyj = False Then
; }% v6 ]( A' d* ~# W MsgBox "打印取消!", 64, "系统信息"
$ j- b. U6 ]$ @; U" K7 _ Exit Sub3 Q' n. x9 g) _+ N. H
End If, @) P( E, d1 u/ N) ?: I* ]
ene Sub
0 Q3 z0 w( o; z2 X! V
& W1 e, W# \+ n" _, _" n
]$ p9 U% }6 v8 k7 w; I2 n经过实验,这代码在EXCEL中可以正常呼出打印机选择窗口,但在SW宏中总提示库不对之类的出错信息。(个人工作电脑不能上网,无法截图上传)。: C+ d3 m" I7 i, o5 G. k$ Q
水平有限,不知道在SW中到底怎么呼出这相同的选择界面,求各位大侠指点,特别恳请对SW应用水平达到让我敬仰的梁大、丹大等几位大侠中的大侠的指导。* z8 `- p$ y: y; e
谢谢。+ a' A+ B6 e# }0 F, b ?* {
|
|