印刷ダイアログを非表示-Microsoft VBS


0

コンテキスト:Windowsで、ユーザーがログオンしているかどうかにかかわらず、特定の時間にファイルを自動的に印刷するタスクを作成しようとしています。

この方法でタスクを実行するために、プログラムまたはスクリプトはほとんど完全にサイレントであることをWebで読みました。

私はExcelファイルを開いてマクロを完全に静かに実行できましたが、最後には次のようなウィンドウのダイアログがあります:

これは、ドキュメントの印刷に使用するExcelマクロです

Private Sub Auto_Open()

   'To print use:
   ThisWorkbook.Sheets("Report").PrintOut 1, 1, 1, False

End Sub

「印刷中....」

質問 そのダイアログを非表示にするにはどうすればよいですか?

これは私が現在使用しているVBSスクリプトです。

Option Explicit

On Error Resume Next

ExcelMacroExample

Sub ExcelMacroExample()

  Dim xlApp
  Dim xlBook

  Set xlApp = CreateObject("Excel.Application")
  Set xlBook = xlApp.Workbooks.Open("C:\Users\Public\test.xlsm", 0, False)
  xlApp.Run "Auto_Open"
  xlApp.Quit

  Set xlBook = Nothing
  Set xlApp = Nothing

End Sub

Open関数のオプションをFalseとTrueの間で変更してみましたが、同じでした。


実行されている別のマクロがありますか?それとも一部を共有できますか?
glh

APIは、印刷ダイアログが内部機能であるという唯一の希望広告だと思います。使用方法については、access.mvps.org / access / api / api0037.htmをご覧ください。
glh

コード@glh
KoU_warch

@glhのウェブサイトには、The Printing dialog is an internal Access dialog, and as such, cannot be hidden directly from codeそれで希望はありませんか?ダイアログがまったく開かないようにする必要があります
-KoU_warch
弊社のサイトを使用することにより、あなたは弊社のクッキーポリシーおよびプライバシーポリシーを読み、理解したものとみなされます。
Licensed under cc by-sa 3.0 with attribution required.