MS Access

Accessでレポートを印刷したいのにフォームが印刷されるトラブル

投稿日:

現象:全てではなく特定のPCで、チェックリストを出力しようとすると、バックで開いているフォームがプリントされる。

毎回起きるトラブルではなく、うまく出るときもある。

最初の対策:以下のブログを参考に、レポートの作業ウィンドウを固定した。

Accessの困った問題解決策①:レポートではなく、後ろのフォームが印刷されるのを回避する方法 |

次の対策:上記でやってもやっぱりフォームが印刷されてしまった。

別のチェックリストの出力では必ずうまくいくので、うまくいくレポートと、うまくいかないレポートで、自分の書いたプログラムのコードの差分を調べたところ、

うまくいくほうは、

1.リボンを最小化するコマンドを入れていた。Application.CommandBars.ExecuteMso “MinimizeRibbon” ウィンドウサイズを変えるタイミングでレポートがアクティブになる?

2.処理の直前にメッセージダイアログを入れていた。MsgBox(” “) これで強制的にレポートがアクティブになる?

自分の環境の場合、たいていは、1でOKみたい。

これでしばらく、様子見だ。

-MS Access

執筆者:

関連記事

no image

Accessで DoCmd.RunSQL を CurrentDb.Executeにしたら、1秒高速化した

処理が遅いので速くして欲しいとの要望があったので、コードを調査。 DoCmd.RunSQL を CurrentDb.Execute に置き換えると非同期で実行されるとの情報を得たので、試す。 結果、6 …

no image

フォーム テンプレート

Accessのフォームを作るときに、「フォーム テンプレート」を使う方法があること、知っている人は多いのかな? 既存のフォームにあるテキストボックスの色やサイズなどの設定(プロパティ)を引き継いで、新 …

no image

Accessでレコードコピー(オートナンバー除く)の決定版のコード!

Accessで、レコードのオートナンバーを除くフィールドを1行、複製(コピー)したくって、Google検索したのだけどなかなか出てこず、しかしやっと見つけた、黄金のソース・・・・。 [VBA] ADO …

no image

AccessのBeforeUpdateでUndo

BeforeUpdateプロシージャ内の処理で、Cancel = Trueとしたら更新がキャンセルされるところまではできたが、テキストボックスにNullを代入しようとしてエラーが出たりして、間違って入 …

no image

Accessでフォームフィルタの結果をExcelにエクスポートする

ちょっと、苦労した。 Private Sub cmdDMデータ作成_Click() On Error GoTo Err_cmdDMデータ作成_Click Dim rstf As String Dim …