wendy_tc 发表于 2004-7-18 23:35:00

请问各位专家，VBA里是不是没有设置打印样式的命令？

我正在试着编写一个打印程序，打印机名，纸张名都有相应的GET 和 SET语句，可打印样式名只有读取的语句，请问怎样设置当前的打印样式名称，谢谢

wendy_tc 发表于 2004-7-20 22:07:00

顶一下，希望有人能告诉我一下

CLARKLEE 发表于 2004-7-22 13:54:00

我来告诉你把


首先获得当前可用的所有的打印样式列表


styleNames = ThisDrawing.ActiveLayout.GetPlotStyleTableNames()<BR>然后将他们增加列表：                       <BR>                       For X = UBound(styleNames) To LBound(styleNames) Step -1<BR>                                                       ComboBox5.AddItem styleNames(X)<BR>                                               <BR>                       Next


然后选取列表值


x=combobox5.text


最后给打印样式属性附值


ThisDrawing.ActiveLayout.StyleSheet = X


ok了

wendy_tc 发表于 2004-7-22 22:31:00

太好了！谢谢！
页: [1]
查看完整版本: 请问各位专家，VBA里是不是没有设置打印样式的命令？