Partager via


Propriété Application.ActiveProject (Project)

Obtient un objet Project qui représente le projet actif. Projet en lecture seule.

Syntaxe

expression. ActiveProject

expressionUne variable qui représente un objetApplication.

Exemple

L’exemple suivant montre comment ajouter la date et l’heure au champ Commentaires de la boîte de dialogue Propriétés du projet avant d’enregistrer le projet.

Sub SaveAndNoteTime() 
 ActiveProject.ProjectNotes = ActiveProject.ProjectNotes & vbCrLf _ 
 & "This project was last saved on " & Date$ & " at " & Time$ & "." 
 FileSave 
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.