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

Joomlaの紹介サイトを今使っているサーバに作ってみた。

/homeandabroad/oldxoops/joomla 自分のための使い方の覚え書きも兼ねて。

no image

今日知ったWordPressの便利なプラグイン

NextgenGallery:英語管理画面だけど、写真を一発表示・ページ作成できるので便利そう。今回は下述のwp-kougakuを採用したので、コチラは見送り。 php-code-widget:ウイジ …

no image

Exitイベント

覚え書き。 ExcelVBAのフォームで、 Clickして抜けるかEnterキーして抜けるかわからないテキストボックスには、Exitイベントのところに処理を書いちゃダメ。 ClickとEnterキーで …

Amazonへ出品している商品の、商品名だけを一括で変更したいときの手順

1.以下のページを参考に、出品レポートをダウンロード。商品名を一括で変更・編集する方法 – Amazon出品サービス / 出品に関する一般的な質問 – Amazonセラーフォー …

no image

仕事in靴屋さん

店長さん、極めて博識、且つやる気十分。 腕も優秀、たいした職人。 従業員も情熱的。 よっしゃ! あとはオレがIT魂でもって別世界(金銀財宝がうなるところ)へと連れてってやらア! と、大風呂敷。 ・・・ …