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

Gifzoってのを使ってみたのですが、スゴイ便利

スクリーンキャストを撮るのに、Gifzoってのを使ってみたのですが、スゴイ便利。 Gifzo – 宇宙一簡単なスクリーンキャスト共有 例えば、こんな感じに撮れる。 ちょっとした意思の疎通が …

no image

SqlServer 2008 Express R2 をインストールしようとしているのだが、最後の最後でうまくいかない

前回、試しに自分の普段のPCでSqlServer2008をインストールしたのだが、今回はサーバ(といってもXP)を対象に同様のことをしてみた。 しかしインストールの最後で「there was an e …

no image

imacrosの作成方法・自分用控え

ヤマトB2クラウドのオートログイン(imacros)の作成方法、控え 1.Chromeのimacros拡張機能がインストールされていなければインストールする。 2.コードを作る。 3.名前を付けて保存 …

no image

FirefoxのURLの自動補完がきかなくなった けど直した

FirefoxのURLの自動補完がきかなくなった。 色々試してみても、回復できない。 ようやくわかった方法が以下。 F10を押してメニューを出し、ヘルプの、 トラブルシューティング情報 を表示し、右上 …

LimeSurverのEM機能

仕事で使えるかもと思いつつ、まとまって勉強する時間がなかったLimeSurverのEM機能について、調べてみた。 以下のWEB資料を読みながら実際に使ってみた。 EM/HowEnhanced | Li …