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

HTML整形関係の秀丸マクロ

久々の投稿。 自分のHTMLファイルの作成スタイルは、 1.Artisteerでおおざっぱなデザインを決める。 2.同ソフトでHTMLソース(またはWPテンプレート)を出力する。 3.ソースを秀丸&F …

OneDriveに不安

最近、マイクロソフトのOffice365のサービスを使ってみている。 定額でOfficeを5台までの自分のPCにインストールできるし、期待以上に使い勝手はいい。 しかし今日、OneDriveを使ってみ …

no image

PSPでスライスツール

以前に覚えたのだがいざ使う段になると忘れていた昨日。なのでメモ。 1.Photoshopでガイドラインを引く。 2.スライスツールを選択し、ガイドラインの角から対角線を引くように選択。 3.続けて切り …

no image

IP電話

呉西のケーブルテレビ会社にIP電話を申し込んだら、 「トラブルが多いから内規で設置申し込みを受け付けないようにしている。公表してないが」 と、そこの営業さん。 ここ、市が運営してるところじゃなかったっ …

no image

小矢部のお客さんからナスとキュウリをもらった。

嬉しい。 最近、なにかと地元の野菜をもらうことがなぜか多い。 なによりすごく嬉しい。 新鮮だし安全だしおいしいから。