没有的ActivePrinter适用于嵌入式文件

  • Z时代
  • 2024-01-10
  • 分类：问答

在Control Panel> Printer and Faxes我的默认打印机，是HP LaserJet P2035 on Ne02:没有的ActivePrinter适用于嵌入式文件

我有连接到我的系统2台活跃打印机。

我想PrintOut与我的第二打印机，其是：HP LaserJet Pro MFP M127-M128 PCLmS on Ne01:

有这Sheet1

我PrintOut嵌入（作为图标）以上嵌入文档MS-Word文档。

我的代码是：

Sub PrintJob() 
    Dim ObjWord As Word.Application 
    Dim objDoc As Word.Document 
    'Initialization 
    ActiveSheet.OLEObjects("WDoc").Activate 
    Set ObjWord = GetObject(, "Word.Application") 
    ObjWord.Visible = False 
    Set objDoc = ObjWord.activedocument 
    Application.ActivePrinter = "HP LaserJet Pro MFP M127-M128 PCLmS on Ne01:" 
    objDoc.PrintOut 
End Sub

不幸的是，PrintOut与HP LaserJet P2035 on Ne02:打印机完成。因此，PrintOut不接受ActivePrinter参数。

点是PrintOut不断变化ActivePrinter是Worksheet打印时使用正确行事。 （如下）

Application.ActivePrinter="HP LaserJet Pro MFP M127-M128 PCLmS on Ne01:" 
ThisWorkbook.ActiveSheet.Printout

但问题是改变ActivePrinter和objDoc.PrintOut（第一上面的代码），是ActivePrinter是不是有效，PrintOut有我系统默认打印机完成。

以上是 没有的ActivePrinter适用于嵌入式文件 的全部内容， 来源链接： utcz.com/qa/264643.html

回到顶部