Практическое руководство. Добавление и удаление примечаний в листе

Статья
04/28/2010

Обновлен: Июль 2008

Применение
Сведения, приведенные в данном разделе, относятся только к указанным проектам Visual Studio Tools for Office и версиям Microsoft Office. Тип проекта Проекты уровня документа Проекты уровня приложения Версия Microsoft Office Excel 2003 Excel 2007 Дополнительные сведения см. в разделе Доступность функций по типам приложений и проектов.

Сведения, приведенные в данном разделе, относятся только к указанным проектам Visual Studio Tools for Office и версиям Microsoft Office.

Тип проекта

Проекты уровня документа
Проекты уровня приложения

Версия Microsoft Office

Excel 2003
Excel 2007

Дополнительные сведения см. в разделе Доступность функций по типам приложений и проектов.

Существует возможность добавления и удаления комментариев в листах Microsoft Office Excel программными средствами. Примечания можно добавлять только в отдельные ячейки, но не в диапазон с несколькими ячейками.

Добавление и удаление комментария в проекте уровня документа

В следующем примере предполагается, что существует элемент управления NamedRange с именем dateComment, состоящий из одной ячейки и расположенный на листе с именем Sheet1.

Добавление нового комментария в именованный диапазон

Вызовите метод AddComment элемента управления NamedRange и укажите текст примечания. Данный код необходимо поместить в класс Sheet1.
```
Me.dateComment.AddComment("Comment added " & DateTime.Now)
```
```
this.dateComment.AddComment("Comment added " + DateTime.Now.ToString());
```

Удаление примечания из именованного диапазона

Проверка наличия примечания в диапазоне и его последующее удаление. Данный код необходимо поместить в класс Sheet1.
```
If Not Me.dateComment.Comment Is Nothing Then
    Me.dateComment.Comment.Delete()
End If
```
```
if (this.dateComment.Comment != null)
{
    this.dateComment.Comment.Delete();
}
```

Добавление и удаление комментария в проекте надстройки уровня приложения

В следующем примере предполагается, что в активном листе существует элемент управления Microsoft.Office.Interop.Excel.Range с именем dateComment, состоящий из одной ячейки.

Добавление нового комментария в диапазон Excel

Вызовите метод AddComment элемента управления Microsoft.Office.Interop.Excel.Range и укажите текст примечания.

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

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

Удаление примечания из диапазона Excel

Проверка наличия примечания в диапазоне и его последующее удаление.

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", missing);
if (dateComment.Comment != null)
{
    dateComment.Comment.Delete();
}

См. также

Задачи

Практическое руководство. Показ комментариев листа.

Основные понятия

Работа с листами

Элемент управления NamedRange

Журнал изменений

Дата	Журнал изменений	Причина
Июль 2008	Добавлен пример кода, который можно использовать в надстройке уровня приложения.	Обратная связь от клиента.

Поделиться через