通过

Application.Evaluate 方法 (Excel)

  • 项目

将 Microsoft Excel 名称转换为一个对象或值。

语法

表达式。评估 (名称)

expression：表示 Application 对象的变量。

参数

名称 必需/可选 数据类型 说明
Name 必需 Variant 公式或对象名，采用 Microsoft Excel 命名约定。 名称长度必须少于或等于 255 个字符。

返回值

Variant

注释

该方法可使用下列 Microsoft Excel 名称类型：

  • 公式。

  • A1 样式引用。 使用对 A1 样式表示法中单个单元格的任何引用。 所有引用均被视为绝对引用。

  • 范围。 分别使用范围、相交和联合运算符 (冒号、空格和逗号，) 引用。

  • 定义的名称。 可用宏语言指定任何名称。

  • 外部引用。 !使用 运算符可引用单元格或另一个工作簿中定义的名称;例如 Evaluate("[BOOK1.XLS]Sheet1!A1")。

  • 图表对象。 可以指定任何图表对象名称（例如图例、绘图区或系列 1），以访问该对象的属性和方法。 例如， Charts("Chart1").Evaluate("Legend").Font.Name 返回图例中使用的字体的名称。

  • 窗体控件编号。 可以指定数字和名称，以引用工作表上的窗体控件。 例如，对于位于工作表 (“开发人员”选项卡的“标签”-“插入”-“窗体控件”-“标签) ”，和 Evaluate("1").Caption = "Hello" 都Evaluate("Label 1").Caption = "Hello"执行相同的操作。

使用方括号（例如，“[A1:C5]”）与用字符串参数调用 Evaluate 方法是等效的。 例如，下列表达式对是等效的。

[a1].Value = 25 
Evaluate("A1").Value = 25 
 
trigVariable = [SIN(45)] 
trigVariable = Evaluate("SIN(45)") 
 
Set firstCellInSheet = Workbooks("BOOK1.XLS").Sheets(4).[A1] 
Set firstCellInSheet = _ 
    Workbooks("BOOK1.XLS").Sheets(4).Evaluate("A1")

使用方括号的优点在于代码较短。 使用 Evaluate 的优点在于参数是字符串，这样您既可以在代码中构造该字符串，也可以使用 Visual Basic 变量。

示例

此示例将工作表 Sheet1 上 A1 单元格的字体设置为加粗。

Worksheets("Sheet1").Activate 
boldCell = "A1" 
Application.Evaluate(boldCell).Font.Bold = True

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈？ 请参阅 Office VBA 支持和反馈，获取有关如何接收支持和提供反馈的指南。