Project.FullName プロパティ (Project)

プロジェクトのパスとファイル名を取得します。 読み取りのみ可能な String 値です。

構文

式。Fullname

式Project オブジェクトを表す変数。

注釈

保存されてないプロジェクトを対象にした場合、FullName プロパティは、タイトル バーに表示されているプロジェクト名を取得します。

例

次の使用例は、絶対パスのファイル名を入力するように求めるメッセージを表示して、指定されたファイルを閉じます。そのファイルが変更されている場合は、変更を保存します。

Sub CloseFile() 
 Dim P As Project ' Project object used in For Each loop 
 Dim FileName As String ' Full name of a file 
 
 ' Prompt user for the full name of a file. 
 FileName = InputBox$("Close which file? Include its path: ") 
 
 ' Search the open projects for the file. 
 For Each P In Application.Projects 
 
 ' If the file is found, close it. 
 If P.FullName = FileName Then 
 P.Activate 
 FileClose pjSave 
 Exit Sub 
 End If 
 Next P 
 
 ' Inform user if the file is not found. 
 MsgBox ("Could not find the file " & FileName & ".") 
 
End Sub

サポートとフィードバック

Office VBA またはこの説明書に関するご質問やフィードバックがありますか？ サポートの受け方およびフィードバックをお寄せいただく方法のガイダンスについては、Office VBA のサポートおよびフィードバックを参照してください。