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

Office2013のSELFCERT.EXEの場所

さがして、やっと見つかった。 自分のPC環境の場合は、以下だった。 C:\Program Files (x86)\Microsoft Office\Office15 参考にしたブログによっては、C:\ …

no image

テスト

FLASHファイル作成ソフトのFreeMotionを使って、アニメーション作りにチャレンジしている。 といっても、写真をパノラマスクロールするやつだけど。 造ったことのある人は簡単なんだろうけど、初め …

秀丸エクスプローラClassicをブックマークが開いた状態で起動したい

Googleを検索したら、誰もブログにやり方を書いていないみたい。 中途半端に面倒で、かつ中途半端に簡易だからだろう。 よって私が。 1.秀丸エクスプローラClassicのパスを調べておく。私の場合は …

no image

近況

最近忙しくて。 日記を書く位の暇はあるのだが、気力が無くて。 明日からも忙しいが、それでも近況をとりあえず、書いておこう。 昨日、セキュアドを受験。 結果はわからないが、とりあえず、終わった。 喜ばし …

no image

フリーブラシ

幾何学模様を使ったバナーをどうやって作るのか、よくわかっていない。 時間に追われ、いつも腐心して、それでもなんとかかんとか、それなりに作っているのだが、これではいけないと自分でも思っている。 今日は時 …