Partager via


Propriété Window.Caption (Project)

Obtient ou définit le texte dans la barre de titre d’une fenêtre de projet. String en lecture/écriture.

Syntaxe

expression. Légende

expression Variable qui représente un objet Window.

Remarques

Lorsque la fenêtre active est agrandie, la barre de titre affiche l’intitulé de la fenêtre principale et de la fenêtre active : ces intitulés sont séparés par un trait d’union. Par exemple, si l’intitulé de la fenêtre principale est « Microsoft Project » et que celui de la fenêtre active est « Projet1.mpp », la barre de titre affiche « Projet1.mpp - Microsoft Project » lorsque la fenêtre active est agrandie.

Si la valeur de la propriété Caption est Empty, la barre de titre affiche l’intitulé par défaut. Ce dernier est « Microsoft Project » pour la fenêtre principale.

Dans un projet ne comprenant qu’une seule fenêtre, son intitulé par défaut correspond au nom de fichier du projet. Dans un projet dont plusieurs fenêtres sont ouvertes, la légende par défaut de chaque fenêtre est nom : n,name est le nom de fichier du projet et n est un numéro unique pour la fenêtre. Par exemple, si la seconde fenêtre du projet « Projet1 » est active, la barre de titre par défaut affiche « Projet1.mpp:2 - Microsoft Project ».

Exemple

L'exemple suivant invite l'utilisateur à modifier l'intitulé de la fenêtre active.

Sub ChangeWindowCaption() 
 
 Dim Entry As String ' Caption entered by user 
 
 ' Prompt user for a new caption. 
 Entry = InputBox$("Enter a new caption for the active window (enter 'reset' to set the caption to its default).") 
 
 ' If user chooses the Cancel button, exit Sub procedure. 
 If Entry = Empty Then Exit Sub 
 
 ' Set or reset the caption. 
 If Entry = "reset" Then 
 ActiveWindow.Caption = Empty 
 Else 
 ActiveWindow.Caption = Entry 
 End If 
 
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.