如何：将颜色应用于 Excel 范围

更新：2007 年 11 月

适用于
本主题中的信息仅适用于指定的 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 控件

此示例针对的是文档级自定义项。

在单元格“A1”中创建一个 NamedRange 控件。

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);