“印刷中”メッセージを表示しない方法

Access2007でpdf出力などをOutputToで行った場合、”印刷中”のメッセージが表示されるが

これを非表示にする方法

①、システムの起動処理でUsercontrol =falseの時はなにも実行しないで処理を終了する

②、pdf出力時、実行中のadp(accdb)を別のインスタンスとして起動して出力する

コーディングサンプル

‘システムの起動処理

If Application.UserControl = False Then
Exit Function
End If

‘PDF出力

Set oAccess = CreateObject(“Access.Application”)
oAccess.AutomationSecurity = 1
oAccess.OpenAccessProject CurrentProject.FullName, False

oAccess.DoCmd.OutputTo acOutputReport, strRptName, “PDFFormat(*.pdf)”, strOutputPDFname, False, “”, 0

oAccess.CloseCurrentDatabase
Set oAccess = Nothing

Tagged with:
 

Recent Entries

コメントを残す

コメントを残す

メールアドレスが公開されることはありません。 * が付いている欄は必須項目です