Compartilhar via


Propriedade Assignment.Notes (Project)

Obtém ou define as anotações de uma atribuição. Cadeia de caracteres de leitura/gravação.

Sintaxe

expression. Notes

Expressão Uma variável que representa um objeto Assignment .

Comentários

A propriedade Notes não aceita caracteres com um valor ASCII menor que 32, excetuando os caracteres de avanço de linha (ASCII 10) e o retorno de carro (ASCII 13).

Exemplo

O exemplo a seguir adiciona um comentário às anotações da atribuição na célula ativa.

Observação

[!OBSERVAçãO] Se uma atribuição não estiver selecionada, o código resultará em um erro em tempo de execução 1004.

Sub AddStatusNote() 
 Dim noStatus As String 
 noStatus = "No status report yet." 
 
 If ActiveCell.Assignment.Notes = "" Then 
 ActiveCell.Assignment.Notes = "No status report yet." 
 Else 
 ActiveCell.Assignment.Notes = ActiveCell.Assignment.Notes & vbCrLf & vbCrLf & "No status report yet." 
 End If 
 
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.