以程式設計方式新增及刪除工作表註解

您可以透過程式設計方式，加入及刪除 Microsoft Office Excel 工作表中的註解。註解只能加入單一儲存格，而不能加入多個儲存格範圍。

適用對象：本主題資訊適用於文件層級的專案和 Excel 的 VSTO 增益集專案。如需詳細資訊，請參閱依 Office 應用程式和專案類型提供的功能。

在文件層級專案中新增及刪除註解

下列範例假設名為 NamedRange 的工作表上有名為 dateComment 的單一儲存格 Sheet1。

呼叫 AddComment 控制項的 NamedRange 方法，並提供註解文字。這段程式碼必須放在 Sheet1 類別中。

this.dateComment.AddComment("Comment added " + DateTime.Now.ToString());

Me.dateComment.AddComment("Comment added " & DateTime.Now)

確認範圍中有註解，再加以刪除。這段程式碼必須放在 Sheet1 類別中。

if (this.dateComment.Comment != null)
{
    this.dateComment.Comment.Delete();
}

If Not Me.dateComment.Comment Is Nothing Then
    Me.dateComment.Comment.Delete()
End If

下列範例假設使用中工作表上有名為 Range 的單一儲存格 dateComment 。

呼叫 AddComment 的 Range 方法，並提供註解文字。

Excel.Range dateComment = this.Application.get_Range("A1");
dateComment.AddComment("Comment added " + DateTime.Now.ToString());

Dim dateComment As Excel.Range = Me.Application.Range("A1")
dateComment.AddComment("Comment added " & DateTime.Now)

確認範圍中有註解，再加以刪除。

Excel.Range dateComment = this.Application.get_Range("A1");
if (dateComment.Comment != null)
{
    dateComment.Comment.Delete();
}

Dim dateComment As Excel.Range = Me.Application.Range("A1")
If Not dateComment.Comment Is Nothing Then
    dateComment.Comment.Delete()
End If