Partager via

Propriété Project.FullName (Project)

  • Article

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.