IT仕事 MS Access

フォームを直接Accessで印刷プレビューし、閉じるときのイベントで処理をしたい

投稿日:

困ったこと:

前提として、自分とこのシステムは、フォームを直接Accessで印刷プレビューして、そのまま印刷できるように作ってある。

しかし、リボンに印刷プレビューを閉じるボタンがある一方で、フォームの右に閉じるボタンが表示されているので、後者をユーザーが誤って押してしまうことがある。
すると印刷プレビューを終えるつもりがフォームを閉じることになってしまう。
再度、呼び出したいフォームを探して開くのは面倒・・・。

やりたかったこと:

リボンの印刷プレビューをクリックすると、フォームウィンドウを最大化してプレビューする(ここは簡単、DoCmd.Maximizeで)。
印刷プレビューを閉じると、フォームウィンドウのサイズが元に戻る(ここがわからん)。

難しかったこと:

印刷プレビューを閉じた際のイベントトリガーがAccessにあるのかないのかわからず、調べるのにずいぶん時間がかかった。

以下の達人のブログを拝見し、イベントを追跡する方法があることを発見し、フォームのプロパティの各所にイベントトラップを仕掛けて、調査した。感謝。
■T’sWare イベント徹底活用 1 ~フォームのオープン・クローズ~

できた:

フォームの「レコード移動時」イベントに記述した処理で、目的が達成できることを発見。
具体的には、以下のコードでOK。

Private Sub Form_Current()
'印刷プレビューから戻るときにフォームのサイズを変える
'■T'sWare イベント徹底活用 1 ~フォームのオープン・クローズ~
'http://tsware.jp/study/vol5/event_01.htm
    DoCmd.Restore
End Sub

-IT仕事, MS Access

執筆者:

関連記事

no image

AccessでレポートにMeキーワードを含む場合のコードの共通パーツ化

Accessで、レポートにMeキーワードを含む場合の、コードの共通パーツ化・標準モジュールへのまとめ化に悩んでいたら、こういう記事を見つけた。 標準モジュールで「Meキーワードの使用方法が不正です」 …

no image

パラメータクエリにパラメータをセットして実行した結果をデータシートで表示する」というコードの実行で3065エラー

Accessの仕様として、パラメータクエリだけが駄目なのかと思ったら、なんと選択クエリが駄目なのだそう。 理由は、Executeメソッドはアクションクエリのもので、選択クエリのものではないからだそう。 …

no image

2年ぶりくらいにルミーズカートを使おうとしたのだがうまくいかん

2年ぶりくらいにルミーズカートを使おうとしたのだがうまくいかん カートのバージョンはVer1.4.5。 早速、サーバへの設置がうまくいかない。 「非公開ディレクトリ」の設定をしたがどうもdbフォルダに …

no image

シリコングリス

会社で使っているノートPCの調子がおかしい。 液晶の上半分がブリンクしたように黒くちらつく。 それも、いつもなるのではなくて、使っていて突然そうなり、止まらなくなる。 Windowsを再起動してもダメ …

no image

仕事でイライラ。

こちらが要求しているのは、手間のかかることであり、かつ、一円もお金が引き出せないことだ。 それは、理解している。 それでも。 目の前の相手やその先の相手は、君の客ではないのか? 客という意識はないのか …