Excel VBA教程:Evaluate方法

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

expression.Evaluate(Name)

expression  对于 Application对象可选,对于 Chart对象,DialogSheet对象,和 Worksheet对象必需。该表达式返回“应用于”列表中的对象之一。

Name   String 类型,必需。对象名使用 Microsoft Excel 的命名约定。

说明

下列几类 Microsoft Excel 名称可以使用此方法:

注意   使用方括号(例如,"[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 变量。

Excel VBA教程:Evaluate方法·示例

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


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

上页:Excel VBA教程:ErrorBar方法 下页:Excel VBA教程:ExclusiveAccess方法

Excel VBA教程:Evaluate方法

Excel VBA教程:ExclusiveAccess方法 Excel VBA教程:Execute方法
Excel VBA教程:ExecuteExcel4Macro方法 Excel VBA教程:Export方法
Excel VBA教程:Extend方法 Excel VBA教程:FillAcrossSheets方法
Excel VBA教程:FillDown方法 Excel VBA教程:FillLeft方法
Excel VBA教程:FillRight方法 Excel VBA教程:FillUp方法
Excel VBA教程:Find方法 Excel VBA教程:FindFile方法
Excel VBA教程:FindNext方法 Excel VBA教程:FindPrevious方法
Excel VBA教程:Flip方法 Excel VBA教程:Follow方法
Excel VBA教程:FollowHyperlink方法 Excel VBA教程:Format方法
Excel VBA教程:获取有关 Macintosh 关键字的帮助 Excel VBA教程:FunctionWizard方法
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号