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

Обновлен: Ноябрь 2007

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

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

Тип проекта

Версия Microsoft Office

Чтобы применить цвет к тексту в диапазоне ячеек, можно использовать элемент управления NamedRange или собственный объект диапазона Excel.

Использование элемента управления NamedRange

В этом примере демонстрируется настройка уровня документа.

Создайте элемент управления NamedRange в ячейке A1.

Dim rng As Microsoft.Office.Tools.Excel.NamedRange = _
    Me.Controls.AddNamedRange(Me.Range("A1"), "NamedRange1")

Microsoft.Office.Tools.Excel.NamedRange rng =
    this.Controls.AddNamedRange(this.Range["A1", missing], "NamedRange1");

Задайте цвет текста в элементе управления NamedRange.

rng.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red)

rng.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red);

Создайте диапазон, начиная с ячейки A1, а затем установите цвет текста.

Dim rng2 As Excel.Range = Me.Application.Range("A1")
rng2.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red)

Excel.Range rng2 = this.Application.get_Range("A1", missing);
rng2.Font.Color = System.Drawing.ColorTranslator.ToOle(System.Drawing.Color.Red);