2017-12-15 10 views
1

私のユーザーフォームを印刷しようとしています。VBAを使用してユーザーフォームを印刷する

コード:エラー

DoCmd.PrintOut acPrintAll 

DoCmd.PrintOut 

Forms("frm_manager_stats_NEW").Printer.Orientation = acPRORLandscape 
DoCmd.PrintOut , 1, 1, acLow, 1, False 

私はまた、これらのコード行を試してみました コードを実行するためにコマンドボタンを押すと、デバッグにアクセスし、アプリケーションを押した後に終了するかどうかにかかわらず、デバッグを閉じるかデバッグするかを選択できます。

何が起こっていますか?

+0

エラーメッセージはありますか? –

+0

エラーはありません - アプリケーションが応答を停止し、アプリケーション全体が終了したことを示すアプリケーションデバッグを起動しました – dmorgan20

+0

dcmd.printoutの後と最初のカンマの前に 'acPages'を追加してみてください。また、フォームがロードされてアクティブであることを確認してください。 – wazz

答えて

0

まず、印刷プレビューモードでフォームを開いてから印刷してください(私のプロジェクトの のように)。

次の手順を実行してください。

DoCmd.OpenForm "YourUserFormName", acPreview 
If Screen.ActiveForm.Name = "YourUserFormName" Then 
DoCmd.PrintOut 
End If 

はこれを試してみて、それが私のために働いたようにうまくいけば、それはあなたのために動作します。

+0

それは何らかの理由でも動作しません。奇妙なことではない – dmorgan20

関連する問題