topフォームの「ポップアップ」プロパティを「はい」にするとAccess内のウィンドウの最前面に表示されますがが、他のアプリケーションがアクティブになるとその背後に隠れてしまいます。他のアプリケーションも含めてフォームを常に最前面に表示したいという場合もありますよね。APIのSetWindowPosを使うと他アプリケーションがアクティブになっても最前面に常に表示させることが可能になります。標準モジュールの宣言部に下記のコードをコピーして貼り付けます。上記の標準モジュールに下記の関数もコピーして貼り付けます。最前面に表示したいフォームの「ポップアップ」プロパティを「はい」にします。フォームの「開く時」と「閉じる時」のイベントプロシージャを下記のように記述します。Subこれでこのフォームを開くと常に最前面に表示されます。Accessウィンドウの最小化は、全面表示のフォームをアクティブにするとAccessウィンドウも前面に表示されしまうのを防ぐためです。対応バージョンAccess2010l以降の64bit版と32bit版に対応してます。Office2007以前にも対応させる必要がある場合は、下記リンクを参考に書き換えてください。Office64bit版または32bit版のVBAで使うにはまとめコードをコピーするだけで簡単に実現できます。使い道としては、アクセスのデータを参照しながら、他のアプリケーションを操作したいときなどに使うといいでしょう。EditingPrev関連記事VBAで変数宣言をまだプロシージャの先頭にまとめてしてますか?hatenaも1年前までは変数をプロシージャの先頭にまとめて記述してました。「タイトルの症状が発生します、対象法はないでしょうか。コメントをキャンセルメールアドレスが公開されることはありません。