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.