有关打印的

hrq145

如何
If ChkPrint Then
    ChkPrint.Caption = "打印"
    ChkPrint.BackColor = RGB(255, 255, 0)
    ChkPrint.ForeColor = RGB(0, 0, 0)
  
Else
    ChkPrint.Caption = "不打印"
    ChkPrint.BackColor = RGB(192, 192, 192)
    ChkPrint.ForeColor = RGB(128, 128, 128)
End If

End Sub
如何加入指定的打印机机设置

类似这个代码
  If Application.Dialogs(xlDialogPrinterSetup).Show Then _
   ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True

无聊的疯子

看不懂你在说啥！！在说详细点呢？

hwc2ycy

你是要进行页面设置还是要选择打印机？

夫子会学

我是看不懂，没想到大师也看不明白。

hrq145

hwc2ycy 发表于 2013-6-2 09:01
你是要进行页面设置还是要选择打印机？

当打勾之后，要选择打印机？或者自动选择好打印机

hrq145

hwc2ycy 发表于 2013-6-2 09:01
你是要进行页面设置还是要选择打印机？

2013-6-2 12:22 上传
下载附件 (7.88 KB)


当打勾之后，要选择打印机？或者自动选择好打印机

hwc2ycy

hrq145 发表于 2013-6-5 00:15
2013-6-2 12:22 上传
下载附件 (7.88 KB)

打勾不是不打印么，

hrq145

hwc2ycy 发表于 2013-6-5 06:44
打勾不是不打印么，

是的，钩了看下要那台打印机打印，

hrq145

hrq145 发表于 2013-6-5 12:52
是的，钩了看下要那台打印机打印，

是的，钩了看下要那台打印机打印