起動中のファイルのパスやファイル名を表示する

 起動しているファイル(accdbファイルなど)が置かれているフォルダのパスやファイル名そのものを取得・表示する方法です。
 具体的にはCurrentProjectオブジェクトの各プロパティを参照します。

f:id:accs2014:20161217221949p:plain:right:w400

 考えられる例としてレポートでの表示を試してみます。
 テキストボックスを3つ置き、コントロールを次のようにします。

パスを表示するコントロール

=[CurrentProject].[Path]


ファイル名を表示するコントロール

=[CurrentProject].[Name]


フルパス(パス+ファイル名)を表示するコントロール

=[CurrentProject].[FullName]


 VBAだとCurrentProject.Pathのような表記で十分ですがレポートの場合は角カッコが必要となります(省いても勝手に補われます)。


f:id:accs2014:20161217221948p:plain:right:w400

 印刷プレビューです(一部修正しています)。
 これで「このファイルどこに置いてるんだっけ」という場合に備えられます。ページヘッダーでなくレポートヘッダーに置けば十分ですが;-o-)