現在のデータベースのPath・ファイル名を参照する(ExcelのThisWorkBook.Pathにあたる）

・CurrentProject.Path
　現在のデータベースファイルが格納されているフォルダを参照

・CurrentProject.Name
　現在のデータベースファイルのファイル名を参照

・CurrentProject.FullName
　現在のデータベースファイルのフルパスを参照