通过

Project) (Assignment.Notes 属性

  • 项目

获取或设置工作分配的备注。 读/写 String。

语法

expression。 Notes

表达 一个代表 Assignment 对象的变量。

备注

说明 属性不接受字符的 ASCII 值小于 32，回车符 (ASCII 13) 和换行符 (ASCII 10) 除外。

示例

以下示例将一条注释添加到活动单元格中的工作分配备注。

注意

[!注释] 如果未选择工作分配，则该代码将导致运行时错误 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

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。