IT仕事 MS Access

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

投稿日:

困ったこと:

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

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

やりたかったこと:

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

難しかったこと:

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

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

できた:

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

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

-IT仕事, MS Access

執筆者:

関連記事

Chrome拡張機能isearでWebベースの受注管理システムのアシスト(めちゃ楽!)

毎日の仕事で、CSV入出力でのデータ消込ができないブラウザベースの受注管理システムを使っている(GoQってやつ)。 やりたいことは 未入金の注文データについて、その中から該当する複数ある注文番号でフィ …

no image

AptanaStudio1.0日本語化

AptanaStudio1.0をちょっと触っている。 日本語化をする方法がWebに少なかったので覚書。 http://mergedoc.sourceforge.jp/の「Pleiades 本体」の最新 …

no image

B2の送り状の印刷時に、どうしても3枚(無駄紙2枚)出てしまう。

クロネコヤマトのB2送り状ソフトを使っているのだが、標記の件で毎日いらいら。 今回、色々やって解決に至ったのでメモ。 やったこと: プリンタドライバの設定画面で、用紙サイズを変更したり、フィットページ …

no image

AccessでNot in だと Null が抽出されないのは

以下のページに詳しく。 ACCESS クエリ 条件以外のレコードを抽出するには? – Access(アクセス) 解決済 | 教えて!goo <http://oshiete.goo.n …

no image

Win7初体験・初トラブル

会社の人が初めてWin7入りPCを買ったので例によってトラブルに遭遇した。 ファイルサーバにアクセスしようとすると、「ネットワークパスワードを入力して下さい」のダイアログが出る。それでつながらない。 …