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.