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

若要将颜色应用于一系列单元格内的文本，请使用 NamedRange 控件或本机 Excel 范围对象。

**适用于：**本主题中的信息适用于 Excel 2007 和 Excel 2010 的文档级项目和应用程序级项目。有关更多信息，请参见按 Office 应用程序和项目类型提供的功能。

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