Propriété Project.FullName (Project)

Obtient le chemin d’accès et le nom de fichier d’un projet. Type de données String en lecture seule.

Syntaxe

expression. Fullname

Expression Variable qui représente un objet Project .

Remarques

La propriété FullName renvoie le nom du projet (comme indiqué dans la barre de titre) pour un projet non enregistré.

Exemple

L’exemple suivant montre comment demander à l’utilisateur le nom complet d’un fichier avant de le fermer en l’enregistrant s’il a été modifié.

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

Assistance et commentaires

Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.