Resource.Notes 属性 (Project)
获取或设置资源的备注。 读/写 String。
语法
expression。 Notes
表达 一个代表 Resource 对象的变量。
备注
说明 属性不接受字符的 ASCII 值小于 32,回车符 (ASCII 13) 和换行符 (ASCII 10) 除外。
示例
下面的示例将一条注释添加到活动单元格中的资源备注。
注意
[!注释] 如果未选定资源,该代码会产生运行时错误 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
支持和反馈
有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。