VB6.0でWORDファイルを印刷する機能を作成しています。
ボタンを押して指定のファイルを印刷する際、
完全にバックグラウンドで印刷したいのですが、
どうしても「印刷中」のダイアログが出てしまいます。
ソースは以下のとおりです。
Dim wd As Word.Application
Set wd = CreateObject("Word.Application")
wd.Visible = False
wd.Documents.Open FileName:="D:\sample.doc", ReadOnly:=True
wd.Options.PrintBackground = False
wd.ActiveDocument.PrintOut
wd.ActiveDocument.Close
wd.Quit
Set wd = Nothing
ダイアログを制御するプロパティは存在しないのでしょうか?
ご指導のほどよろしくお願い致します。
A 回答 (5件)
- 最新から表示
- 回答順に表示
No.5
- 回答日時:
<backgroundをtrueにすると、
<「印刷中です、wordを終了すると印刷待ちの全てのジ<ョブがキャンセルされます。wordを終了しますか?」
<というメッセージが出てしまうのです。
<それを避けるためにfalseにしています
とありますが、
background=trueにして
wd.DisplayAlerts = wdAlertsNone
とすればどうでしょう??
私自身WORDではなく、EXCELでは検証済みです。
DisplayAlertsは、警告・メッセージを表示する/しないを制御できます。
No.4
- 回答日時:
Excel VBA です。
Private Sub WordPrintBackground()
Dim doc As Word.Document
Set doc = CreateObject("C:\10pages.doc")
With doc
Call .Activate ' 必要?
Call .PrintOut(True)
While 0 < .Application.BackgroundPrintingStatus
' 不要? DoEvents
Wend
Call .Close(False)
End With
End Sub
やっぱり、ダメですか?
No.3
- 回答日時:
VB_A_です。
With doc
Call .PrintOut(True)
While 0 < .Application.BackgroundPrintingStatus
DoEvents
Wend
Call .Close(False)
End With
この回答への補足
お世話になります。
アドバイスいただいた方法を試してみましたが、
やはりダイアログが出てしまいます。
やはり完全なバックグラウンドでの印刷は無理なのでしょうか?・・・・・
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) フォルダ内のワードファイルをPDFに一括変換するVBA 3 2023/06/09 16:51
- Visual Basic(VBA) 【VBA】印刷マクロのループ処理が反映されません 3 2022/08/09 02:15
- Visual Basic(VBA) DisplayAlertsブロパティで ”実行時エラー424オブジェクトが必要です” 5 2022/05/15 18:02
- Visual Basic(VBA) Accessフォームで全レコードを指定のExcelのセルへ転送し印刷する方法について 2 2022/09/08 18:23
- Visual Basic(VBA) VBA★PDFをPDFアプリで印刷しようと思っていますが上手くゆきません 1 2022/06/06 22:04
- Excel(エクセル) 【マクロ】webアドレスにて指定されたCSVファイル【excelソフト表示】を印刷する件 1 2023/02/15 01:52
- プリンタ・スキャナー 印刷出来ません...エプソン EP302 トラブルシューティングについて 7 2022/07/16 10:20
- Visual Basic(VBA) エクセルのマクロを使ってメールを送る方法について教えてください 2 2022/03/29 01:36
- ドライブ・ストレージ WD SSD DashboardとSanDisk SSD 1 2023/01/30 19:37
- CAD・DTP A3のWORDファイルをTIFFに変換したい 6 2022/12/15 16:00
このQ&Aを見た人はこんなQ&Aも見ています
-
プロが教える店舗&オフィスのセキュリティ対策術
中・小規模の店舗やオフィスのセキュリティセキュリティ対策について、プロにどう対策すべきか 何を注意すべきかを教えていただきました!
-
印刷ダイアログを表示させない方法
Visual Basic(VBA)
-
Excel VBA 「印刷中」メッセージを非表示にしたい
その他(プログラミング・Web制作)
-
印刷中ダイアログについて
Access(アクセス)
-
-
4
AccessVBAでレポートをPDFで出力
Visual Basic(VBA)
-
5
VB6上から印刷ダイアログを表示させずにPDFを作成したい
Visual Basic(VBA)
-
6
VBからPDFファイル自動生成するには
Visual Basic(VBA)
-
7
EXCEL VBA 印刷プレビューダイアログのボタン操作を判定したい
Visual Basic(VBA)
-
8
PDFファイルを開かずに印刷したい
Visual Basic(VBA)
-
9
ACCESS フォームをそのまま印刷について
その他(データベース)
-
10
ACCESSレポートをPDFに出力したい
その他(OS)
-
11
Acccess レポートをグループ別に出力する
Visual Basic(VBA)
-
12
Accessの画面更新を一時的に停止する方法。
その他(データベース)
-
13
ExcelのVBA。public変数の値が消える
Visual Basic(VBA)
-
14
印刷マクロ【エクセル】エクセルからワードを印刷する
その他(Microsoft Office)
-
15
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
16
エクセルVBAで手差しトレイを指定させたい。
Excel(エクセル)
-
17
Access2013でレポートを名前を付けて一括PDF化する方法
その他(データベース)
-
18
Excel VBAでPDFファイルをMicrosoft Print to PDFで出力したい
Visual Basic(VBA)
-
19
DATE型変数を初期化する方法
Visual Basic(VBA)
-
20
アクセスのレポートに、フォームで算出した数字を表示させたい
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
スプレッド(Spread 6) で縮小...
-
印刷ダイアログを表示させない方法
-
イベントプロシージャ 印刷が...
-
A4の2枚をA3の1枚にする編集方法?
-
クリレポのプリンタ設定について
-
vbaでPDFファイルが印刷されない
-
印刷要求順番と印刷出力順番が...
-
Eclipseを使ってソースを印刷し...
-
ActiveReportsを使って[印刷ダ...
-
PHPでPDFファイルの直接印刷
-
cプログラムを読んでいると put...
-
ファイルのパス指定での印刷方法
-
印刷ダイアログを表示させたくない
-
Crystal Report...
-
出力するプリンタを指定したい。
-
PHPでExcelファイルを直接印刷...
-
ActiveReportsの帳票印刷について
-
VBAでエクセルからワードへの差...
-
PHPでPDFの自動印刷
-
webページの印刷制限について
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
印刷ダイアログを表示させない方法
-
印刷要求順番と印刷出力順番が...
-
ACCESSで設定した帳票の用紙サ...
-
vbaでPDFファイルが印刷されない
-
プリンターを指定して印刷するには
-
印刷ダイアログを表示させたくない
-
VBAで不特定枚数印刷をしたいで...
-
VBAにて指定したセルをプルダウ...
-
VB.NET+ActiveReports で印刷...
-
ActiveReportsを使って[印刷ダ...
-
VBscriptでPDFファイルを直接印...
-
PDFファイルを印刷し終了するには
-
webページの印刷制限について
-
イベントプロシージャ 印刷が...
-
クリレポのプリンタ設定について
-
両面印刷設定方法について
-
ファイルのパス指定での印刷方法
-
Accessフォームで全レコードを...
-
VBSでExcelファイル印刷時のプ...
-
VBAで印刷スプール終了の判定を...
おすすめ情報