Compartilhar via


Propriedade Resource.Notes (Project)

Obtém ou define as anotações para um recurso. Cadeia de caracteres de leitura/gravação.

Sintaxe

expression. Notes

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

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 do recurso na célula ativa.

Observação

[!OBSERVAçãO] Se um recurso não for selecionado, o código resultará em um erro de tempo de execução 1004.

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