Postupy: Přidávání a odstraňování komentářů v listech prostřednictvím kódu programu

Článek
05/16/2015

Můžete programově přidat a odstranit komentáře v listech aplikace Microsoft Office Excel.Komentáře mohou být přidány pouze do jediné buňky nejsou k multi-cell oblastem.

Platí pro: Informace v tomto tématu se vztahují na projekty na úrovni dokumentu i na úrovni aplikace v Excelu 2013 a v Excelu 2010. Další informace najdete v tématu Dostupné funkce podle aplikací systému Office a typů projektu.

Přidání a odstranění komentáře v dokumentu úroveň projektu

Následující příklady předpokládají, že se jednotlivé buňky NamedRange ovládací prvek s názvem dateComment na listu s názvem Sheet1.

Přidat nový komentář na pojmenované oblasti

Volání AddComment metoda NamedRange řízení a zadat text komentáře.Tento kód musí být umístěno Sheet1 třídy.

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

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

Odstranit komentář z pojmenované oblasti

Ověřte, zda existuje poznámka na rozsah a odstraňte jej.Tento kód musí být umístěno Sheet1 třídy.

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

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

Přidání a odstranění komentáře úroveň aplikace přidat v projektu

Následující příklady předpokládají, že se jednotlivé buňky Range s názvem dateComment na aktivním listu.

Přidat nový komentář do oblasti aplikace Excel

Volání AddComment metoda Range a zadejte text poznámky.

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

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

Z oblasti aplikace Excel odstranit komentář

Ověřte, zda existuje poznámka na rozsah a odstraňte jej.

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

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

Viz také

Úkoly

Postupy: Zobrazování komentářů v listech prostřednictvím kódu programu

Koncepty

Práce s listy

NamedRange – ovládací prvek

Sdílet prostřednictvím