Propriedade Application.ActiveProject (Project)

Obtém um objeto de projeto que representa o projeto ativo. Somente leitura Project.

Sintaxe

expression. ActiveProject

expressão Uma variável que representa um Aplicativo objeto.

Exemplo

O exemplo a seguir adiciona a data e a hora ao campo Comentários da caixa de diálogo Propriedades do projeto e, em seguida, salva o projeto.

Sub SaveAndNoteTime() 
 ActiveProject.ProjectNotes = ActiveProject.ProjectNotes & vbCrLf _ 
 & "This project was last saved on " & Date$ & " at " & Time$ & "." 
 FileSave 
End Sub

Suporte e comentários

Tem dúvidas ou quer enviar comentários sobre o VBA para Office ou sobre esta documentação? Confira Suporte e comentários sobre o VBA para Office a fim de obter orientação sobre as maneiras pelas quais você pode receber suporte e fornecer comentários.