Excel VBA属性、方法、事件大全V、BA编程常用词汇英汉对照表

  1. Excel VBA属性、方法、事件大全——Part1(Complete List of Excel VBA attribute/method and event)

VBA调试了不下十遍,但是,能得到这么完整的列表,绝对是值得的。不学好VBA,都有点对不起这么好的资料了,哈哈。

  1. Attribute/Method/Event

Description

  1. Abs

返回参数的绝对值,其类型和参数相同。
语法
Abs(number)
必要的 number 参数是任何有效的数值表达式,如果 number 包含 Null,则返回 Null,如果 number 是未初始化的变量,则返回 0。

  1. AcceptAllChanges

接受指定的共享工作簿中的所有更改
本示例接受活动工作簿中的所有更改。
ActiveWorkbook.AcceptAllChanges

  1. AcceptLabelsInFormulas

如果可在工作表公式中使用标志,则该值为 True
本示例对活动工作簿设置 AcceptLabelsInFormulas 属性,然后将第一张工作表中的单元格 B1:D1 设置为列标志。
ActiveWorkbook.AcceptLabelsInFormulas = True
Worksheets(1).Range("b1:d1").FormulaLabel = xlColumnLabels

  1. AccrInt

返回定期付息有价证券的应计利息。

  1. AccrIntM

返回到期一次性付息有价证券的应计利息。

  1. Acos

返回数字的反余弦值。反余弦值是余弦值为 Arg1 的角度。返回的角度以弧度给出,范围从 0(零)到 pi。

  1. Acosh

返回数字的反双曲余弦值。数字必须大于或等于 1。反双曲余弦值的双曲余弦值为 Arg1,因此 Acosh(Cosh(number)) 等于 Arg1。

  1. ActionControl

获取一个 CommandBarControl 对象,该对象的 OnAction 属性设置为当前正在运行的过程。只读。
语法
表达式.ActionControl
表达式   一个代表 CommandBars 对象的变量。

  1. Activate

将窗口提到 z-次序的最前面这样不会引起可能附加在工作簿上的 Auto_Activate 或 Auto_Deactivate 宏的运行(可用 RunAutoMacros 方法运行这些宏)。
expression.Activate
expression必需。该表达式返回上述对象之一。

  1. Activate

激活一个工作簿、工作表、图表或嵌入图表时产生此事件。
当激活工作表时,本示例对 A1:A10 区域进行排序。
Private Sub Worksheet_Activate()
    Range("a1:a10").Sort Key1:=Range("a1"), Order:=xlAscending
End Sub

  1. Activate

激活与该工作簿相关的第一个窗口
本示例激活工作簿 Book4.xls。如果工作簿 Book4.xls 有若干窗口,本示例激活第一个,即 Book4.xls:1。
Workbooks("BOOK4.XLS").Activate

  1. Activate

使当前工作表成为活动工作表。等同于单击工作表的选项卡。
本示例激活工作表 Sheet1。
Worksheets("Sheet1").Activate

  1. Activate

激活一个工作簿、工作表、图表或嵌入图表时产生此事件
当激活工作表时,本示例对 A1:A10 区域进行排序。
Private Sub Worksheet_Activate()
    Range("a1:a10").Sort Key1:=Range("a1"), Order:=xlAscending
End Sub

  1. Activate

激活单个单元格,该单元格必须处于当前选定区域内
本示例选定工作表 Sheet1 上的单元格区域 A1:C3,并激活单元格 B2。
Worksheets("Sheet1").Activate
Range("A1:C3").Select
Range("B2").Activate

  1. Activate

使当前图表成为活动图表。
expression.Activate
expression必需。该表达式返回上述对象之一。

  1. Activate

使当前图表成为活动图表。

  1. Activate

激活对象。

  1. Activate

将窗口提到 z-次序的最前面。
语法
表达式.Activate
表达式   一个代表 Window 对象的变量。
返回值
Variant

  1. Activate

激活窗格。

  1. ActivateMicrosoftApp

激活一个 Microsoft 应用程序
本示例启动并激活 Word。
Application.ActivateMicrosoftApp xlMicrosoftWord

  1. ActivateNext

激活指定窗口,并将其移到窗口 z-次序的末尾
本示例将活动窗口移到窗口 z-次序的末尾。
ActiveWindow.ActivateNext

  1. ActivateNext

激活指定窗口,并将其移到窗口 z-次序的末尾。
语法
表达式.ActivateNext
表达式   一个代表 Window 对象的变量。
返回值
Variant

  1. ActivatePrevious

激活指定窗口,然后激活窗口 z-次序末尾的窗口
本示例激活窗口 z-次序末尾的窗口。
ActiveWindow.ActivatePrevious

  1. ActivatePrevious

激活指定窗口,然后激活窗口 z-次序末尾的窗口。
语法
表达式.ActivatePrevious
表达式   一个代表 Window 对象的变量。
返回值
Variant

  1. ActivateWizard

在自定义向导期间重新启动或暂停“Office 助手帮助”。

  1. ActiveCell

返回一个 Range 对象
本示例更改活动单元格的字体格式设置。
Worksheets("Sheet1").Activate
With ActiveCell.Font
    .Bold = True
    .Italic = True
End With

  1. ActiveCell

返回一个 Range 对象,该对象代表活动窗口的活动单元格(最上面的窗口),或指定窗口的活动单元格
本示例在消息框中显示活动单元格的值。由于如果活动表不是工作表则 ActiveCell 属性无效,所以本示例使用 ActiveCell 属性之前先激活 Sheet1。
Worksheets("Sheet1").Activate
MsgBox ActiveCell.Value

  1. ActiveCell

返回一个 Range 对象,它代表活动窗口(最上方的窗口)或指定窗口中的活动单元格。如果窗口中没有显示工作表,此属性无效。只读。
语法
表达式.ActiveCell
表达式   一个代表 Window 对象的变量。

  1. ActiveChart

返回 Chart 对象
本示例打开活动图表的图例。
ActiveChart.HasLegend = True

  1. ActiveChart

返回 Chart 对象,该对象代表活动图表(包括嵌入图表或图表工作表)。
本示例打开活动图表的图例。
ActiveChart.HasLegend = True

  1. ActiveChart

返回 Chart 对象,该对象代表活动图表
本示例打开活动图表的图例。
ActiveChart.HasLegend = True

  1. ActiveChart

返回一个 Chart 对象,它代表活动图表(嵌入式图表或图表工作表)。嵌入式图表在被选中或激活时被认为是活动的。当没有图表处于活动状态时,此属性返回 Nothing。
语法
表达式.ActiveChart
表达式   一个代表 Window 对象的变量。

  1. ActiveFilters

指示指定数据透视表中的当前活动的筛选。只读。

  1. ActiveMenuBar

获取一个 CommandBar 对象,该对象代表容器应用程序中的活动菜单栏。只读。
语法
表达式.ActiveMenuBar
表达式   一个代表 CommandBars 对象的变量。

  1. ActivePane

返回一个 Pane 对象,此对象代表指定窗口中的活动窗格。
本示例激活 Book1.xls 中当前窗口的下一个窗格。如果当前窗格处于被冻结状态则不能激活下一个窗格。本示例必须在除 Book1.xls 外的另一工作簿上运行。运行本示例之前,必须确认 Book1.xls 的活动工作表有两个或四个窗格。
Workbooks("BOOK1.XLS").Activate
If not ActiveWindow.FreezePanes Then
    With ActiveWindow
        i = .ActivePane.Index
        If i = .Panes.Count Then
            .Panes(1).Activate
        Else
            .Panes(i+1).Activate
        End If
    End With
End If

  1. ActivePane

返回一个 Pane 对象,该对象表示窗口中的活动窗格。只读。
语法
表达式.ActivePane
表达式   一个代表 Window 对象的变量。

  1. ActivePrinter

返回或设置活动打印机的名称。
本示例显示活动打印机的名称。
MsgBox "The name of the active printer is " & _
    Application.ActivePrinter

  1. ActiveSheet

返回一对象,该对象代表活动工作簿中的窗口或活动工作表
本示例显示活动工作表的名称。
MsgBox "The name of the active sheet is " & ActiveSheet.Name

  1. ActiveSheet

返回一对象,该对象代表活动工作簿中的,或者指定的窗口或工作簿中的活动工作表(最上面的工作表)
本示例显示活动工作表的名称。
MsgBox "The name of the active sheet is " & ActiveSheet.Name

  1. ActiveSheet

返回一对象,该对象代表活动工作簿中的,或者指定的窗口或工作簿中的活动工作表(最上面的工作表)。
本示例显示活动工作表的名称。
MsgBox "The name of the active sheet is " & ActiveSheet.Name

  1. ActiveSheet

返回一个对象,它代表活动工作簿中或指定的窗口或工作簿中的活动工作表(最上面的工作表)。如果没有活动的工作表,则返回 Nothing。
语法
表达式.ActiveSheet
表达式   一个代表 Window 对象的变量。

  1. ActiveSheetView

返回一个对象,该对象代表指定窗口中活动工作表的视图。只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.ActiveSheetView
表达式   一个代表 Window 对象的变量。

  1. ActiveWindow

返回一个 Window 对象,该对象代表活动窗口
本示例显示活动窗口的名称(Caption 属性)。
MsgBox "The name of the active window is " & ActiveWindow.Caption

  1. ActiveWorkbook

返回一个 Workbook 对象,该对象代表活动窗口的工作簿
本示例显示活动工作簿的名称。
MsgBox "The name of the active workbook is " & ActiveWorkbook.Name

  1. ActiveXControl

返回一个 Object,该对象表示“文档操作”任务窗格中显示的 ActiveX 控件。只读。

  1. AdaptiveMenu

获取一个 Boolean 类型的值,该值指定命令栏是否应包含自适应菜单。可读写。
语法
表达式.AdaptiveMenu
表达式   一个返回 CommandBar 对象的表达式。
返回值
Boolean

  1. AdaptiveMenus

此属性可选中或取消选中指定 Microsoft Office 中菜单是完全显示还是按个性化方式显示的选项的复选框控件。可读写。
语法
表达式.AdaptiveMenus
表达式   一个代表 CommandBars 对象的变量。

  1. Add

将新加载宏文件添加到加载宏列表中。返回 AddIn 对象。
expression.Add(FileName, CopyFile)
expression   必需。该表达式返回一个 AddIns 对象。
Filename   String 类型,必需。包含要添加到加载宏管理器列表中的加载宏的文件名称。
CopyFile   Variant 类型,可选。如果加载宏文件在硬盘上,则忽略本参数。在加载宏处于可移动介质(软盘或光盘)上的情况下,如果为 True,就将该加载宏复制到硬盘上;如果为 False,则将加载宏保留在可移动介质上。如果省略本参数,Microsoft Excel 将弹出对话框,提示您选择。

  1. Add

指定新名称
本示例为活动工作簿中工作表 Sheet1 上的单元格区域 A1:D3 定义新名称。注意,如果工作表 Sheet1 不存在,则无任何返回值。
Sub MakeRange()
    ActiveWorkbook.Names.Add _
        Name:="tempRange", _
RefersTo:="=Sheet1!$A$1:$D$3"
End Sub

  1. Add

新建工作簿。
本示例新建工作簿。
Workbooks.Add

  1. Add

添加新的条件格式。
本示例向单元格区域 E1:E10 中添加条件格式。
With Worksheets(1).Range("e1:e10").FormatConditions _
    .Add(xlCellValue, xlGreater, "=$a$1")
    With .Borders
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = 6
    End With
    With .Font
        .Bold = True
        .ColorIndex = 3
    End With
End With

  1. Add

向指定的区域或图形添加超链接
本示例向单元格 A5 添加超链接。
With Worksheets(1)
    .Hyperlinks.Add Anchor:=.Range("a5"), _
        Address:="http://example.microsoft.com", _
        ScreenTip:="Microsoft Web Site", _
        TextToDisplay:="Microsoft"
End With

  1. Add

新建工作表、图表或宏表
本示例将新建工作表插入到活动工作簿的最后一张工作表之前。
ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count)

  1. Add

创建一个新的命令栏并将其添加到命令栏集合中。语法
表达式.Add(Name, Position, MenuBar, Temporary)
表达式   必需。一个代表 CommandBars 对象的变量。
参数
名称必选/可选数据类型描述
Name 可选 Variant 新命令栏的名称。如果省略此参数,则为命令栏指定默认名称(如 Custom 1)。
Position 可选 Variant 新命令栏的位置或类型。可以是 MsoBar 常量之一。
MenuBar 可选 Variant 设置为 True 将以新命令栏替换活动菜单栏。默认值为 False。
Temporary 可选 Variant 如果为 True,则将使新命令栏变成临时命令栏。临时命令栏将在容器应用程序关闭时删除。默认值为 False。

  1. Add

向最近使用的文件列表中添加文件。

  1. Add

添加在重新计算工作表时要跟踪的区域。

  1. Add

新建工作表、图表或宏表。新建的工作表将成为活动工作表。

  1. Add

向指定区域内添加数据有效性验证。

  1. Add

向指定的单元格中添加拼音文本。

  1. Add

添加智能标记。返回 SmartTag 对象。

  1. Add

在受保护的工作表中添加可编辑的单元格区域。返回 AllowEditRange 对象。

  1. Add

添加用户访问列表。

  1. Add

添加自定义属性信息。

  1. Add

添加水平分页符。

  1. Add

添加垂直分页符。

  1. Add

向指定的区域或形状添加超链接。

  1. Add

新建方案并将其添加到当前工作表可用的方案列表中。

  1. Add

向工作表中添加新的 OLE 对象。

  1. Add

新建一个查询表。

  1. Add

创建新查询参数。

  1. Add

添加新的数据透视表。返回一个 PivotTable 对象。

  1. Add

创建新的计算字段。返回 PivotField 对象。

  1. Add

向数据透视表中添加计算字段或计算项。返回 CalculatedMember 对象。

  1. Add

新建数据透视表公式。

  1. Add

新建数据透视表项。

  1. Add

创建新的嵌入式图表。

  1. Add

新建图表工作表,并返回 Chart 对象。
语法
表达式.Add(Before, After, Count, Type)
表达式   一个代表 Charts 对象的变量。
参数
名称必选/可选数据类型描述
Before 可选 Variant 指定工作表的对象,新建的工作表将置于此工作表之前。
After 可选 Variant 指定工作表的对象,新建的工作表将置于此工作表之后。
Count 可选 Variant 要添加的工作表数。默认值为 1。
Count 可选 Variant 一个 XlChartType 常量,它代表要添加的图表类型。
返回值
一个代表新的图表工作表的 Chart 对象。

  1. Add

向 SeriesCollection 集合添加一个或多个新数据系列。

  1. Add

创建新的趋势线。

  1. Add

新建一个自定义的文档属性。只能在自定义 DocumentProperties 集合中新添文档属性。

  1. Add

新建自定义视图。

  1. Add

新建样式并将其添加到当前工作簿的可用样式列表中。

  1. Add

创建一个对象,该对象代表保存在网页上的文档中的项目。当对 Microsoft Excel 中的文档进行了一些自动修订时,这些对象可帮助随后对网页进行的更新。返回 PublishObject 对象。

  1. Add

添加 XML 映射到指定的工作簿。

  1. AddCallout

创建一个无边框的线形标注。返回一个代表新标注的 Shape 对象。
语法
表达式.AddCallout(Type, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Type 必选 MsoCalloutType 标注线的类型。
Left 必选 Single 标注边框的左上角相对于文档左上角的位置(以磅为单位)。
Top 必选 Single 标注边框的左上角相对于文档左上角的位置(以磅为单位)。
Width 必选 Single 标注边框的宽度(以磅为单位)。
Height 必选 Single 标注边框的高度(以磅为单位)。
返回值
Shape

  1. AddChart

在活动工作表上的指定位置创建图表。
版本信息
 已添加版本:  Excel 2007
语法
表达式.AddChart(Type, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Type 可选 XlChartType 图表类型。
Left 可选 Variant 从对象左边界至 A 列左边界(在工作表上)或图表区左边界(在图表上)的距离,以磅为单位。 
Top 可选 Variant 从图形区域中最上端的图形的顶端到工作表顶端的距离,以磅为单位。
Width 可选 Variant 对象的宽度,以磅为单位。 
Height 可选 Variant 对象的高度,以磅为单位。 
返回值
Shape

  1. AddChartAutoFormat

向图表的可用自动套用格式列表中添加自定义的自动套用格式
本示例添加一个基于 Chart1 的自动套用格式。
Application.AddChartAutoFormat _
    Chart:=Charts("Chart1"), Name:="Presentation Chart"

  1. AddComment

为区域添加批注
本示例为第一张工作表中 E5 单元格添加批注。
Worksheets(1).Range("E5").AddComment "Current Sales"

  1. AddConnector

创建一个连接符。返回一个代表新连接符的 Shape 对象。添加一个连接符时,它没有连接到任何对象。使用 BeginConnect 和 EndConnect 方法可将连接符的头和尾连接到文档中的其他形状上。
语法
表达式.AddConnector(Type, BeginX, BeginY, EndX, EndY)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Type 必选 MsoConnectorType 要添加的连接符类型。
BeginX 必选 Single 连接符的起点相对于文档左上角的水平位置(以磅为单位)。
BeginY 必选 Single 连接符的起点相对于文档左上角的垂直位置(以磅为单位)。
EndX 必选 Single 连接符的终点相对于文档左上角的水平位置(以磅为单位)。
EndY 必选 Single 连接符的终点相对于文档左上角的垂直位置(以磅为单位)。
返回值
Shape

  1. AddCurve

返回一个 Shape 对象,该对象表示工作表中的贝赛尔曲线。
语法
表达式.AddCurve(SafeArrayOfPoints)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
SafeArrayOfPoints 必选 Variant 由指定曲线的顶点和控制点的坐标对(坐标对:一对值,表示两维数组中存储的点的 x 和 y 坐标,该数组中包含许多点的坐标。)组成的数组。首先指定起点,然后指定两个第一段贝塞尔曲线的控制点。该曲线每增加一条线段,就要为其指定一个顶点和两个控制点。最后指定该曲线的终点。请注意,必须指定的点数始终为 3n + 1,其中 n 为曲线的线段个数。
返回值
Shape

  1. AddCustomList

为自定义自动填充和/或自定义排序添加自定义序列
本示例将一个字符串数组添加到自定义列表中。
Application.AddCustomList Array("cogs", "sprockets", _
    "widgets", "gizmos")

  1. AddDataField

将数据字段添加到数据透视表中。返回一个 PivotField 对象,该对象表示新的数据字段。

  1. AddFields

向数据透视表或数据透视图中添加行字段、列字段和页字段。

  1. AddFormControl

创建一个 Microsoft Excel 控件(Microsoft Excel 控件:Excel 本身具有的控件,而不是 ActiveX 控件。)。将返回一个 Shape 对象,该对象代表新建的控件。
语法
表达式.AddFormControl(Type, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Type 必选 XlFormControl Microsoft Excel 控件(Microsoft Excel 控件:Excel 本身具有的控件,而不是 ActiveX 控件。)类型。无法在工作表上创建编辑框。
Left 必选 Long 新对象相对于工作表 A1 单元格左上角或图表左上角的初始坐标(以磅(磅:指打印的字符的高度的度量单位。1 磅等于 1/72 英寸,或大约等于 1 厘米的 1/28。)为单位)。
Top 必选 Long 新对象相对于工作表 A1 单元格左上角或图表左上角的初始坐标(以磅(磅:指打印的字符的高度的度量单位。1 磅等于 1/72 英寸,或大约等于 1 厘米的 1/28。)为单位)。
Width 必选 Long 新对象的初始大小(以磅为单位)。
Height 必选 Long 新对象的初始大小(以磅为单位)。
返回值
Shape

  1. AddIndent

当单元格中文本的对齐方式为垂直或水平等距分布时,如果文本为自动缩进,则该值为 True
本示例将Sheet1的单元格A1中文本的水平对齐方式设置为等距分布,然后缩进该文本。
With Worksheets("Sheet1").Range("A1")
    .HorizontalAlignment = xlHAlignDistributed
    .AddIndent = True
End With

  1. AddIndent

返回或设置一个 Variant 值,它指明当单元格中文本的对齐方式为水平或垂直等距分布时,文本是否为自动缩进。
语法

表达式.AddIndent

表达式   一个代表 CellFormat 对象的变量。

  1. AddIndent

返回或设置一个 Boolean 值,它指明当单元格中文本的对齐方式为水平或垂直等距分布时,文本是否为自动缩进。
语法
表达式.AddIndent
表达式   一个代表 Style 对象的变量。

  1. AddIndent

返回或设置一个 Boolean 值,它指明当单元格中文本的对齐方式为水平或垂直等距分布时,文本是否为自动缩进。

  1. AddinInstall

当工作簿作为加载宏安装时,产生此事件。
当指定工作簿作为加载宏安装时,本示例将一个控件添加到常用工具栏中。
Private Sub Workbook_AddinInstall()
    With Application.Commandbars("Standard").Controls.Add
        .Caption = "The AddIn's menu item"
        .OnAction = "'ThisAddin.xls'!Amacro"
    End With End Sub
End Sub

  1. AddIns

返回一个 AddIns 集合,此集合代表在“加载宏”对话框中列出的全部加载宏
本示例显示“分析工具库”加载宏的状态。
If AddIns("Analysis ToolPak").Installed = True Then
    MsgBox "Analysis ToolPak add-in is installed"
Else
    MsgBox "Analysis ToolPak add-in is not installed"
End If

  1. AddinUninstall

当指定工作簿作为加载宏卸载时,产生此事件
本示例将 Microsoft Excel 最小化。
Private Sub Workbook_AddinUninstall()
    Application.WindowState = xlMinimized
End Sub

  1. AddItem

为列表框或组合框添加项。

  1. AddLabel

创建一个连接符。返回一个代表新连接符的 Shape 对象。
语法
表达式.AddLabel(Orientation, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Orientation 必选 MsoTextOrientation 标签中文本的方向。
Left 必选 Single 标签左上角相对于文档左上角的位置(以磅为单位)。
Top 必选 Single 标签左上角相对于文档顶部的位置(以磅为单位)。
Width 必选 Single 标签的宽度(以磅为单位)。
Height 必选 Single 标签的高度(以磅为单位)。
返回值
Shape

  1. AddLine

当本方法应用于 Shapes 对象时,返回一个 Shape 对象,该对象表示工作表中的新线条。
语法
表达式.AddLine(BeginX, BeginY, EndX, EndY)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
BeginX 必选 Single 线条的起点相对于文档左上角的位置(以磅为单位)。
BeginY 必选 Single 线条的起点相对于文档左上角的位置(以磅为单位)。
EndX 必选 Single 线条的终点相对于文档左上角的位置(以磅为单位)。
EndY 必选 Single 线条的终点相对于文档左上角的位置(以磅为单位)。
返回值
Shape

  1. AddMemberPropertyField

将成员属性字段添加到多维数据集字段的显示区域。

  1. AddOLEObject

创建 OLE 对象。返回一个代表新 OLE 对象的 Shape 对象。
语法
表达式.AddOLEObject(ClassType, Filename, Link, DisplayAsIcon, IconFileName, IconIndex, IconLabel, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
ClassType 可选 Variant (必须指定 ClassType 或 FileName)。该字符串包含要创建的对象的程序标识符。如果指定了 ClassType 参数,则忽略 FileName 和 Link。
Filename 可选 Variant 创建对象所用的文件名称。如果未指定路径,则使用当前的工作文件夹。必须为对象指定 ClassType 或 FileName 参数,但不能同时指定。
Link 可选 Variant 如果为 True,则将 OLE 对象链接到创建该对象所使用的文件;如果为 False,则 OLE 对象成为该文件的独立副本。如果为 ClassType 指定值,则该参数必须为 False。默认值为 False。
DisplayAsIcon 可选 Variant 如果为 True,则将 OLE 对象显示为图标。默认值为 False。
IconFileName 可选 Variant 包含将要显示的图标的文件。
IconIndex 可选 Variant IconFileName 内的图标索引。指定文件中图标的顺序与图标在“更改图标”对话框中出现的顺序相对应(选中“显示为图标”复选框后,可从“对象”对话框访问该对话框)。文件中的第一个图标的索引号为 0(零)。如果 IconFileName 中不存在给定索引号的图标,则使用索引号为 1 的图标(即文件中的第二个图标)。默认值为 0(零)。
IconLabel 可选 Variant 显示在图标下面的标签(题注)。
Left 可选 Variant 新对象的左上角相对于文档左上角的位置(以磅为单位)。默认值为 0(零)。
Top 可选 Variant 新对象的左上角相对于文档左上角的位置(以磅为单位)。默认值为 0(零)。
Width 可选 Variant 以磅为单位给出 OLE 对象的初始尺寸。
Height 可选 Variant 以磅为单位给出 OLE 对象的初始尺寸。
返回值
Shape

  1. AddPageItem

向具有多个项的页面字段添加其他项。

  1. AddPicture

现有文件创建图片。返回一个代表新图片的 Shape 对象。
语法
表达式.AddPicture(Filename, LinkToFile, SaveWithDocument, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Filename 必选 String 要在其中创建 OLE 对象的文件。
LinkToFile 必选 MsoTriState 要链接至的文件。
SaveWithDocument 必选 MsoTriState 将图片与文档一起保存。
Left 必选 Single 图片左上角相对于文档左上角的位置(以磅为单位)。
Top 必选 Single 图片左上角相对于文档顶部的位置(以磅为单位)。
Width 必选 Single 图片的宽度(以磅为单位)。
Height 必选 Single 图片的高度(以磅为单位)。
返回值
Shape

  1. AddPolyline

创建一个不封闭的连续线段或一个封闭的多边形。返回一个代表新的连续线段或多边形的 Shape 对象。
语法
表达式.AddPolyline(SafeArrayOfPoints)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
SafeArrayOfPoints 必选 Variant 由指定多边形顶点的坐标对(坐标对:一对值,表示两维数组中存储的点的 x 和 y 坐标,该数组中包含许多点的坐标。)组成的数组。
返回值
Shape

  1. AddReplacement

向“自动更正”替换文本数组中添加项。
语法
表达式.AddReplacement(What, Replacement)
表达式   一个代表 AutoCorrect 对象的变量。
参数
名称必选/可选数据类型描述
What 必选 String 要替换的文本。如果该字符串已存在于自动更正替换文本数组中,则现有的替换文本将被新文本替换。
Replacement 必选 String 替换文本。

  1. Address

以宏语言返回区域引用
下面的示例对工作表 Sheet1 中的同一单元格地址使用了四种不同的表达方式。示例中的注释为将要显示于消息框中的地址。
Set mc = Worksheets("Sheet1").Cells(1, 1)
MsgBox mc.Address()                        ' $A$1
MsgBox mc.Address(RowAbsolute:=False)      ' $A1
MsgBox mc.Address(ReferenceStyle:=xlR1C1)  ' R1C1
MsgBox mc.Address(ReferenceStyle:=xlR1C1, _
    RowAbsolute:=False,     _
    ColumnAbsolute:=False,  _
    RelativeTo:=Worksheets(1).Cells(3, 3))

  1. Address

返回或设置一个 String 型,它代表目标文档的地址。

  1. AddressLocal

以用户语言返回对指定区域的区域引用
假设使用美国英语语言支持创建了本示例,然后在使用德语语言支持的环境中运行本示例。本示例可显示批注中的文本。
Set mc = Worksheets(1).Cells(1, 1)
MsgBox mc.AddressLocal()              ' $A$1
MsgBox mc.AddressLocal(RowAbsolute:=False)      ' $A1
MsgBox mc.AddressLocal(ReferenceStyle:=xlR1C1)  'Z1S1
MsgBox mc.AddressLocal(ReferenceStyle:=xlR1C1, _
    RowAbsolute:=False, _
    ColumnAbsolute:=False, _
    RelativeTo:=Worksheets(1).Cells(3, 3))      

  1. AddSet

向 CubeFields 集合中添加一个新的 CubeField 对象。CubeField 对象与多维数据集的联机分析处理 (OLAP) 提供程序上定义的集合相对应。

  1. AddShape

返回一个 Shape 对象,该对象表示工作表中的新自选形状。
语法
表达式.AddShape(Type, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Type 必选 MsoAutoShapeType 指定要创建的自选形状的类型。
Left 必选 Single 自选形状边框的左上角相对于文档左上角的位置(以磅为单位)。
Top 必选 Single 自选形状边框的左上角相对于文档左上角的位置(以磅为单位)。
Width 必选 Single 自选形状边框的宽度(以磅为单位)。
Height 必选 Single 自选形状边框的高度(以磅为单位)。
返回值
Shape

  1. AddTextbox

创建一个文本框。返回一个代表新文本框的 Shape 对象。
语法
表达式.AddTextbox(Orientation, Left, Top, Width, Height)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
Orientation 必选 MsoTextOrientation 文本框的方向。
Left 必选 Single 文本框左上角相对于文档左上角的位置(以磅为单位)。
Top 必选 Single 文本框左上角相对于文档顶部的位置(以磅为单位)。
Width 必选 Single 文本框的宽度(以磅为单位)。
Height 必选 Single 文本框的高度(以磅为单位)。
返回值
Shape

  1. AddTextEffect

创建艺术字对象。返回一个代表新艺术字对象的 Shape 对象。
语法
表达式.AddTextEffect(PresetTextEffect, Text, FontName, FontSize, FontBold, FontItalic, Left, Top)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
PresetTextEffect 必选 MsoPresetTextEffect 预置文字效果。
Text 必选 String 艺术字中的文字。
FontName 必选 String 艺术字中所用字体的名称。
FontSize 必选 Single 艺术字中所用字体的大小(以磅为单位)。
FontBold 必选 MsoTriState 在艺术字中要加粗的字体。
FontItalic 必选 MsoTriState 在艺术字中要倾斜的字体。
Left 必选 Single 艺术字边框左上角相对于文档左上角的位置(以磅为单位)。
Top 必选 Single 艺术字边框左上角相对于文档顶部的位置(以磅为单位)。
返回值
Shape

  1. AddToFavorites

将工作簿或超链接的快捷方式添加到“收藏夹”文件夹
本示例将活动工作簿的快捷方式添加到“收藏夹”文件夹。
ActiveWorkbook.AddToFavorites

  1. AddToFavorites

将工作簿或超链接的快捷方式添加到“收藏夹”文件夹。

  1. AdjustColumnWidth

如果每次刷新指定的查询表时,列宽都会自动调整为最适合的状态,则为 True。如果每次刷新时列宽不自动调整,则为 False。默认值是 True。Boolean 类型,可读写。

  1. AdjustColumnWidth

如果每次刷新指定 XML 映射时,列宽都会自动调整为最适合的宽度,则为 True。如果每次刷新时列宽不自动调整,则为 False。默认值是 True。Boolean 类型,可读写。

  1. Adjustments

返回一个 Adjustments 对象,它包括指定形状的所有调整操作的调整值。应用于任何代表自选图形、艺术字或连接符的 Shape 对象。
语法
表达式.Adjustments
表达式   一个代表 Shape 对象的变量。

  1. ADOConnection

如果将数据透视表缓存连接到 OLE DB 数据源,则返回一个 ADO Connection 对象。ADOConnection 属性表明 Microsoft Excel 与数据提供程序相连,允许用户在 Excel 正在使用的同一会话的上下文内编写代码,Excel 将该会话与 ADO(关系源)或 ADO MD(OLAP 源)一起使用。只读。

  1. AdvancedFilter

基于给定的条件区域从数据清单中筛选或复制数据
本示例筛选基于条件区域“Criteria”的数据库区域“Database”。
Range("Database").AdvancedFilter _
    Action:=xlFilterInPlace, _
    CriteriaRange:=Range("Criteria")

  1. AfterRefresh

当完成或者取消一个查询时,发生此事件。

  1. AfterXmlExport

Microsoft Excel 将指定的工作簿中的数据保存或导出到 XML 数据文件之后,发生此事件。
expression.AfterXmlExport(Map, Url, Result)
expression必需。该表达式返回一个 Workbook 对象。

  1. AfterXmlImport

在刷新现有的 XML 数据连接或将新的 XML 数据导入到指定的 Microsoft Excel 工作簿之后,发生此事件。
expression.AfterXmlImport(Map, IsRefresh, Result)
expression    必需。该表达式返回一个 Workbook 对象。

  1. AlertBeforeOverwriting

进行拖放编辑操作过程中,如果 Microsoft Excel 在覆盖非空单元格之前先显示一条信息则为 True
本示例设置 Microsoft Excel 进行拖放编辑操作过程中,在改写非空单元格之前先显示警告。
Application.AlertBeforeOverwriting = True

  1. AlertStyle

返回有效性检验警告样式。XlDVAlertStyle 类型,只读。

  1. AlignMarginsHeaderFooter

如果 Excel 以页面设置选项中设置的边距对齐页眉和页脚,则返回 True。可读/写 Boolean 类型。

  1. Alignment

返回或设置一个 Long 值,它代表指定的拼音文本或刻度线标签的对齐方式。

  1. Alignment

返回或设置一个 MsoTextEffectAlignment 值,它代表艺术字的对齐方式。

  1. AllItemsVisible

AllItemsVisible 属性检查是否对 PivotField 或 CubeField 应用手动筛选。只读 Boolean 类型。

  1. AllItemsVisible

用于检索指示是否对透视字段应用任何手动筛选的 Boolean 值。只读。

  1. AllowDeletingColumns

如果允许删除受保护工作表上的列,则返回 True。Boolean 类型,只读。

  1. AllowDeletingRows

如果允许删除受保护工作表上的行,则返回 True。Boolean 类型,只读。

  1. AllowEdit

如果可编辑受保护的工作表上的区域,则该值为 True
在本示例中,Microsoft Excel 通知用户是否可编辑受保护的工作表上的单元格 A1。
Sub UseAllowEdit()
    Dim wksOne As Worksheet
    Set wksOne = Application.ActiveSheet
    ' Protect the worksheet
    wksOne.Protect
    ' Notify the user about editing cell A1.
    If wksOne.Range("A1").AllowEdit = True Then
        MsgBox "Cell A1 can be edited."
    Else
        Msgbox "Cell A1 cannot be edited."
    End If
End Sub

  1. AllowEdit

返回或设置一个 Boolean 值,它指明是否允许用户访问受保护工作表的指定区域。

  1. AllowEditRanges

返回 AllowEditRange 对象。

  1. AllowFiltering

如果允许用户使用工作表受保护之前设置的“自动筛选”,则返回 True。Boolean 类型,只读。

  1. AllowFormattingCells

如果允许对受保护的工作表上的单元格进行格式设置,则返回 True。Boolean 类型,只读。

  1. AllowFormattingColumns

如果允许对受保护的工作表上的列进行格式设置,则返回 True。Boolean 类型,只读。

  1. AllowFormattingRows

如果允许对受保护的工作表上的行进行格式设置,则返回 True。Boolean 类型,只读。

  1. AllowInsertingColumns

如果允许在受保护的工作表上插入列,则返回 True。Boolean 类型,只读。

  1. AllowInsertingHyperlinks

如果允许在受保护的工作表上插入超链接,则返回 True。Boolean 类型,只读。

  1. AllowInsertingRows

如果允许用户在受保护的工作表上插入行,则返回 True。Boolean 类型,只读。

  1. AllowMultipleFilters

设置或检索一个值,该值指示是否可同时将多个筛选应用于一个透视字段。可读写 Boolean。

  1. AllowPNG

如果以网页保存文档时,允许将 PNG(可移植网络图形)作为图像格式使用,则为 True。如果不允许将 PNG 作为输出格式使用,则为 False。默认值是 False。Boolean 类型,可读写。

  1. AllowSorting

如果允许在受保护的工作表上使用排序选项,则返回 True。Boolean 类型,只读。

  1. AllowUsingPivotTables

如果允许用户在受保护的工作表上处理数据透视表,则返回 True。Boolean 类型,只读。

  1. AlternativeText

返回或设置一个当 Shape 对象保存为网页时,该对象的描述性(可选)文本字符串。String 型,可读写。
语法
表达式.AlternativeText
表达式   一个代表 Shape 对象的变量。

  1. AltStartupPath

返回或者设置替换启动文件夹的名称
本示例设置替换启动文件夹。
Application.AltStartupPath = "C:\EXCEL\MACROS"

  1. AlwaysSaveInDefaultEncoding

如果在保存网页或纯文本文档时将使用默认编码,而该默认编码与文件打开时的初始编码是互相独立的,则该属性值为 True。如果使用文件的初始编码,则该属性值为 False。默认值为 False。Boolean 类型,可读写。

  1. AmorDegrc

返回每个结算期的折旧值。此函数为法国会计系统提供。

  1. AmorLinc

返回每个结算期的折旧值。此函数为法国会计系统提供。

  1. And

如果其所有参数都为 TRUE,则返回 TRUE;如果一个或多个参数为 FALSE,则返回 FALSE。

  1. Animation

获取或设置“Office 助手”的动画效果。可读/写。

  1. AnswerWizard

返回 Microsoft Excel 的 AnswerWizard 对象
本示例重置 Answer Wizard 文件列表。
Application.AnswerWizard.ResetFileList

  1. AppActivate

激活一应用程序窗口。
语法
AppActivate title[, wait]
title 必需的。字符串表达式,所要激活的应用程序窗口的标题。可以使用 Shell 函数返回的任务识别码来替换 title,以激活应用程序。
wait 可选的。Boolean 值,说明在激活另一个应用程序之前调用的应用程序是否有焦点。如果为 False(缺省),那么,即使调用的应用程序没有焦点,也直接激活指定的应用程序。如果为 True,则调用的应用程序会等到有焦点后,才激活指定的应用程序。

  1. AppendOnImport

如果希望在导入新数据或刷新现有连接时将新行附加到绑定在指定架构映射的 XML 列表中,则设该属性值 True。如果希望在导入新数据或刷新现有连接时覆盖绑定到指定架构映射的单元格内容,则该属性值为 False。默认值为 False。Boolean 类型,可读写。

  1. Application

如果不使用对象区分符,该属性返回一个 Application 对象,该对象代表指定的 Microsoft Excel 应用程序。如果使用对象区分符,该属性返回一个 Application 对象,该对象代表指定对象的创建者
本示例显示一个有关创建 myObject 的应用程序的信息。
Set myObject = ActiveWorkbook
If myObject.Application.Value = "Microsoft Excel" Then
    MsgBox "This is a Microsoft Excel object"
Else
    MsgBox "This is not a Microsoft Excel object"
End If

  1. Application

该属性返回一个 Application 对象
本示例显示一个有关创建 myObject 的应用程序的信息。
Set myObject = ActiveWorkbook
If myObject.Application.Value = "Microsoft Excel" Then
    MsgBox "This is an Excel Application object."
Else
    MsgBox "This is not an Excel Application object."
End If

  1. Application

如果不使用对象识别符,则该属性返回一个代表 Microsoft Excel 应用程序的 Application 对象。如果使用对象识别符,则该属性返回一个代表指定对象的创建程序的 Application 对象。可对一个 OLE 自动化对象使用该属性来返回该对象的应用程序。只读。
语法
表达式.Application
表达式   一个代表 WorksheetFunction 对象的变量。

  1. Application

如果使用对象识别符,则该属性返回一个代表指定对象
本示例显示一个有关创建 myObject 的应用程序的信息。
Set myObject = ActiveWorkbook
If myObject.Application.Value = "Microsoft Excel" Then
    MsgBox "This is an Excel Application object."
Else
    MsgBox "This is not an Excel Application object."
End If

  1. Application

如果不使用对象识别符,则该属性返回一个 Application 对象,该对象表示 Microsoft Excel 应用程序。如果使用对象识别符,则该属性返回一个代表指定对象(可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序)创建者的 Application 对象。只读。

  1. Application

获取一个 Application 对象,代表 Assistant 对象的容器应用程序(可以使用 Automation 对象的此属性返回该对象的容器应用程序)。只读。

  1. Application

获取一个 Application 对象,代表 COMAddIns 对象的容器应用程序(可以使用 Automation 对象的此属性返回该对象的容器应用程序)。只读。

  1. Application

获取一个 Application 对象,代表 COMAddIn 对象的容器应用程序(可以使用 Automation 对象的此属性返回该对象的容器应用程序)。只读。

  1. Application

如果不使用对象识别符,则该属性返回一个 Application 对象,该对象表示 Microsoft Excel 应用程序。如果使用对象识别符,则该属性返回一个表示指定对象(可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序)创建者的 Application 对象。只读。

  1. Application

获取一个 Application 对象,代表 LanguageSettings 对象的容器应用程序(可以使用 Automation 对象的此属性返回该对象的容器应用程序)。只读。

  1. Application

返回一个 Application 对象
语法
表达式.Application
表达式   一个代表 Name 对象的变量

  1. Application

如果不使用对象识别符,则该属性返回一个 Application 对象,该对象表示 Microsoft Excel 应用程序。如果使用对象识别符,则该属性返回一个表示指定对象(可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序)创建者的 Application 对象。只读。
语法
表达式.Application
表达式   一个代表 Shapes 对象的变量。

  1. Application

如果不使用对象识别符,则该属性返回一个 Application 对象,该对象表示 Microsoft Excel 应用程序。如果使用对象识别符,则该属性返回一个表示指定对象(可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序)创建者的 Application 对象。只读。
语法
表达式.Application
表达式   一个代表 Charts 对象的变量

  1. Application

获取一个 Application 对象,代表 DocumentProperties 对象的容器应用程序(可以使用 Automation 对象的此属性返回该对象的容器应用程序)。只读。

  1. Application

获取一个 Application 对象,代表 DocumentProperty 对象的容器应用程序(可以使用 Automation 对象的此属性返回该对象的容器应用程序)。只读。

  1. Application

如果不使用对象识别符,则该属性返回一个 Application 对象,该对象表示 Microsoft Excel 应用程序。如果使用对象识别符,则该属性返回一个表示指定对象(可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序)创建者的 Application 对象。只读。
语法
表达式.Application
表达式   一个代表 Window 对象的变量。

  1. AppliesTo

返回一个 Range 对象,指定格式规则将应用于的单元格区域。

  1. Apply

应用通过 PickUp 方法复制的指定形状格式。
语法
表达式.Apply
表达式   一个代表 Shape 对象的变量。

  1. ApplyCustomType

将标准图表类型或自定义图表类型应用于图表
本示例将“带数据标志的折线图”图表类型应用于第一张图表。
Charts(1).ApplyCustomType xlLineMarkers

  1. ApplyDataLabels

将数据标签应用于图表中的某一数据点、某一数据系列或所有数据系列。
本示例对 Chart1 上的第一个数据系列应用分类标签。
Charts("Chart1").SeriesCollection(1). _
    ApplyDataLabels Type:=xlDataLabelsShowLabel

  1. ApplyDataLabels

向系列应用数据标签。

  1. ApplyDataLabels

对数据点应用数据标签。

  1. ApplyFilter

应用指定的 Autofilter 对象。

  1. ApplyNames

将名称应用于指定区域中的单元格
本示例对整个工作表应用名称。
Cells.ApplyNames Names:=Array("Sales", "Profits")

  1. ApplyOutlineStyles

对指定区域应用分级显示样式
下例对选定区域应用自动分级显示样式。该选定区域必须包括工作表上的整个分级显示区域。
Selection.ApplyOutlineStyles

  1. ApplyPictToEnd

如果图片应用于系列中数据点或所有数据点之后,则为 True。Boolean 类型,可读写。

  1. ApplyPictToFront

如果图片应用于系列中数据点或所有数据点之前,则为 True。Boolean 类型,可读写。

  1. ApplyPictToSides

如果将图片应用于系列中某个数据点或所有数据点的旁边,则为 True。Boolean 类型,可读写。

  1. ArabicModes

返回或设置阿拉伯语拼写检查的模式。XlArabicModes 类型,可读写。

  1. ArbitraryXMLSupportAvailable

将文件保存为 XML 电子表格格式
expression.ArbitraryXMLSupportAvailable
expression    必需。该表达式返回一个 Application 对象。

  1. AreaGroups

在二维图表上返回一个对象,该对象既可代表单独面积图组,也可代表面积图组的集合。
本示例打开二维面积图图表组的垂直线。
Charts(1).AreaGroups(1).HasDropLines = True

  1. Areas

返回一个 Areas 集合,此集合代表多重选定区域中的所有区域
本示例在用户选定多个区域并试图执行某一命令时显示提示信息。该示例必须在工作表上运行。
If Selection.Areas.Count > 1 Then
    MsgBox "Cannot do this to a multi-area selection."
End If

  1. Arrange

对屏幕上的窗口进行排列
本示例平铺应用程序中的所有窗口。
Application.Windows.Arrange ArrangeStyle:=xlArrangeStyleTiled

  1. Array

返回一个包含数组的 Variant。
语法
Array(arglist)
所需的 arglist 参数是一个用逗号隔开的值表,这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数,则创建一个长度为 0 的数组。

  1. Asc

返回一个 Integer,代表字符串中首字母的字符代码。
语法
Asc(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符,则会产生运行时错误。

  1. Asc

对于双字节字符集 (DBCS) 语言,将全角(双字节)字符更改为半角(单字节)字符。

  1. Asin

返回一个数字的反正弦值。反正弦值是一个角度,这个角度的正弦值为 Arg1。返回的角度采用弧度的形式,其范围从 -pi/2 到 pi/2。

  1. Asinh

返回数字的反双曲正弦值。反双曲正弦值的双曲正弦值为 Arg1,因此 Asinh(Sinh(number)) 等于 Arg1。

  1. AskToUpdateLinks

如果 Microsoft Excel 打开带有链接的文件时询问用户是否更新链接则为 True
本示例设置 Microsoft Excel 每当打开包含链接的文件时就询问用户是否更新链接。
Application.AskToUpdateLinks = True

  1. Assert

有条件地在该方法出现的行上挂起执行。
语法
object.Assert booleanexpression
Assert 方法的语法有如下的对象限定符和参数:
部分描述
object 必需的。总是 Debug 对象。
booleanexpression 必需的。一个值为 True 或者 False 的表达式。

  1. Assistant

返回 Microsoft Excel 的 Assistant 对象
本示例使 Office 助手可见。
Assistant.Visible = True

  1. AssistWithAlerts

当“Office 助手”可见时,如果“Office 助手”气球发送应用程序警告,则为 True。可读/写。

  1. AssistWithHelp

如果在用户按“F1”键显示“帮助”时“Office 助手”出现,则为 True。可读/写。

  1. AssistWithWizards

如果“Office 助手”提供带向导的联机帮助,则为 True。可读/写。

  1. Atan2

返回指定的 x 和 y 坐标值的反正切值。反正切值是角度,是从 x 轴到通过原点 (0, 0) 和坐标点 (x_num, y_num) 的直线之间的夹角。该角度用弧度给出,介于 -pi 和 pi 之间(不包括 -pi)。

  1. Atanh

返回数字的反双曲正切值。数字必须介于 -1 和 1 之间(不包括 -1 和 1)。

  1. Atn

返回一个 Double,指定一个数的反正切值。
语法
Atn(number)
必要的 number 参数是一个 Double或任何有效的数值表达式。

  1. Author

返回或设置批注的作者。
本示例将活动工作表中所有由 Jean Selva 所做的批注删除。
For Each c in ActiveSheet.Comments
    If c.Author = "Jean Selva" Then c.Delete
Next

  1. AutoComplete

从列表中返回一个记忆式键入匹配项
本示例返回与“Ap”子串相匹配的记忆式键入匹配项。如果单元格 A5 所在列中包含一个与正在键入的字符串相匹配的数据项,将把该数据项作为记忆式键入匹配项返回。
s = Worksheets(1).Range("A5").AutoComplete("Ap")
If Len(s) > 0 Then
    MsgBox "Completes to " & s
Else
    MsgBox "Has no completion"
End If

  1. AutoCorrect

返回一个 AutoCorrect 对象,该对象代表 Microsoft Excel AutoCorrect 属性
本示例在 AutoCorrect 替换文本数组中设置单词“Temp.”的替换文本为“Temperature”。
With Application.AutoCorrect
    .AddReplacement "Temperature", "Temp."
End With

  1. AutoExpandListRange

表示列表(列表:包含相关数据的一系列行,或使用“创建列表”命令作为数据表指定给函数的一系列行。)的自动扩展是否被启用的 Boolean 值。在列表旁的空行或空列键入时,如果启用了自动扩展功能,则列表将扩展为包含此行或此列。Boolean 类型,可读写。
语法
表达式.AutoExpandListRange
表达式   一个代表 AutoCorrect 对象的变量。

  1. AutoFill

对指定区域中的单元格进行自动填充
本示例以工作表 Sheet1 上的单元格区域 A1:A2 为基础,对单元格区域 A1:A20 进行自动填充。运行本示例之前,请在单元格 A1 中键入 1,在单元格 A2 中键入 2。
Set sourceRange = Worksheets("Sheet1").Range("A1:A2")
Set fillRange = Worksheets("Sheet1").Range("A1:A20")
sourceRange.AutoFill Destination:=fillRange

  1. AutoFillFormulasInLists

影响由自动填充列表创建的计算列的创建。可读/写 Boolean 类型。
版本信息
 已添加版本:  Excel 2007
语法
表达式.AutoFillFormulasInLists
表达式   一个代表 AutoCorrect 对象的变量。

  1. AutoFilter

如果允许进行筛选,则返回一个 AutoFilter 对象
下面的示例将变量设置为工作表 Crew 上的筛选区域中第一列的筛选 Criteria1 属性值。
With Worksheets("Crew")
    If .AutoFilterMode Then
        With .AutoFilter.Filters(1)
            If .On Then c1 = .Criteria1
        End With
    End If
End With

  1. AutoFilter

使用“自动筛选”筛选出一个列表
本示例从工作表 Sheet1 上的 A1 单元格开始筛选出一个清单,该清单中只显示字段一为字符串“Otis”的数据项。字段一的下拉箭头将被隐藏。
Worksheets("Sheet1").Range("A1").AutoFilter _
    field:=1, _
    Criteria1:="Otis"
    VisibleDropDown:=False

  1. AutoFilterDateGrouping

如果用于日期分组的自动筛选器当前显示在指定的窗口中,则为 True。可读/写 Boolean 类型。
版本信息
 已添加版本:  Excel 2007
语法
表达式.AutoFilterDateGrouping
表达式   一个代表 Window 对象的变量。

  1. AutoFilterMode

如果当前在工作表上显示有“自动筛选”下拉箭头,则该值为 True
本示例显示工作表 Sheet1 中 AutoFilterMode 属性的当前状态。
If Worksheets("Sheet1").AutoFilterMode Then
    isOn = "On"
Else
    isOn = "Off"
End If
MsgBox "AutoFilterMode is " & isOn

  1. AutoFit

将区域中的列宽和行高调整为最适当的值
本示例调整工作表 Sheet1 中从 A 到 I 的列,以获得最适当的列宽。
Worksheets("Sheet1").Columns("A:I").AutoFit

  1. AutoFormat

对指定区域自动套用预定义的格式
本示例将预定义格式套用到 Sheet1 中的单元格区域 A1:D8 上。
Worksheets("Sheet1").Range("A1:D8"). _
    AutoFormat Format:=xlRangeAutoFormatClassic1

  1. AutoFormatAsYouTypeReplaceHyperlinks

如果MicrosoftExcel按照键入的内容自动设置超链接的格式,则该值为 True(默认)
在本示例中,Microsoft Excel 判断是否可按照键入的内容自动设置超链接的格式,并通知用户。
Sub CheckHyperlinks()
    ' Determine if automatic formatting is enabled and notify user.
    If Application.AutoFormatAsYouTypeReplaceHyperlinks = True Then
        MsgBox "Automatic formatting for typing in hyperlinks is enabled."
    Else
        MsgBox "Automatic formatting for typing in hyperlinks is not enabled."
    End If
End Sub

  1. AutoLoad

如果打开包含指定 OLE 对象的工作簿时自动载入该 OLE 对象,则为 True。Boolean 类型,可读写。

  1. AutoMargins

如果 Microsoft Excel 自动计算文本框边距,则该属性值为 True。Boolean 类型,可读写。

  1. AutomaticStyles

如果分级显示使用自动样式,则该属性值为 True。Boolean 类型,可读写。

  1. AutomationSecurity

返回或设置 MsoAutomationSecurity 常数,该常数代表在用编程方法打开文件时,Microsoft Excel 所使用的安全模式
本示例捕获当前的自动安全设置,更改设置以禁用宏,显示“打开”对话框,在打开选取的文档后,将自动安全模式设置回初始设置。
Sub Security()
    Dim secAutomation As MsoAutomationSecurity
    secAutomation = Application.AutomationSecurity
    Application.AutomationSecurity = msoAutomationSecurityForceDisable
    Application.FileDialog(msoFileDialogOpen).Show
    Application.AutomationSecurity = secAutomation
End Sub

  1. AutoOutline

自动为指定区域创建分级显示
本示例创建工作表 Sheet1 上单元格区域 A1:G37 的分级显示。该区域必须包含汇总行或汇总列。
Worksheets("Sheet1").Range("A1:G37").AutoOutline

  1. AutoPercentEntry

如果在向格式设置为百分比的单元格中输入数值时,并不自动乘以 100,则其值为 True
本示例使得以后向格式为百分比的单元格中输入的数据都将自动乘以 100。
Application.AutoPercentEntry = False

  1. AutoRecover

返回一个AutoRecover对象,该对象在规定的时间间隔内对所有的文件格式进行备份
在本示例中,Time 属性与 AutoRecover 属性结合使用,可将 Microsoft Excel 在保存另一个副本之前的等待时间间隔设置为 5 分钟。
Sub UseAutoRecover()
    Application.AutoRecover.Time = 5
    MsgBox "The time that will elapse between each automatic " & _
        "save has been set to " & _
        Application.AutoRecover.Time & " minutes."
End Sub

  1. AutoRepublish

在保存工作表时,Microsoft Excel 判断 PublishObjects 集合中的任意一个项目是否具有设置为 True 的 AutoRepublish 属性。如果有,则重新发布该项目。默认值为 False。Boolean 类型,可读写。

  1. AutoScaleFont

如果对象中的文本在对象大小更改时更改字号,则为 True。默认值是 True。Variant 型,可读写。

  1. AutoScaling

如果 Microsoft Excel 对三维图表进行缩放使其大小接近于等价的二维图表,则该值为 True
本示例自动对 Chart1 进行缩放。本示例应在三维图表上运行。
With Charts("Chart1")
    .RightAngleAxes = True
    .AutoScaling = True
End With

  1. AutoShapeType

返回或设置指定的 Shape 或 ShapeRange 对象的形状类型,该对象必须代表自选图形,而不能代表直线、任意多边形图形或连接符。MsoAutoShapeType 类型,可读写。
语法
表达式.AutoShapeType
表达式   一个代表 Shape 对象的变量。

  1. AutoShow

显示指定数据透视表中行字段、页字段或列字段顶部或底部数据项的个数。

  1. AutoShowCount

返回指定数据透视表字段中自动显示的首项号或末项号。Long 类型,只读。

  1. AutoShowField

返回数据字段的名称,该字段用于判断在指定数据透视表字段中自动显示的是首项还是末项。String 类型,只读。

  1. AutoShowRange

如果指定数据透视表字段中自动显示首项,则返回 xlTop;如果自动显示末项,则返回 xlBottom。Long 类型,只读。

  1. AutoShowType

如果启用指定数据透视表字段的 AutoShow,则返回 xlAutomatic;如果禁用 AutoShow,则返回 xlManual。Long 类型,只读。

  1. AutoSize

如果指定对象能自动调整大小,以适应其中所包含的文字,则该属性值为 True。Boolean 类型,可读写。

  1. AutoSort

为数据透视表建立自动字段排序规则。

  1. AutoSortCustomSubtotal

返回用于对指定数据透视表字段进行自动排序的自定义分类汇总的名称。只读。

  1. AutoSortField

返回用于对指定数据透视表字段进行自动排序的数据字段的名称。String 类型,只读。

  1. AutoSortOrder

返回用于对指定数据透视表字段进行自动排序的次序。可为 XlSortOrder 常量之一。Long 类型,只读。

  1. AutoSortPivotLine

返回用于对指定数据透视表字段进行自动排序的 PivotLine 的名称。只读。

  1. AutoText

如果对象会根据内容自动生成合适的文字,则为 True。可读/写 Boolean 类型。

  1. AutoText

如果对象会根据内容自动生成合适的文字,则为 True。Boolean 类型,可读写。

  1. AutoUpdate

如果源更改时 LinkFormat 对象自动进行更新,则此属性为 True。Boolean 类型,只读。

  1. AutoUpdate

如果数据源改变时 OLE 对象将自动更新,则为 True。仅当对象是链接方式时有效(该对象的 OLEType 属性必须设为 xlOLELink)。Boolean 类型,只读。

  1. AutoUpdateFrequency

以分钟为单位返回或设置对共享工作簿进行自动更新的时间间隔。
本示例使共享工作簿每五分钟自动更新一次。
ActiveWorkbook.AutoUpdateFrequency = 5

  1. AutoUpdateSaveChanges

如果共享工作簿自动更新时,对其所做的更改将传送到其他用户,则该值为 True
本示例使共享工作簿自动更新时,将对其所做的更改传送到其他用户。
ActiveWorkbook.AutoUpdateSaveChanges = True

  1. AveDev

返回多个数据点与其平均值的绝对偏差的平均值。AveDev 是对数据集中可变性的度量。

  1. Average

返回参数的平均值(算术平均值)。

  1. AverageIf

返回区域内满足给定条件的所有单元格的平均值(算术平均值)。

  1. AverageIfs

返回满足多个条件的所有单元格的平均值(算术平均值)。

  1. Axes

返回代表图表上单个坐标轴或坐标轴集合的某个对象。
本示例为 Chart1 的分类坐标轴添加坐标轴标志。
With Charts("Chart1").Axes(xlCategory)
    .HasTitle = True
    .AxisTitle.Text = "July Sales"
End With
本示例将关闭 Chart1 中分类坐标轴的主要网格线。
Charts("Chart1").Axes(xlCategory).HasMajorGridlines = False

  1. AxisBetweenCategories

如果数值轴与分类坐标轴相交于分类之间,则该属性值为 True。Boolean 类型,可读写。

  1. AxisGroup

返回或设置一个 XlAxisGroup 值,它代表指定系列的组。

  1. AxisGroup

返回或设置一个 XlAxisGroup 值,它代表所指定坐标轴的组。

  1. AxisGroup

返回或设置一个 XlAxisGroup 值,它代表指定图表组的组。

  1. AxisTitle

返回一个 AxisTitle 对象,该对象表示指定坐标轴的标题。只读。

  1. Excel VBA属性、方法、事件大全——Part2(Complete List of Excel VBA attribute/method and event)

这张表还要加一列:对象列。因为不同的对象,可以拥有相同名称的属性和方法。

  1. Attribute/Method/Event

Description

  1. BackColor

返回或设置一个 ColorFormat 对象,它代表指定的填充背景色。

  1. BackColor

返回或设置一个 ChartColorFormat 对象,它代表指定的填充背景色。

  1. Background

返回或设置文本背景类型
本示例为第一张工作表上的第一张嵌入图表添加图表标题,然后设置标题的字体大小和背景类型。本示例假定图表在第一张工作表上。
Sub UseBackground()
    With Worksheets(1).ChartObjects(1).Chart
        .HasTitle = True
        .ChartTitle.Text = "Rainfall Totals by Month"
        With .ChartTitle.Font
            .Size = 10
            .Background = xlBackgroundTransparent
        End With
    End With
End Sub

  1. BackgroundChecking

警告用户并指出违背可用错误检查规则的所有单元格。如果该属性设置为 True (默认值),则在违背启用错误的所有单元格旁边将出现“自动更正选项”按钮。如果为 False,则禁用背景错误检查。Boolean 类型,可读写。

  1. BackgroundQuery

如果查询表的查询是异步执行(在后台执行)的,则为 True。Boolean 类型,可读写。

  1. BackgroundQuery

如果数据透视表的查询是异步执行(在后台执行)的,则为 True。Boolean 类型,可读写。

  1. BackgroundStyle

返回或设置背景样式。可读/写 MsoBackgroundStyleIndex 类型。
版本信息
 已添加版本:  Excel 2007
语法
表达式.BackgroundStyle
表达式   一个代表 Shape 对象的变量。

  1. Backward

返回或设置趋势线向后延伸的周期数(或散点图中的单位数)。Long 类型,可读写。

  1. Backward2

返回或设置趋势线向后延伸的周期数目(或散点图中的单位个数)。可读/写 Double 类型。

  1. BahtText

将数字转换为泰语文本并添加后缀“泰铢”。

  1. BalloonError

获取表示所记录的最后一个气球错误的值。只读

  1. Bar3DGroup

返回一个 ChartGroup 对象,该对象代表三维图表中的条形图组
本示例将三维条形图图表组中各条形簇之间的距离设置为条形宽度的 50% 。
Charts(1).BarGroup3DGroup.GapWidth = 50

  1. BarGroups

在二维图表中返回一个对象,该对象既可代表单个条形图组,也可代表一个条形图组集合。
本示例将二维条形图图表组中各条形簇之间的距离设置为条形宽度的 50% 。
Charts(1).BarGroups(1).GapWidth = 50

  1. BarShape

返回或设置用于三维条形图或柱形图的形状。
本示例设置用于第一个图表的第一个数据系列的形状。
Charts(1).SeriesCollection(1).BarShape = xlConeToPoint

  1. BarShape

返回或设置用于三维条形图或柱形图的形状。XlBarShape 类型,可读写。

  1. BaseField

返回或设置自定义计算的基准字段。本属性仅对数据字段有效。Variant 类型,可读写。

  1. BaseItem

返回或设置自定义计算基准字段的数据项,仅对数据字段有效。Variant 类型,可读写。

  1. BaseUnit

返回或设置指定分类轴的基本单位。XlTimeUnit 类型,可读写。

  1. BaseUnitIsAuto

如果由 Microsoft Excel 为指定的分类轴选取适当的基本单位,则该值为 True。默认值为 True。Boolean 类型,可读写。

  1. BCCRecipients

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. Beep

通过计算机喇叭发出一个声调。
语法
Beep

  1. BeforeClose

在关闭工作簿之前,先产生此事件
本示例将 BeforeClose 事件的响应设置为保存工作簿的任何更改。
Private Sub Workbook_BeforeClose(Cancel as Boolean)
    If Me.Saved = False Then Me.Save
End Sub

  1. BeforeDoubleClick

当双击某工作表时产生此事件,此事件先于默认的双击操作
Private Sub expression_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
expression引用在类模块中带有事件声明的 Worksheet 类型对象的变量。

  1. BeforeDoubleClick

当双击一张嵌入图表时产生此事件,并且此事件先于默认的双击操作。
本示例将忽略图表基底的默认双击操作。
Private Sub Chart_BeforeDoubleClick(ByVal ElementID As Long, _
    ByVal Arg1 As Long, ByVal Arg2 As Long, Cancel As Boolean)
    If ElementID = xlFloor Then
        Cancel = True
        MsgBox "Chart formatting for this item is restricted."
    End If
End Sub

  1. BeforePrint

在打印指定工作簿(或者其中的任何内容)之前,产生此事件。
本示例在打印之前对当前活动工作簿的所有工作表重新计算。
Private Sub Workbook_BeforePrint(Cancel As Boolean)
    For Each wk in Worksheets
        wk.Calculate
    Next
End Sub

  1. BeforeRefresh

在刷新查询表之前产生此事件。这里的刷新包括调用 Refresh 方法引起的变化,用户的操作引起的变化和打开包含该查询表的工作簿引起的变化。

  1. BeforeRightClick

当用鼠标右键单击某工作表时产生此事件,此事件先于默认的右键单击操作。
本示例为 B1:B10 单元格添加新的快捷菜单项。
Private Sub Worksheet_BeforeRightClick(ByVal Target As Range, _
        Cancel As Boolean)
    Dim icbc As Object
    For Each icbc In Application.CommandBars("cell").Controls
        If icbc.Tag = "brccm" Then icbc.Delete
    Next icbc
    If Not Application.Intersect(Target, Range("b1:b10")) _
        Is Nothing Then
            With Application.CommandBars("cell").Controls _
                .Add(Type:=msoControlButton, before:=6, _
                temporary:=True)
           .Caption = "New Context Menu Item"
           .OnAction = "MyMacro"
           .Tag = "brccm"
        End With
    End If
End Sub

  1. BeforeRightClick

当用鼠标右键单击一个嵌入图表时发生此事件,此事件先于默认的右键单击操作。
Private Sub expression_BeforeRightClick(Cancel As Boolean)
expression引用在类模块中带有事件声明的Chart类型对象的变量。
Cancel必需。当事件发生时为False。如果该事件过程将本参数设为True,则该过程执行结束之后将不执行默认的右键单击操作。

  1. BeforeSave

保存工作簿之前产生此事件。
本示例在保存工作簿之前询问用户是否保存。
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, _
        Cancel as Boolean)
    a = MsgBox("Do you really want to save the workbook?", vbYesNo)
    If a = vbNo Then Cancel = True
End Sub

  1. BeforeXmlExport

在 Microsoft Excel 将指定的工作簿中的数据保存或导出到 XML 数据文件之前,发生此事件
expression.BeforeXmlExport(Map, Url, Cancel)
expression    必需。该表达式返回一个 Workbook 对象。

  1. BeforeXmlImport

在刷新现有的 XML 数据连接或将新的 XML 数据导入到指定的 Microsoft Excel 工作簿之前,发生此事件。
expression.BeforeXmlImport(Map, Url, IsRefresh, Cancel)
expression      必需。该表达式返回“应用于”列表中的对象之一。

  1. BeginArrowheadLength

返回或设置指定线条起点的箭头的长度。MsoArrowheadLength 类型,可读写。

  1. BeginArrowheadStyle

返回或设置指定线条起点的箭头样式。MsoArrowheadStyle 类型,可读写。

  1. BeginArrowheadWidth

返回或设置指定线条起点的箭头宽度。MsoArrowheadWidth 类型,可读写。

  1. BeginConnect

将指定的连接符的起点连接到指定的形状上。如果在连接符的起点与其他形状之间已经有了连接,那么该已有的连接将中断。如果连接符的起点不在所需的连接结点上,本方法将把连接符的起点移到该连接结点,并对连接符的大小和位置作相应的调整。可用 EndConnect 方法将连接符的终点连接到某一形状上。

  1. BeginConnected

如果指定的连接符的起点已连接到了某一形状上,则该属性值为 True。MsoTriState 类型,只读。

  1. BeginConnectedShape

返回一个 Shape 对象,该对象代表指定连接符的起点所连到的形状。只读。

  1. BeginConnectionSite

返回一个整数,该整数指定连接符起点的连接结点。Long 类型,只读。

  1. BeginDisconnect

使指定的连接符的起点与其所连接的形状脱离。本方法并不修改连接符的尺寸和位置:连接符的起点仍保留在原来所连接的连接结点的位置,但与该连接结点之间不再有连接。可用 EndDisconnect 方法使连接符的终点与某一形状脱离。

  1. BesselI

返回修正的 Bessel 函数,它等效于计算纯虚数参数值的 Bessel 函数。

  1. BesselJ

返回 Bessel 函数。

  1. BesselK

返回修正 Bessel 函数,它等效于根据纯虚数参数计算的 Bessel 函数。

  1. BesselY

返回 Bessel 函数,该函数也称为 Weber 函数或 Neumann 函数。

  1. BetaDist

返回 Beta 累积分布函数。

  1. BetaInv

对于指定的 Beta 分布,返回累积分布函数的反函数。即,如果 probability = BetaDist(x,...),则 BetaInv(probability,...) = x。

  1. Bin2Dec

将二进制数转换为十进制数。

  1. Bin2Hex

将二进制数转换为十六进制数。

  1. Bin2Oct

将二进制数转换为八进制数。

  1. BinomDist

返回一元二项式分布的概率。

  1. BlackAndWhite

如果指定文档中的元素以黑白方式打印,则该属性值为 True。Boolean 类型,可读写。

  1. BlackWhiteMode

返回或设置一个值,该值指明以黑白模式查看演示文稿时指定形状出现的方式。MsoBlackWhiteMode,可读写。
语法
表达式.BlackWhiteMode
表达式   一个代表 Shape 对象的变量。

  1. Blur

返回或设置指定底纹的模糊度。可读/写 Single 类型。

  1. Bold

如果字体设为加粗格式,则该值为 True
本示例将 Sheet1 的 A1:A5 区域的字体设为加粗。
Worksheets("Sheet1").Range("A1:A5").Font.Bold = True

  1. Border

返回一个 Border 对象,它代表对象的边框。

  1. BorderAround

向单元格区域添加边框,并设置该边框的 Color、LineStyle 和 Weight 属性
本示例向工作表 Sheet1 上的区域 A1:D4 添加红色的粗外框。
Worksheets("Sheet1").Range("A1:D4").BorderAround _
        ColorIndex:=3, Weight:=xlThick

  1. Borders

返回Borders集合,该集合代表样式或单元格区域的边框
本示例将 Sheet1 中单元格 B2 的底部边框颜色设置为红色。
Sub SetRangeBorder()
    With Worksheets("Sheet1").Range("B2").Borders(xlEdgeBottom)
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = 3
    End With
End Sub

  1. Borders

返回或设置一个 Borders 集合,它代表基于单元格边框格式的搜索条件。
语法

表达式.Borders

表达式   一个代表 CellFormat 对象的变量。

  1. Borders

返回一个 Borders 集合,它代表样式或单元格区域(包括定义为条件格式一部分的区域)的边框。
语法
表达式.Borders
表达式   一个代表 Style 对象的变量。

  1. Borders

返回一个 Borders 集合,它代表样式或单元格区域(包括定义为条件格式一部分的区域)的边框。

  1. BottomMargin

以磅为单位返回或设置底端边距的大小。Double 类型,可读写。

  1. BottomRightCell

返回一个 Range 对象,它代表位于该对象右下角下方的单元格。只读。
语法
表达式.BottomRightCell
表达式   一个代表 Shape 对象的变量。

  1. BottomRightCell

返回一个 Range 对象,它代表位于该对象右下角下方的单元格。只读。

  1. BreakLink

将链接到其他 Microsoft Excel 源或 OLE 源的公式转换为值
本示例中,Microsoft Excel 转换了活动工作簿中的第一个链接(Excel 链接类型)。本示例假定在活动工作簿中至少存在一个连接到其他 Excel 源的公式。
Sub UseBreakLink()
    Dim astrLinks As Variant
    ' Define variable as an Excel link type.
    astrLinks = ActiveWorkbook.LinkSources(Type:=xlLinkTypeExcelLinks)
    ' Break the first link in the active workbook.
    ActiveWorkbook.BreakLink _
        Name:=astrLinks(1), _
        Type:=xlLinkTypeExcelLinks
End Sub

  1. BreakSideBySide

使用此方法可结束两个窗口的并排模式
下例结束了并排模式。
Sub CloseSideBySide()
   ActiveWorkbook.Windows.BreakSideBySide
End Sub

  1. Brightness

返回或设置指定图片或 OLE 对象的亮度。该属性的值必须是 0.0(最暗)到 1.0(最亮)之间的数。Single 型,可读写。

  1. BringToFront

将对象放到 z-次序前面。

  1. BubbleScale

返回或设置指定图表组中气泡的缩放比例。可为从 0(零)到 300 之间的整数,表示相对于默认大小的百分率。仅适用于气泡图。Long 类型,可读写。

  1. BubbleSizes

返回或设置一个字符串,该字符串引用包含气泡图 x 值、y 值和大小数据的工作表单元格。在返回单元格引用时,它将返回以 A1 样式注释描述单元格的字符串。要为气泡图设置大小数据,必须使用 R1 样式注释。仅适用于气泡图。Variant 类型,可读写。

  1. Build

返回 Microsoft Excel 连编号
本示例检测 Build 属性。
If Application.Build > 2500 Then
    ' build-dependent code here
End If

  1. BuildFreeform

建立一个任意多边形对象。返回一个 FreeformBuilder 对象,该对象代表正在创建的任意多边形。用 AddNodes 方法向任意多边形添加线段。如果任意多边形中已包含了一个以上的线段,则可用 ConvertToShape 方法将 FreeformBuilder 对象转换为 Shape 对象,该对象将具有在 FreeformBuilder 对象中定义的几何属性。
语法
表达式.BuildFreeform(EditingType, X1, Y1)
表达式   一个代表 Shapes 对象的变量。
参数
名称必选/可选数据类型描述
EditingType 必选 MsoEditingType 第一个节点的编辑属性。
X1 必选 Single 任意图形中第一个节点相对于文档左上角的位置(以磅为单位)。
Y1 必选 Single 任意图形中第一个节点相对于文档左上角的位置(以磅为单位)。
返回值
FreeformBuilder

  1. BuiltIn

如果指定的命令栏是容器应用程序的内置命令栏,则获取 True。如果是自定义命令栏,则返回 False。只读。
语法
表达式.BuiltIn
表达式   一个代表 CommandBar 对象的变量。
返回值
Boolean

  1. BuiltIn

如果样式为内置样式,则为 True。只读 Boolean 类型。
语法
表达式.BuiltIn
表达式   一个代表 Style 对象的变量。

  1. BuiltIn

如果样式为内置样式,则为 True。只读 Boolean 类型。

  1. BuiltinDocumentProperties

返回一个 DocumentProperties 集合,该集合代表指定工作簿的所有内置文档属性
本示例在第一张工作表中以列表的形式显示所有内置文档属性的名称。
rw = 1
Worksheets(1).Activate
For Each p In ActiveWorkbook.BuiltinDocumentProperties
    Cells(rw, 1).Value = p.Name
    rw = rw + 1
Next

  1. Excel VBA属性、方法、事件大全——Part3(Complete List of Excel VBA attribute/method and event)

(提示:CTRL+F,输入你感兴趣的关键字来碰碰运气吧!)

  1. Attribute/
    Method/Event

Description

  1. CacheIndex

返回或设置数据透视表缓存的索引号。Long 类型,可读写。

  1. Calculate

计算所有打开的工作簿、工作簿中的一张特定的工作表或者工作表中指定区域的单元格
本示例计算 Sheet1 已用区域中 A 列、B 列和 C 列的公式。
Worksheets("Sheet1").UsedRange.Columns("A:C").Calculate

  1. Calculate

对于 Worksheet 对象,在对工作表进行重新计算之后产生此事件
每当工作表重新计算时,本示例就调整 A 列到 F 列的宽度。
Private Sub Worksheet_Calculate()
    Columns("A:F").AutoFit
End Sub

  1. Calculate

对于 Chart 对象,在图表对新的数据点或者更改的数据点绘制之后产生此事件。
Private Sub object_Calculate()
object     Chart 或者 Worksheet。有关对 Chart 对象使用事件的详细内容,请参阅 Chart 对象事件的用法。

  1. CalculateBeforeSave

如果将工作簿保存到磁盘之前先进行计算则为 True
本示例设置 Microsoft Excel 保存工作簿到磁盘之前对工作簿进行计算。
Application.Calculation = xlManual
Application.CalculateBeforeSave = True

  1. CalculatedFields

由 PivotField 对象组成的集合,这些对象代表指定数据透视表中的所有计算字段

  1. CalculatedFields

返回一个 CalculatedFields 集合,该集合表示指定数据透视表中的所有计算字段。只读。

  1. CalculatedItems

返回一个 CalculatedItems 集合,该集合表示指定数据透视表中的所有计算项。只读。

  1. CalculatedMembers

返回一个 CalculatedMembers 集合,该集合表示 OLAP 数据透视表的所有计算成员和计算方法。

  1. CalculateFull

促使对所有打开工作簿中的数据进行完整计算
本示例将当前 Microsoft Excel 的版本与上次计算该工作簿的 Excel 版本进行比较。如果两个版本不同,则对所有打开工作簿中的数据进行一次完整计算。
If Application.CalculationVersion <> _
    Workbooks(1).CalculationVersion Then
    Application.CalculateFull
End If

  1. CalculateFullRebuild

对于所有打开的工作簿,强制数据的完整计算并重建从属关系
本示例将当前 Microsoft Excel 的版本与上次计算该工作簿的 Excel 版本进行比较。如果两个版本不同,则对所有打开工作簿中的数据进行一次完整计算并重建从属关系。
Sub UseCalculateFullRebuild()
    If Application.CalculationVersion <> _
        Workbooks(1).CalculationVersion Then
        Application.CalculateFullRebuild
    End If
End Sub

  1. Calculation

Application 对象:返回或者设置计算模式
PivotField 对象:返回或设置指定字段计算结果的类型
本示例设置 Microsoft Excel 在将工作簿保存回磁盘之前对工作簿进行计算。
Application.Calculation = xlCalculateManual
Application.CalculateBeforeSave = True

  1. Calculation

返回或设置一个 XlPivotFieldCalculation 值,它代表指定字段执行的计算类型。此属性仅对数据字段有效。

  1. CalculationInterruptKey

设置或返回一个 XlCalculationInterruptKey 常量,该常量指定在执行计算时能中断 Microsoft Excel 的键
在本示例中,Microsoft Excel 确定对中断计算的键的设置,并通知用户。
Sub CheckInterruptKey()
    ' Determine the calculation interrupt key and notify the user.
    Select Case Application.CalculationInterruptKey
        Case xlAnyKey
            MsgBox "The calcuation interrupt key is set to any key."
        Case xlEscKey
            MsgBox "The calcuation interrupt key is set to 'Escape'"
        Case xlNoKey
            MsgBox "The calcuation interrupt key is set to no key."
    End Select
End Sub

  1. CalculationVersion

返回一个数字,其最右 4 位为计算引擎的次版本号,其他数字(左边)为 Microsoft Excel 的主版本号
本示例将当前 Microsoft Excel 的版本与上次计算工作簿的 Excel 的版本进行比较。如果两个版本号不同,则本示例将 blnFullCalc 变量设置为 True。
If Application.CalculationVersion <> _
    Workbooks(1).CalculationVersion Then
    blnFullCalc = True
Else
    blnFullCalc = False
End If

  1. Call

将控制权转移到一个 Sub 过程,Function 过程,或动态链接库 (DLL)过程。
语法
[Call] name [argumentlist]
Call 可选参数;关键字。如果指定了这个关键字,则 argumentlist 必须加上括号,例如:
  Call MyProc(0)
name 必要参数,要调用的过程名称。
argumentlist 

  1. CallByName

执行一个对象的方法,或者设置或返回一个对象的属性。
语法
CallByName(object, procname, calltype,[args()])
object 必需的;变体型(对象)。函数将要执行的对象的名称。
procname 必需的;变体型(字符串)。一个包含该对象的属性名称或者方法名称的字符串表达式。
calltype 必需的;常数。一个 vbCallType 类型的常数,代表正在被调用的过程的类型。
args() 可选的:变体型(数组)。

  1. Caller

返回关于调用 Visual Basic 的信息
本示例显示关于调用 Visual Basic 的信息。
Select Case TypeName(Application.Caller)
    Case "Range"
        v = Application.Caller.Address
    Case "String"
        v = Application.Caller
    Case "Error"
        v = "Error"
    Case Else
        v = "unknown"
End Select
MsgBox "caller = " & v

  1. Callout

返回一个 CalloutFormat 对象,它包含指定形状的标注格式属性。应用于代表线形标注的 Shape 对象。只读。
语法
表达式.Callout
表达式   一个代表 Shape 对象的变量。

  1. CancelRefresh

取消指定查询表的所有后台查询。使用 Refreshing 属性可以确定当前是否正在进行后台查询。

  1. CanCheckIn

如果 Microsoft Excel 可以将指定的工作簿签入到服务器上,则该值为 True
本示例检查服务器,查看指定的工作簿是否可以签入。如果可以,本示例将保存并关闭工作簿,并将其签回服务器。
Sub CheckInOut(strWkbCheckIn As String)
    ' Determine if workbook can be checked in.
    If Workbooks(strWkbCheckIn).CanCheckIn = True Then
        Workbooks(strWkbCheckIn).CheckIn
        MsgBox strWkbCheckIn & " has been checked in."
    Else
        MsgBox "This file cannot be checked in " & _
            "at this time.  Please try again later."
    End If
End Sub

  1. CanCheckOut

如果 Microsoft Excel 可以将指定的工作簿从服务器签出,则该值为 True
本示例验证工作簿没有被其他用户签出,并验证该工作簿是否可以被签出。如果工作簿可以签出,本示例将工作簿复制到本机以进行编辑。
Sub UseCanCheckOut(docCheckOut As String)
    ' Determine if workbook can be checked out.
    If Workbooks.CanCheckOut(Filename:=docCheckOut) = True Then
        Workbooks.CheckOut (Filename:=docCheckOut)
    Else
        MsgBox "You are unable to check out this document at this time."
    End If
End Sub

  1. CanPlaySounds

不能使用此属性。声音附注从 Microsoft Excel 中删除。

  1. CanRecordSounds

不能使用此属性。声音附注从 Microsoft Excel 中删除。

  1. CapitalizeNamesOfDays

如果日期名称的第一个字母自动大写,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.CapitalizeNamesOfDays
表达式   一个代表 AutoCorrect 对象的变量。

  1. Caption

依据对象类型返回具有不同含义的文本
本示例将出现在 Microsoft Excel 主窗口标题栏中的名称设置为自定义的名称。
Application.Caption = "Blue Sky Airlines Reservation System"

本示例将活动工作簿中第一个窗口的名称设置为“Consolidated Balance Sheet”。然后该名称被用作 Windows 属性的索引。
ActiveWorkbook.Windows(1).Caption = "Consolidated Balance Sheet"
ActiveWorkbook.Windows("Consolidated Balance Sheet").ActiveSheet.Calculate

  1. Caption

显示在文档窗口标题栏中的名称
本示例将活动工作簿中第一个窗口的名称设置为“Consolidated Balance Sheet”。然后该名称被用作 Windows 属性的索引。
ActiveWorkbook.Windows(1).Caption = "Consolidated Balance Sheet"
ActiveWorkbook.Windows("Consolidated Balance Sheet") _
    .ActiveSheet.Calculate

  1. Caption

该字符范围内的文本
expression.Caption
expression必需。该表达式返回上面的对象之一。

  1. Caption

返回一个 String 值,它代表多维数据集域的标签文本。

  1. Caption

返回一个 String 值,它代表数据透视字段的标签文本。

  1. Caption

返回一个 String 值,它代表数据透视项的标签文本。

  1. Caption

返回或设置一个 String 值,它代表图表标题文本的方向。

  1. Caption

返回或设置一个 String 值,它代表坐标轴标题文本。

  1. Caption

返回或设置一个 String 值,它代表显示单位标志文本。

  1. Caption

返回或设置一个 String 值,它代表数据标签文本。

  1. Caption

回或设置一个 Variant 值,它代表文档窗口标题栏中显示的名称。
语法
表达式.Caption
表达式   一个代表 Window 对象的变量。

  1. Category

返回或设置指定名称在宏语言中的分类
String 类型,可读写。
语法
表达式.Category
表达式   一个代表 Name 对象的变量。

  1. CategoryLocal

返回或设置以用户语言表示名称的类别。String 类型,可读写。
语法
表达式.CategoryLocal
表达式   一个代表 Name 对象的变量。

  1. CategoryNames

以文本数组形式返回或设置指定坐标轴中所有分类的名称。该属性既可设为一个数组,也可设为一个包含所有分类名称的 Range 对象。Variant 类型,可读写。

  1. CategoryType

返回或设置分类轴类型。XlCategoryType 类型,可读写。

  1. Cbool

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CBool(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. Cbyte

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CByte(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. CCRecipients

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. Ccur

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CCur(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. Cdate

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CDate(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. CDbl

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CDbl(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. Cdec

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CDec(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. Ceiling

返回向上舍入(远离零)到最接近的 significance 的倍数的 number。

  1. CellDragAndDrop

如果允许拖放单元格则为 True
本示例打开允许拖放单元格的功能。
Application.CellDragAndDrop = True

  1. CellFormat

表示单元格格式的搜索条件
使用 Application 的 FindFormat 或 ReplaceFormat 属性可返回一个 CellFormat 对象。

对于 CellFormat 对象,可使用其 Borders、Font 或 Interior 属性为单元格格式定义搜索条件。

  1. Cells

Application 对象:返回 Range 对象,该对象代表活动工作表中所有的单元格
Range 对象:返回 Range 对象,该对象代表指定区域内的所有单元格
Worksheet 对象:返回 Range 对象,该对象代表工作表中所有的单元格
本示例将工作表“Sheet1”中单元格“C5”的字体大小设置为 14 磅。
Worksheets("Sheet1").Cells(5, 3).Font.Size = 14
本示例将工作表“Sheet1”中单元格区域“A1: C5”的字体样式设置为斜体。
Worksheets("Sheet1").Activate
Range(Cells(1, 1), Cells(5, 3)).Font.Italic = True

  1. Cells

返回一个 Range 对象,该对象代表工作表(不仅仅是当前使用的单元格)中的所有单元格
本示例将 Sheet1 中单元格 C5 的字体大小设置为 14 磅。
Worksheets("Sheet1").Cells(5, 3).Font.Size = 14
本示例清除 Sheet1 上第一个单元格的公式。
Worksheets("Sheet1").Cells(1).ClearContents

  1. Cells

返回一个 Range 对象,该对象代表指定单元格区域中的单元格
本示例将 Sheet1 上所有单元格的字体设置为 8 磅的“Arial”字体。
With Worksheets("Sheet1").Cells.Font
    .Name = "Arial"
    .Size = 8
End With
本示例将 Sheet1 上单元格区域 A1: C5 的字体样式设置为斜体。
Worksheets("Sheet1").Activate
Range(Cells(1, 1), Cells(5, 3)).Font.Italic = True

  1. CenterFooter

居中对齐 PageSetup 对象中的页脚信息。可读/写 String 类型。

  1. CenterFooterPicture

返回一个 Graphic 对象,该对象表示页脚中间部分的图片。用于设置图片的属性。

  1. CenterHeader

居中对齐 PageSetup 对象中的页眉信息。可读/写 String 类型。

  1. CenterHeaderPicture

返回一个 Graphic 对象,该对象表示页眉中间部分的图片。用于设置图片的属性。

  1. CenterHorizontally

如果在页面的水平居中位置打印指定工作表,则该属性值为 True。Boolean 类型,可读写。

  1. CenterVertically

如果在页面的垂直居中位置打印指定工作表,则该属性值为 True。Boolean 类型,可读写。

  1. CentimetersToPoints

将计量单位从厘米转换为磅(一磅等于 0.035 厘米)。
本示例将 Sheet1 的左页边距设为 5 厘米。
Worksheets("Sheet1").PageSetup.LeftMargin = _
        Application.CentimetersToPoints(5)

  1. Change

当用户更改工作表中的单元格,或外部链接引起单元格的更改时产生此事件。
本示例将更改的单元格的颜色设为蓝色。
Private Sub Worksheet_Change(ByVal Target as Range)
    Target.Font.ColorIndex = 5
End Sub

  1. ChangeFileAccess

更改工作簿的访问权限
本示例将活动工作簿设为只读。
ActiveWorkbook.ChangeFileAccess Mode:=xlReadOnly

  1. ChangeHistoryDuration

返回或者设置共享工作簿的修订记录中所要显示修订信息的天数。
本示例检查修订追踪功能是否有效,如果有效,则对修订记录中显示的天数进行设置。关闭工作簿时,将删除修订记录中的任何比该属性设置的日期旧的修订。
With ActiveWorkbook
    If .KeepChangeHistory Then
        .ChangeHistoryDuration = 7
    End If
End With

  1. ChangeLink

将链接从某一文档更改到另一文档
本示例更改 Microsoft Excel 链接。
ActiveWorkbook.ChangeLink "c:\excel\book1.xls", _
    "c:\excel\book2.xls", xlExcelLinks

  1. ChangePassword

更改受保护的工作表中可以进行编辑的区域的密码。

  1. ChangeScenario

更改方案以得到一组新的可变单元格及方案值(可选)。

  1. ChangingCells

返回一个 Range 对象,该对象表示方案的可变单元格。只读。

  1. Characters

返回一个 Characters 对象,该对象代表对象文字的字符区域
本示例将 Sheet1 中 A1 单元格第三个字符的格式设为加粗。
With Worksheets("Sheet1").Range("A1")
    .Value = "abcdefg"
    .Characters(3, 1).Font.Bold = True
End With

  1. Characters

代表包含文本的对象中的字符

  1. Characters

返回一个 Characters 对象,该对象表示某个形状的文本框架中的字符区域。可以使用 Characters 对象向文本框架中添加字符和设置字符的格式。

  1. Characters

返回 Characters 对象,它代表对象文本内某个区域的字符。使用 Characters 对象可为文本字符串内的字符设置格式。

  1. CharacterType

返回或设置指定单元格中拼音文本的类型。XlPhoneticCharacterType 类型,可读写。

  1. Chart

代表工作簿中的图表。该图表既可为嵌入图表(包含在 ChartObject 中),也可为一个单独的图表工作表。

  1. Chart

返回 Chart 对象,该对象代表形状中包含的图表。只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.Chart
表达式   一个代表 Shape 对象的变量。

  1. Chart

返回一个 Chart 对象,该对象代表对象中包含的图表。只读。

  1. ChartArea

返回 ChartArea 对象,该对象代表图表的整个图表区
本示例将 Chart1 的图表区域内部颜色设为红色,并将其边框颜色设为蓝色。
With Charts("Chart1").ChartArea
    .Interior.ColorIndex = 3
    .Border.ColorIndex = 5
End With

  1. ChartGroups

返回一个对象,该对象代表图表中单个图表组或所有图表组的集合。
本示例显示 Chart1 中第一个图表组的涨跌柱线,并对其颜色进行设置。本示例应在包含两个有一个或多个交叉数据点的系列的二维折线图上运行。
With Charts("Chart1").ChartGroups(1)
    .HasUpDownBars = True
    .DownBars.Interior.ColorIndex = 3
    .UpBars.Interior.ColorIndex = 5
End With

  1. ChartObjects

返回代表工作表中单个嵌入图表(ChartObject 对象)或所有嵌入图表的集合(ChartObjects 对象)的对象
本示例向工作表 Sheet1 上嵌入的第一个图表中添加标题。
With Worksheets("Sheet1").ChartObjects(1).Chart
    .HasTitle = True
    .ChartTitle.Text = "1995 Rainfall Totals by Month"
End With
本示例清除工作表 Sheet1 上嵌入的第一个图表的格式设置。
Worksheets("Sheet1").ChartObjects(1).Chart.ChartArea.ClearFormats

  1. ChartObjects

返回代表工作表中单个嵌入图表或所有嵌入图表的集合的对象。
本示例向工作表 Sheet1 上嵌入的第一个图表中添加标题。
With Worksheets("Sheet1").ChartObjects(1).Chart
    .HasTitle = True
    .ChartTitle.Text = "1995 Rainfall Totals by Month"
End With

  1. Charts

返回一个Sheets集合,该集合代表活动工作簿中的所有图表工作表
本示例设置 Chart1 的标题文本。
With Charts("Chart1")
    .HasTitle = True
    .ChartTitle.Text = "First Quarter Sales"
End With
 
本示例删除活动工作簿中所有的图表工作表。
ActiveWorkbook.Charts.Delete

  1. Charts

返回一个 Sheets 集合,该集合代表指定工作簿中所有的图表工作表
本示例设置 Chart1 的标题文本。
With Charts("Chart1")
    .HasTitle = True
    .ChartTitle.Text = "First Quarter Sales"
End With

  1. Charts

指定的或活动工作簿中所有图表工作表的集合。
说明
每个图表工作表都由一个 Chart 对象来表示。这不包括嵌入在工作表或对话框编辑表上的图表。有关嵌入图表的信息,请参阅 Chart 或 ChartObject 主题。

  1. ChartTitle

返回 ChartTitle 对象,该对象代表指定图表的标题。
本示例设置 Chart1 的标题文本。
With Charts("Chart1")
    .HasTitle = True
    .ChartTitle.Text = "First Quarter Sales"
End With

  1. ChartType

返回或设置图表类型。
当图表为二维气泡图时,本示例将第一个图表组中的气泡大小设置为默认大小的 200%。
With Worksheets(1).ChartObjects(1).Chart
    If .ChartType = xlBubble Then
        .ChartGroups(1).BubbleScale = 200
    End If
End With

  1. ChartType

返回或设置图表类型。XlChartType 类型,可读写。

  1. ChartWizard

更改给定图表的属性。
本示例重新设置 Chart1 的格式,将其改为折线图,添加图例,并添加分类轴标题和数值轴标题。
Charts("Chart1").ChartWizard _
    Gallery:=xlLine, _
    HasLegend:=True, CategoryTitle:="Year", ValueTitle:="Sales"

  1. ChDir

改变当前的目录或文件夹。
语法
ChDir path
必要的 path 参数是一个字符串表达式,它指明哪个目录或文件夹将成为新的缺省目录或文件夹。path 可能会包含驱动器。如果没有指定驱动器,则 ChDir 在当前的驱动器上改变缺省目录或文件夹。

  1. ChDrive

改变当前的驱动器。
语法
ChDrive drive
必要的 drive 参数是一个字符串表达式,它指定一个存在的驱动器。如果使用零长度的字符串 (""),则当前的驱动器将不会改变。如果 drive 参数中有多个字符,则 ChDrive 只会使用首字母。 在 Macintosh 中, ChDrive 将当前文件夹改变到指定驱动器的根文件夹

  1. CheckAbort

停止 Microsoft Excel 应用程序中的重新计算
本示例中,Excel 将停止应用程序中的重新计算(不包括单元格 A10)。为查看本示例的结果,假定应用程序中还存在其他计算,这将允许用户查看被指定继续进行重新计算的单元格和其他单元格区域之间的不同。
Sub UseCheckAbort()
    Dim rngSubtotal As Variant
    Set rngSubtotal = Application.Range("A10")
    ' Stop recalculation except for designated cell.
    Application.CheckAbort KeepAbort:=rngSubtotal
End Sub

  1. CheckboxState

返回或设置一个 Boolean 值,表示是否选中了智能文档中的某个复选框。将此属性设为 True 则选中复选框。将此属性设为 False 则清除复选框。Boolean 类型,可读写。

  1. CheckIfOfficeIsHTMLEditor

如果在启动 Excel 时,Microsoft Excel 检查某个 Office 应用程序是否为默认 HTML 编辑器,则该值为 True。如果 Excel 并不进行此检查,则该值为 False。默认值为 True。Boolean 类型,可读写。

  1. CheckIn

将工作簿从本地计算机返回给服务器,同时将本地工作簿设为只读使之无法在本地进行编辑
本示例检查服务器以查看是否可以签入指定的工作簿。如果可以,本代码将保存并关闭工作簿,而且将其签回服务器。
Sub CheckInOut(strWkbCheckIn As String)
    ' Determine if workbook can be checked in.
    If Workbooks(strWkbCheckIn).CanCheckIn = True Then
        Workbooks(strWkbCheckIn).CheckIn
        MsgBox strWkbCheckIn & " has been checked in."
    Else
        MsgBox "This file cannot be checked in " & _
            "at this time.  Please try again later."
    End If
End Sub

  1. CheckOut

返回一个 String 对象,该对象代表一个指定的工作簿,将从服务器签出到本机进行编辑。
本示例验证工作簿没有被其他用户签出,并验证该工作簿是否可以签出。如果工作簿可以签出,本示例将工作簿复制到本机以进行编辑。
Sub UseCheckOut(docCheckOut As String)
    ' Determine if workbook can be checked out.
    If Workbooks.CanCheckOut(docCheckOut) = True Then
        Workbooks.CheckOut docCheckOut
    Else
        MsgBox "Unable to check out this document at this time."
    End If
End Sub

  1. CheckSpelling

对单个单词进行拼写检查
expression.CheckSpelling(Word, CustomDictionary, IgnoreUppercase)
expression必需。该表达式返回上述对象之一。

  1. CheckSpelling

对一个对象进行拼写检查。该形式的调用无返回值
本示例对 Sheet1 进行拼写检查。
Worksheets("Sheet1").CheckSpelling

  1. CheckSpelling

对一个对象进行拼写检查
本示例对 Sheet1 进行拼写检查。
Worksheets("Sheet1").CheckSpelling

  1. CheckSpelling

对一个对象进行拼写检查。
本示例对 Sheet1 进行拼写检查。
Worksheets("Sheet1").CheckSpelling

  1. ChiDist

返回 χ2 分布的单尾概率。

  1. ChiInv

返回 χ2 分布的单尾概率的反函数。

  1. Child

如果指定的形状是子形状,或者如果形状区域中的所有形状都是同一个父形状的子形状,则返回 msoTrue。MsoTriState 类型,只读。
语法
表达式.Child
表达式   一个代表 Shape 对象的变量。

  1. ChildField

返回一个 PivotField 对象,该对象表示特定字段的子字段(如果该字段已分组且有子字段)。只读。

  1. ChildItems

返回一个对象,它代表一个数据透视表数据项(PivotItem 对象)或所有数据项的集合(PivotItems 对象),该集合可以由指定字段中的子项组成,也可以由指定数据项中的子项组成。只读。

  1. ChiTest

返回独立性检验值。

  1. Choose

从参数列表中选择并返回一个值。
语法
Choose(index, choice-1[, choice-2, ... [, choice-n]])
index 必要参数,数值表达式或字段,它的运算结果是一个数值,且界于 1 和可选择的项目数之间。
choice 必要参数,Variant 表达式,包含可选择项目的其中之一。

  1. Choose

将 Arg1 作为索引使用,以返回值参数列表中的值。

  1. Chr

返回 String,其中包含有与指定的字符代码相关的字符 。
语法
Chr(charcode)
必要的 charcode 参数是一个用来识别某字符的 Long。

  1. Cint

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CInt(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. CircleInvalid

对工作表中的无效数据项进行圈释
本示例对第一张工作表的无效数据项进行圈释。
Worksheets(1).CircleInvalid

  1. CircularReference

返回一个 Range 对象,该对象代表指定工作表中包含第一个循环引用的区域,或者如果指定工作表中无循环引用则返回 Nothing
本示例选定Sheet1第一个循环引用中的第一个单元格
Worksheets("Sheet1").CircularReference.Select

  1. Clean

删除文本中的所有非打印字符。

  1. Clear

清除 FindFormat 和 ReplaceFormat 属性中的条件集。
语法
表达式.Clear
表达式   一个代表 CellFormat 对象的变量。

  1. Clear

清除整个对象
本示例清除 Sheet1 中 A1:G37 单元格区域的公式和格式设置。
Worksheets("Sheet1").Range("A1:G37").Clear

  1. Clear

清除整个对象。

  1. ClearAllFilters

ClearAllFilters 方法将删除当前应用于数据透视表的所有筛选。包括删除 PivotTable 对象的 PivotFilters 集合中的所有筛选,删除应用的所有手动筛选以及将报表筛选区域中的所有筛选字段设置为默认项。

  1. ClearAllFilters

调用此方法将删除当前应用于透视字段的所有筛选。包括从透视字段的 PivotFilters 集合中删除所有筛选以及删除应用于透视字段的所有手动筛选。如果透视字段位于报表筛选区域中,则所选项将被设置为默认项。

  1. ClearArrows

清除指定工作表的追踪箭头。使用审核功能可添加追踪箭头。
本示例清除 Sheet1 的追踪箭头。
Worksheets("Sheet1").ClearArrows

  1. ClearCircles

清除指定工作表的追踪箭头。使用审核功能可添加追踪箭头。
本示例清除对第一张工作表中无效数据项的圈释。
Worksheets(1).ClearCircles

  1. ClearComments

清除指定区域的所有单元格批注
本示例清除 E5 单元格的所有批注。
Worksheets(1).Range("e5").ClearComments

  1. ClearContents

清除指定区域的公式
本示例清除工作表 Sheet1 上 A1:G37 单元格的公式,但保留其格式设置。
Worksheets("Sheet1").Range("A1:G37").ClearContents

  1. ClearContents

清除图表中的数据但保留格式设置。

  1. ClearFormats

清除对象的格式设置
本示例清除工作表 Sheet1 上 A1:G37 单元格的所有格式设置。
Worksheets("Sheet1").Range("A1:G37").ClearFormats

  1. ClearFormats

清除对象的格式设置。

  1. ClearLabelFilters

此方法将删除透视字段的 PivotFilters 集合中的所有标签筛选或所有日期筛选。

  1. ClearManualFilter

ClearManualFilter 方法提供一个简便方式,可将数据透视表中透视字段的所有项的 Visible 属性设置为 True,并清空 OLAP 数据透视表中的 HiddenItemsList/VisibleItemsList 集合。

  1. ClearManualFilter

提供一个简便方法,可将数据透视表中透视字段的所有项的 Visible 属性设置为 True,并清空 OLAP 数据透视表中的 HiddenItemsList 和 VisibleItemsList 集合。

  1. ClearNotes

清除指定区域中所有单元格的附注和语音批注
本示例清除工作表 Sheet1 上从 A 列到 C 列中的所有批注和语音批注。
Worksheets("Sheet1").Columns("A:C").ClearNotes

  1. ClearOutline

清除指定区域的分级显示
本示例清除工作表 Sheet1 上单元格区域 A1:G37 的分级显示。
Worksheets("Sheet1").Range("A1:G37").ClearOutline

  1. ClearTable

ClearTable 方法用于清除数据透视表。清除数据透视表包括删除所有字段以及删除应用于数据透视表的所有筛选和排序。此方法将数据透视表重置为该表刚创建而尚未添加任何字段时的状态。

  1. ClearValueFilters

调用此方法将删除透视字段的 PivotFilters 集合中的所有值筛选。

  1. CLng

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CLng(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. Close

关闭对象
expression.Close(SaveChanges, Filename, RouteWorkbook)
expression必需。该表达式返回上述对象之一。
SaveChanges Variant类型,可选。如果工作簿没有改变,则忽略此参数
FileName      Variant类型,可选。以此文件名保存所做的更改
RouteWorkbook      Variant类型,可选。如果指定工作簿不需要传送给下一个收件人(没有传送名单或已经传送),则忽略该参数

  1. Close

关闭对象。
本示例关闭 Book1.xls,并放弃所有对此工作簿的更改。
Workbooks("BOOK1.XLS").Close SaveChanges:=False

  1. Close

关闭对象。
本示例关闭 Book1.xls,并放弃所有对此工作簿的更改。
Workbooks("BOOK1.XLS").Close SaveChanges:=False
本示例关闭所有打开的工作簿。如果某个打开的工作簿有改变,Microsoft Excel 将显示询问是否保存更改的对话框和相应提示。
Workbooks.Close

  1. Close

关闭 Open 语句所打开的输入/输出 (I/O) 文件。
语法
Close [filenumberlist]
可选的 filenumberlist 参数为一个或多个文件号,其中 filenumber 为任何有效的文件号,语法如下:
[[#]filenumber] [, [#]filenumber] . . .

  1. Close

关闭对象。
语法
表达式.Close(SaveChanges, Filename, RouteWorkbook)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
SaveChanges 可选 Variant 如果工作簿中没有改动,则忽略此参数。如果工作簿中有改动但工作簿显示在其他打开的窗口中,则忽略此参数。如果工作簿中有改动且工作簿未显示在任何其他打开的窗口中,则由此参数指定是否应保存更改。如果设为 True,则保存对工作簿所做的更改。如果工作簿尚未命名,则使用 Filename。如果省略 Filename,则要求用户提供文件名。
Filename 可选 Variant 以此文件名保存所做的更改。
RouteWorkbook 可选 Variant 如果工作簿不需要传送给下一个收件人(没有传送名单或已经传送),则忽略此参数。否则,Microsoft Excel 根据此参数的值传送工作簿。如果设为 True,则将工作簿传送给下一个收件人。如果设为 False,则不发送工作簿。如果忽略,则要求用户确认是否发送工作簿。
返回值
如果该方法成功关闭对象,则为 True,否则为 False。

  1. CLSID

返回一个只读的唯一标识符,或识别对象的 CLSID。String 类型。
语法
表达式.CLSID
表达式   一个代表 AddIn 对象的变量。

  1. CodeName

返回指定对象的代码名
本示例显示第一张工作表的代码名。
MsgBox Worksheets(1).CodeName

  1. CodeName

返回指定对象的代码名
对于一个返回指定对象的表达式,该表达式可使用对象的代码名。例如,如果第一张工作表的代码名为 Sheet1,则下列表达式是等价的。
Worksheets(1).Range("a1")
Sheet1.Range("a1")
本示例显示第一张工作表的代码名。
MsgBox Worksheets(1).CodeName

  1. CodeName

返回指定对象的代码名。
本示例显示第一张工作表的代码名。
MsgBox Worksheets(1).CodeName

  1. Color

返回或设置对象的主要颜色,可用 RGB 函数创建颜色值。
本示例对 Chart1 中数值坐标轴的刻度线标志颜色进行设置。
Charts("Chart1").Axes(xlValue).TickLabels.Font.Color = _
    RGB(0, 255, 0)

  1. Color

返回或设置对象的主要颜色,如注释部分中的表格所示。使用 RGB 函数可创建颜色值。Variant 型,可读写。

  1. ColorIndex

返回或设置四条边框的颜色。
本示例为 Chart1 中数值坐标轴的主要网格线设置了颜色。
With Charts("Chart1").Axes(xlValue)
    If .HasMajorGridlines Then
        .MajorGridlines.Border.ColorIndex = 5    'set color to blue
    End If
End With

  1. ColorIndex

返回或设置字体的颜色。
本示例将 Sheet1 的 A1 单元格的字体颜色改为红色。
Worksheets("Sheet1").Range("A1").Font.ColorIndex = 3

  1. ColorIndex

返回或设置边框内部的颜色。
本示例将 Chart1 的图表区域内部颜色设为红色,将其边框的颜色设为蓝色。
With Charts("Chart1").ChartArea
    .Interior.ColorIndex = 3
    .Border.ColorIndex = 5
End With

  1. ColorIndex

返回或设置一个 Variant 值,它代表边框的颜色。

  1. ColorIndex

返回或设置一个 Variant 值,它代表指定的工作表或图表选项卡的颜色。

  1. Colors

返回或设置工作簿调色板中的颜色。
本示例使活动工作簿的调色板与工作簿 Book2.xls 的调色板相同。
ActiveWorkbook.Colors = Workbooks("BOOK2.XLS").Colors
本示例设置活动工作簿调色板的第五号颜色。
ActiveWorkbook.Colors(5) = RGB(255, 0, 0)

  1. ColorType

返回或设置应用于指定图片或 OLE 对象的颜色转换类型。MsoPictureColorType 类型,可读写。

  1. Column

返回指定区域中第一块中的第一列的列号
本示例将工作表 Sheet1 上每隔一列的列宽设置为 4 磅。
For Each col In Worksheets("Sheet1").Columns
    If col.Column Mod 2 = 0 Then
        col.ColumnWidth = 4
    End If
Next col

  1. Column3DGroup

返回一个 ChartGroup 对象,该对象代表三维图表中的柱形图表组。
本示例将三维柱形图图表组中各柱簇之间的间距设置为柱宽度的 50% 。
Charts(1).Column3DGroup.GapWidth = 50

  1. ColumnDifferences

返回一个Range对象,该对象代表每列中所有与比较单元格内容不同的单元格
本示例选定工作表 Sheet1 上 A 列中与单元格 A4 内容不同的单元格。
Worksheets("Sheet1").Activate
Set r1 = ActiveSheet.Columns("A").ColumnDifferences( _
    Comparison:=ActiveSheet.Range("A4"))
r1.Select

  1. ColumnFields

返回一个对象,该对象表示单个的数据透视表字段(PivotField 对象)或当前显示为列字段的所有字段的集合(PivotFields 对象)。只读。

  1. ColumnGrand

如果数据透视表显示列总计,则该属性值为 True。Boolean 类型,可读写。

  1. ColumnGroups

在二维图表上,本方法返回代表单个柱形图图表组或所有柱形图图表组的集合的对象。
本示例将二维柱形图图表组中各柱形簇之间的距离设置为柱形宽度的 50% 。
Charts(1).ColumnGroups(1).GapWidth = 50

  1. ColumnRange

返回一个 Range 对象,该对象表示数据透视表中包含列区域的区域。只读。

  1. Columns

返回一个Range对象,该对象代表活动工作表中的所有列
本示例将Sheet1的第一列(A列)的字体设置为加粗。
Worksheets("Sheet1").Columns(1).Font.Bold = True
 
本示例将“myRange”区域第一列中每一单元格的值置为 0(零〕。
Range("myRange").Columns(1).Value = 0

  1. Columns

返回一个 Range 对象,该对象代表指定工作表上的所有列
本示例将 Sheet1 的第一列(A 列)的字体设置为加粗。
Worksheets("Sheet1").Columns(1).Font.Bold = True
本示例将“myRange”区域第一列中每一单元格的值置为 0(零〕。
Range("myRange").Columns(1).Value = 0

  1. Columns

返回 Range 对象,该对象代表指定单元格区域中的列
本示例将“myRange”区域第一列中每一单元格的值置为 0(零〕。
Range("myRange").Columns(1).Value = 0

  1. ColumnWidth

返回或设置指定区域中所有列的列宽
本示例使工作表 Sheet1 上 A 列的列宽加倍。
With Worksheets("Sheet1").Columns("A")
    .ColumnWidth = .ColumnWidth * 2
End With

  1. COMAddIns

返回 Microsoft Excel 的 COMAddIns 集合,它代表当前所安装的 COM 加载宏
本示例显示当前已安装的COM加载宏的数目
Set objAI = Application.COMAddIns
MsgBox "Number of COM add-ins available:" & _
    objAI.Count

  1. Combin

返回从给定的项目数中提取若干项目的组合数。使用 Combin 可以确定给定的项目数中所有可能的项目组合数。

  1. Command

返回命令行的参数部分,该命令行用于装入 Microsoft Visual Basic 或 Visual Basic 开发的可执行程序。Visual Basic Command 函数在 Microsoft Office 应用程序中不可用。
语法
Command
说明
当从命令行装入 Visual Basic 时,/cmd 之后的命令行的任何部分作为命令行的参数传递给程序。下面的示例中,cmdlineargs 代表 Command 函数返回的参数信息。

  1. CommandBar

CommandBar 对象是 CommandBars 集合的成员。
代表容器应用程序中的一个命令栏

  1. CommandBars

返回 CommandBars 对象,该对象代表 Microsoft Excel 命令栏
本示例删除所有不可见的自定义命令栏。
For Each bar In Application.CommandBars
    If Not bar.BuiltIn And Not bar.Visible Then bar.Delete
Next

  1. CommandBars

代表容器应用程序中命令栏的 CommandBar 对象的集合。

  1. CommandText

返回或设置指定数据源的命令串。Variant 型,可读写。

  1. CommandType

返回或设置说明部分的下表中列出的 XlCmdType 常量之一。返回或设置的常量用于描述 CommandText 属性的值。默认值为 xlCmdSQL。XlCmdType 类型,可读写。

  1. CommandUnderlines

返回或设置 Microsoft Excel for the Macintosh 中命令加下划线的状态
本示例关闭 Microsoft Excel for the Macintosh 中的命令加下划线。
Application.CommandUnderlines = xlCommandUnderlinesOff

  1. Comment

返回一个Comment对象,该对象代表与该区域左上角单元格相关联的批注
本示例设置 Sheet1 中第一个方案的批注。
Worksheets("Sheet1").Scenarios(1).Comment = _
    "Worst case July 1993 sales"

  1. Comment

返回或设置与名称关联的批注。可读/写 String 类型。
语法
表达式.Comment
表达式   一个代表 Name 对象的变量。

  1. Comment

返回或设置一个 String 值,它代表与方案相关联的批注。

  1. Comments

返回 Comments 集合,该集合代表指定工作表中所有的批注
本示例将活动工作表中所有由 Jean Selva 所做的批注删除。
For Each c in ActiveSheet.Comments
    If c.Author = "Jean Selva" Then c.Delete
Next

  1. Comments

单元格批注的集合

  1. CompactLayoutColumnHeader

指定透视数据表在压缩行布局表单中时标题中显示的标题。可读写 String。

  1. CompactLayoutRowHeader

指定透视数据表在压缩行布局表单中时行标题中显示的标题。可读写 String。

  1. CompactRowIndent

当启用压缩行布局表单时,返回或设置透视项目的缩进增量。可读写。

  1. CompareSideBySideWith

以并排模式打开两个窗口
expression.CompareSideBySideWith
expression必需。该表达式返回“应用于”列表中的对象之一
说明
不能对 Application 对象或 ActiveWorkbook 属性使用 CompareSideBySideWith 方法。

  1. Complex

将实系数及虚系数转换为 x + yi 或 x + yj 形式的复数。

  1. Confidence

返回一个值,可使用该值构造总体平均值的置信区间。

  1. ConflictResolution

返回或设置更新共享工作簿时解决冲突的方式
本示例使共享工作簿有冲突时总是接受本地用户所做的修改。
ActiveWorkbook.ConflictResolution = xlLocalSessionChanges

  1. Connect

获取或设置指定的 COMAddIn 对象的连接状态。可读/写。

  1. Connection

返回或设置包含下列某项的字符串:允许 Microsoft Excel 连接到 OLE DB 数据源的 OLE DB 设置;允许 Microsoft Excel 连接到 ODBC 数据源的 ODBC 设置;允许 Microsoft Excel 连接到 Web 数据源的 URL;或者文本文件的名称或路径,或是指定某个数据库或 Web 查询的文件名称或路径。Variant 型,可读写。

  1. ConnectionSiteCount

返回指定形状中的连接部位的数量。Long 型,只读。
语法
表达式.ConnectionSiteCount
表达式   一个返回 Shape 对象的表达式。

  1. Connector

如果指定的形状是连接符,则此属性为 True。MsoTriState 类型,只读。
语法
表达式.Connector
表达式   一个返回 Shape 对象的表达式。

  1. ConnectorFormat

返回一个包含连接符格式属性的 ConnectorFormat 对象。应用于代表连接符的 Shape 对象。只读。
语法
表达式.ConnectorFormat
表达式   一个返回 Shape 对象的表达式。

  1. Consolidate

将若干工作表中若干区域的数据合并计算至单个工作表上的单个区域
本示例使用 SUM 函数对工作表 Sheet 2 和工作表 Sheet 3 的数据进行合并计算,将结果放到工作表 Sheet1 中。
Worksheets("Sheet1").Range("A1").Consolidate _
    Sources:=Array("Sheet2!R1C1:R37C6", "Sheet3!R1C1:R37C6"), _
    Function:=xlSum

  1. ConsolidationFunction

返回当前合并运算所使用的函数代码
如果当前合并计算所使用的函数为 SUM 函数,本示例将显示一消息框。
If Worksheets("Sheet1").ConsolidationFunction = xlSum Then
    MsgBox "Sheet1 uses the SUM function for consolidation."
End If

  1. ConsolidationOptions

返回表示合并计算选项的三元素数组
本示例显示工作表Sheet1中合并计算的选项。选项列表将出现在本示例新建的工作表中。
Set newSheet = Worksheets.Add
aOptions = Worksheets("Sheet1").ConsolidationOptions
newSheet.Range("A1").Value = "Use labels in top row"
newSheet.Range("A2").Value = "Use labels in left column"
newSheet.Range("A3").Value = "Create links to source data"
For i = 1 To 3
    If aOptions(i) = True Then
        newSheet.Cells(i, 2).Value = "True"
    Else
        newSheet.Cells(i, 2).Value = "False"
    End If
Next i
newSheet.Columns("A:B").AutoFit

  1. ConsolidationSources

返回一个字符串数组,这些字符串是工作表中当前合并计算的数据源的名称
本示例显示在工作表Sheet1中用于合并计算的数据源的名称。名称列表将出现在本示例新建的工作表中。
Set newSheet = Worksheets.Add
newSheet.Range("A1").Value = "Consolidation Sources"
aSources = Worksheets("Sheet1").ConsolidationSources
If IsEmpty(aSources) Then
    newSheet.Range("A2").Value = "none"
Else
    For i = 1 To UBound(aSources)
        newSheet.Cells(i + 1, 1).Value = aSources(i)
    Next i
End If
newSheet.Columns("A:B").AutoFit

  1. Const

声明用于代替文字量的常数。
语法
[Public | Private] Const constname [As type] = expression
Public 可选的。该关键字用于在模块级别中声明在所有模块中对所有过程都可以使用的常数。在过程中不能使用。
Private 可选的。该关键字用于在模块级声明只能在包含该声明的模块中使用的常数。不能在过程中使用。
constname 必需的。常数的名称;遵循标准的变量命名约定。
type 可选的。常数的数据类型;可以是 Byte、 Boolean 、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String 或 Variant。所声明的每个变量都要使用一个单独的 As 类型子句。
expression 必需的。文字,其它常数,或由除 Is 之外的任意的算术操作符和逻辑操作符所构成的任意组合。

  1. ConstrainNumeric

如果手写识别程序只能识别数字和标点符号,则该值为 True。Boolean 类型
本示例监测是否运行在 Microsoft Windows for Pen Computing 上,如果是,则限定手写识别程序仅识别数字和标点符号。
If Application.WindowsForPens Then
    Application.ConstrainNumeric = True
End If

  1. Container

回一个对象,此对象包含指定 OLE 对象的容器应用程序
此属性提供了一种在主机应用程序内(如 Microsoft Internet Explorer)打开 Excel 工作簿时访问容器应用程序对象模型的方法。

  1. Context

获取或设置一个可确定命令栏保存位置的字符串。该字符串由应用程序定义和解释。可读写。
语法
表达式.Context
表达式   一个代表 CommandBar 对象的变量。

  1. Contrast

返回或设置指定图片或 OLE 对象的对比度。该属性的值必须是 0.0(最低对比度)到 1.0(最高对比度)的数。Single 型,可读写。

  1. ControlCharacters

如果 Microsoft Excel 显示从右到左语言的控制字符,则该值为 True
本示例设置 Microsoft Excel 使其解释控制字符。
Application.ControlCharacters = True

  1. ControlFormat

返回或设置一个 MsoTriState 值,它确定对象是否可见。可读写。包含 Microsoft Excel 控件属性

  1. ControlFormat

返回一个 ControlFormat 对象,该对象包含 Microsoft Excel 控件 (Microsoft Excel 控件:Excel 本身具有的控件,而不是 ActiveX 控件。)属性。只读。
语法
表达式.ControlFormat
表达式   一个代表 Shape 对象的变量。

  1. Controls

获取一个代表命令栏上的所有控件的 CommandBarControls 对象。只读。
语法
表达式.Controls
表达式   一个代表 CommandBar 对象的变量。
返回值
CommandBarControls

  1. Convert

将数字从一个度量系统转换为另一个度量系统。例如,Convert 可以将一个以“英里”为单位的距离表转换成一个以“公里”为单位的距离表。

  1. ConvertFormula

在 A1 和 R1C1 引用样式之间进行转换,或者在相对和绝对引用之间进行转换,或者同时进行这两种转换
本示例将包含 R1C1-样式引用的 SUM 公式转换为包含 A1-样式引用的等价公式,然后显示转换结果。
inputFormula = "=SUM(R10C2:R15C2)"
MsgBox Application.ConvertFormula( _
    formula:=inputFormula, _
    fromReferenceStyle:=xlR1C1, _
    toReferenceStyle:=xlA1)

  1. ConvertToFormulas

ConvertToFormulas 方法是 1st_Excel12 中的新方法,可用于将数据透视表转换为多维数据集公式。可读/写 Boolean 类型。

  1. Copy

将指定工作表复制到工作簿的另一位置
本示例复制工作表 Sheet1,并将其放置在工作表 Sheet3 之后。
Worksheets("Sheet1").Copy After:=Worksheets("Sheet3")

  1. Copy

将单元格区域复制到指定的区域或剪贴板中
本示例将工作表 Sheet1 上单元格区域 A1:D4 中的公式复制到工作表 Sheet2 上的单元格区域 E5:H8 中。
Worksheets("Sheet1").Range("A1:D4").Copy _
destination:=Worksheets("Sheet2").Range("E5")

  1. Copy

将指定工作表复制到工作簿的另一位置。
本示例复制工作表 Sheet1,并将其放置在工作表 Sheet3 之后。
Worksheets("Sheet1").Copy After:=Worksheets("Sheet3")

  1. Copy

将工作表复制到工作簿的另一位置。

  1. Copy

将对象复制到剪贴板。
语法
表达式.Copy
表达式   一个代表 Shape 对象的变量。

  1. Copy

将对象复制到剪贴板。

  1. Copy

将工作表复制到工作簿的另一位置。
语法
表达式.Copy(Before, After)
表达式   一个代表 Charts 对象的变量。
参数
名称 必选/可选 数据类型 描述
Before 可选 Variant 将要在其之前放置所复制工作表的工作表。如果指定了 After,则不能指定 Before。
After 可选 Variant 将要在其之后放置所复制工作表的工作表。如果指定了 Before,则不能指定 After。

  1. Copy

如果系列具有图片填充,此方法将把图片复制到剪贴板。

  1. Copy

如果数据点具有图片填充,此方法将把图片复制到剪贴板中。

  1. CopyFromRecordset

将一个 ADO 或 DAO Recordset 对象的内容复制到工作表中,复制的起始位置在指定区域的左上角
本示例将 DAO Recordset 对象中的字段名称复制到工作表的第一行中,并将这些名称的格式设为加粗。然后,本示例将记录集复制到工作表中,复制的起始位置在 A2 单元格。
For iCols = 0 to rs.Fields.Count - 1
    ws.Cells(1, iCols + 1).Value = rs.Fields(iCols).Name
Next
ws.Range(ws.Cells(1, 1),  _
    ws.Cells(1, rs.Fields.Count)).Font.Bold = True
ws.Range("A2").CopyFromRecordset rs

  1. CopyObjectsWithCells

如果对象与单元格一同剪切、复制、提取和排序,则该值为 True
本示例设置 Microsoft Excel 将单元格与对象一同剪切、复制、提取和排序。
Application.CopyObjectsWithCells = True

  1. CopyPicture

将选定对象作为图片复制到剪贴板
本示例将工作表 Sheet1 上 A1:D4 单元格的屏幕图像复制到剪贴板,并将其位图粘贴到工作表 Sheet1 上的另一位置。
Worksheets("Sheet1").Range("A1:D4").CopyPicture xlScreen, xlBitmap
Worksheets("Sheet1").Paste _
Destination:=Worksheets("Sheet1").Range("E6")

  1. CopyPicture

将选定对象作为图片复制到剪贴板。
本示例将工作表 Sheet1 上 A1:D4 单元格的屏幕图像复制到剪贴板,并将其位图粘贴到工作表 Sheet1 上的另一位置。
Worksheets("Sheet1").Range("A1:D4").CopyPicture xlScreen, xlBitmap
Worksheets("Sheet1").Paste _
    Destination:=Worksheets("Sheet1").Range("E6")

  1. CopyPicture

将所选对象作为图片复制到剪贴板。
语法
表达式.CopyPicture(Appearance, Format)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
Appearance 可选 Variant 用于指定图片复制方式的 XlPictureAppearance 常量。默认值为 xlScreen。
Format 可选 Variant 用于指定图片格式的 XlCopyPictureFormat 常量。默认值为 xlPicture。

  1. CopyPicture

将所选对象作为图片复制到剪贴板。Variant。

  1. CopyPicture

将所选对象作为图片复制到剪贴板。

  1. Corners

返回一个 Corners 对象,该对象代表三维图表的角。
本示例选定 Chart1 的角。本示例应在三维图表上运行(在其他类型的图表上 Select 方法无效)。
With Charts("Chart1")
    .Activate
    .Corners.Select
End With

  1. CorrectCapsLock

如果 Microsoft Excel 自动更正无意中使用 Caps Lock 键,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.CorrectCapsLock
表达式   一个代表 AutoCorrect 对象的变量。

  1. CorrectSentenceCap

如果 Microsoft Excel 自动更正句子(第一个单词)的大写,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.CorrectSentenceCap
表达式   一个代表 AutoCorrect 对象的变量。

  1. Correl

返回单元格区域 Arg1 和 Arg2 的相关系数。

  1. Cos

返回一个 Double,指定一个角的余弦值。
语法
Cos(number)
必要的 number 参数是一 Double 或任何有效的数值表达式,表示一个以弧度为单位的角。

  1. Cosh

返回数字的双曲余弦值。

  1. Count

返回一个 Long 值,它代表集合中对象的数量。
语法
表达式.Count
表达式   一个代表 Dialogs 对象的变量。

  1. Count

返回指定集合中对象的数目
本示例显示Sheet1上选定区域中的列数。本示例还将检测选定区域中是否包含多重选定区域,如果包含,则对多重选定区域中每一子区域进行循环。
Sub DisplayColumnCount()
    Dim iAreaCount As Integer
    Dim i As Integer
    Worksheets("Sheet1").Activate
    iAreaCount = Selection.Areas.Count

    If iAreaCount <= 1 Then
        MsgBox "The selection contains " & Selection.Columns.Count & " columns."
    Else
        For i = 1 To iAreaCount
            MsgBox "Area " & i & " of the selection contains " & _
            Selection.Areas(i).Columns.Count & " columns."
        Next i
    End If
End Sub

  1. Count

返回指定集合中对象的数目
expression.Count
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. Count

返回指定集合中对象的数目
本示例显示Sheet1上选定区域中的列数。本示例还将检测选定区域中是否包含多重选定区域,如果包含,则对多重选定区域中每一子区域进行循环。
Sub DisplayColumnCount()
    Dim iAreaCount As Integer
    Dim i As Integer
    Worksheets("Sheet1").Activate
    iAreaCount = Selection.Areas.Count
    If iAreaCount <= 1 Then
        MsgBox "The selection contains " & Selection.Columns.Count & " columns."
    Else
        For i = 1 To iAreaCount
            MsgBox "Area " & i & " of the selection contains " & _
            Selection.Areas(i).Columns.Count & " columns."
        Next i
    End If
End Sub

  1. Count

返回指定集合中对象的数目
本示例显示 Sheet1 上选定区域中的列数。本示例还将检测选定区域中是否包含多重选定区域,如果包含,则对多重选定区域中每一子区域进行循环
Sub DisplayColumnCount()
    Dim iAreaCount As Integer
    Dim i As Integer
    Worksheets("Sheet1").Activate
    iAreaCount = Selection.Areas.Count
    If iAreaCount <= 1 Then
        MsgBox "The selection contains " & Selection.Columns.Count & " columns."
    Else
        For i = 1 To iAreaCount
            MsgBox "Area " & i & " of the selection contains " & _
            Selection.Areas(i).Columns.Count & " columns."
        Next i
    End If
End Sub

  1. Count

返回指定集合中对象的数目。
expression.Count
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. Count

获取宿主应用程序中 COM 加载项的数量。只读。

  1. Count

获取宿主应用程序中的命令栏数量。只读。
语法
表达式.Count
表达式   一个返回 CommandBars 对象的表达式。

  1. Count

计算包含数字的单元格的个数,以及参数列表中的数字的个数。

  1. Count

返回一个 Long 值,它代表集合中对象的数量。

  1. Count

返回一个 Long 值,它代表集合中对象的数量。
语法
表达式.Count
表达式   一个代表 Shapes 对象的变量。

  1. Count

返回一个 Integer 值,它代表集合中对象的数量。

  1. Count

返回一个 Long 值,它代表集合中对象的数量。
语法
表达式.Count
表达式   一个代表 Comments 对象的变量。

  1. Count

返回集合中对象的数目。只读 Long 类型。

  1. Count

返回一个 Long 值,它代表集合中对象的数量。
语法
表达式.Count
表达式   一个代表 Charts 对象的变量。

  1. Count

获取一个 Long 类型的值,指示 DocumentProperties 集合中的项数。只读。

  1. CountA

计算非空单元格及参数列表中值的个数。

  1. CountBlank

计算指定单元格区域中空单元格的个数。

  1. CountIf

计算区域中满足给定条件的单元格的个数。

  1. CountIfs

计算区域中满足多个条件的单元格的个数。

  1. CoupDayBs

返回从息票期开始到结算日的天数。

  1. CoupDays

返回结算日所在的息票期的天数。

  1. CoupDaysNc

返回从结算日到下一个息票日之间的天数。

  1. CoupNcd

返回一个代表结算日之后下一个息票日的数字。

  1. CoupNum

返回在结算日和到期日之间支付息票的次数,向上舍入到最接近的整数。

  1. CoupPcd

 

  1. Covar

返回协方差,即每对数据点的偏差乘积的平均数。

  1. Create

创建新的 PivotCache。

  1. CreateBackup

如果保存文件时创建备份文件,则该值为 True
本示例检查在保存当前工作簿时是否创建备份文件。如果创建,则显示一条信息。
If ActiveWorkbook.CreateBackup = True Then
    MsgBox "Remember, there is a backup copy of this workbook"
End If

  1. CreateCubeFile

创建数据透视表的多维数据集文件,该数据透视表与联机分析处理 (OLAP) 数据源相连接。

  1. CreateNames

在指定区域中依据工作表中的文字标志创建名称
本示例用单元格区域 A1:A3 中的文字创建区域 B1:B3 的名称。注意,指定区域时必须包括那些含有名称文字的单元格,即便只是为单元格区域 B1:B3 创建名称。
Set rangeToName = Worksheets("Sheet1").Range("A1:B3")
rangeToName.CreateNames Left:=True

  1. CreateNewDocument

新建一篇链接到指定超链接的文档。

  1. CreateObject

创建并返回一个对 ActiveX 对象的引用。
语法
CreateObject(class,[servername])
class 必需的; Variant (String). 要创建的应用程序名称和类。
servername 可选的; Variant (String). 要在其上创建对象的网络服务器名称。如果servername 是一个空字符串(""),即使用本地机器。

  1. CreatePivotFields

CreatePivotFields 方法是 1st_Excel12 中的新方法。使用该方法,通过创建相应的 PivotField 对象,用户可以对尚未添加到数据透视表的透视字段应用筛选。

  1. CreatePivotTable

创建一个基于 PivotCache 对象的数据透视表。返回一个 PivotTable 对象。

  1. CreatePublisher

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. CreateSummary

新建一个工作表,并在其中显示指定工作表中所有方案的摘要报表。Variant 类型。

  1. Creator

返回一个32位的整数,此整数代表用于创建该对象的应用程序
本示例显示一条有关 Excel 工作簿的创建者的消息。
Sub FindCreator()
    Dim myObject As Excel.Workbook
    Set myObject = ActiveWorkbook
    If myObject.Creator = &h5843454c Then
        MsgBox "This is a Microsoft Excel object."
    Else
        MsgBox "This is not a Microsoft Excel object."
    End If
End Sub

  1. Creator

返回一个 32 位的整数,此整数代表用于创建该对象的应用程序
本示例显示一条有关 Excel 工作簿的创建者的消息。
Sub FindCreator()
    Dim myObject As Excel.Workbook
    Set myObject = ActiveWorkbook
    If myObject.Creator = &h5843454c Then
        MsgBox "This is a Microsoft Excel object."
    Else
        MsgBox "This is not a Microsoft Excel object."
    End If
End Sub

  1. Creator

获取一个 32 位整数,该整数指示在其中创建 Assistant 对象的应用程序。只读。

  1. Creator

获取一个 32 位整数,指示创建 COMAddIns 对象时所使用的应用程序。只读。

  1. Creator

获取一个 32 位整数,指示创建 COMAddIn 对象时所使用的应用程序。只读。

  1. Creator

获取一个 32 位整数,指示创建 CommandBars 对象时所使用的应用程序。只读。
语法
表达式.Creator
表达式   一个代表 CommandBars 对象的变量。

  1. Creator

获取一个 32 位整数,指示创建 CommandBar 对象时所使用的应用程序。只读。
语法
表达式.Creator
表达式   一个代表 CommandBar 对象的变量。
返回值
Long

  1. Creator

获取一个 32 位整数,指示创建 LanguageSettings 对象时所使用的应用程序。只读。

  1. Creator

返回一个 32 位整数,该整数指示在其中创建此对象的应用程序。只读 Long 类型。

  1. Creator

获取一个 32 位整数,指示创建 DocumentProperties 对象时所使用的应用程序。只读。

  1. Creator

获取一个 32 位整数,指示创建 DocumentProperty 对象时所使用的应用程序。只读。

  1. CritBinom

返回使累积二项式分布大于或等于临界值的最小值。

  1. Criteria1

返回筛选区域内指定列上的第一个筛选值。Variant 类型,只读。

  1. Criteria2

返回已筛选区域中指定列的第二个筛选值。Variant 类型,只读。

  1. CropBottom

返回或设置从指定图片或 OLE 对象的底部所裁剪下的磅数。Single 型,可读写。

  1. CropLeft

返回或设置从指定图片或 OLE 对象的左边所裁剪下的磅数。Single 型,可读写。

  1. CropRight

返回或设置从指定图片或 OLE 对象的右边所裁剪下的磅数。Single 型,可读写。

  1. CropTop

返回或设置从指定图片或 OLE 对象的顶部所裁剪下的磅数。Single 型,可读写。

  1. Crosses

返回或设置指定坐标轴与其他坐标轴相交的点。Long 类型,可读写。

  1. CrossesAt

返回或设置数值轴中与分类坐标轴的交点。仅应用于数值轴。Double 类型,可读写。

  1. CSng

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CSng(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. CStr

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CStr(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. CubeField

返回派生出指定数据透视表字段的 CubeField 对象。只读。

  1. CubeFields

返回 CubeFields 集合。每个 CubeField 对象都包含多维数据集字段元素的属性。只读。

  1. CubeFieldSubType

指定 CubeField 的类型。只读。

  1. CubeFieldType

表明 OLAP 多维数据集字段是层次字段,还是度量值字段。可以是 XlCubeFieldType 常量之一。

  1. CumIPmt

返回一笔贷款在 start_period 到 end_period 期间累积支付的利息。

  1. CumPrinc

返回一笔贷款在 start_period 到 end_period 期间累积支付的本金。

  1. CurDir

返回一个 Variant (String),用来代表当前的路径。
语法
CurDir[(drive)]
可选的 drive 参数是一个字符串表达式,它指定一个存在的驱动器。如果没有指定驱动器,或 drive 是零长度字符串 (""),则 CurDir 会返回当前驱动器的路径。 在 Macintosh上,CurDir 忽略任何指定的 drive ,并只简单地返回当前驱动器的路径。

  1. CurrentArray

如果指定的单元格是某数组的一部分,那么本属性返回代表整个数组的 Range 对象
假定工作表 Sheet1 的活动单元格为 A1,且该单元格属于包含单元格区域 A1:A10 的数组,那么本示例将选定工作表 Sheet1 上的单元格区域 A1:A10。
ActiveCell.CurrentArray.Select

  1. CurrentPage

返回或设置页字段的当前页显示(仅对页字段有效)。PivotItem 类型,可读写。

  1. CurrentPageList

返回或设置对应于项目列表的字符串数组,该项目列表包含于数据透视表的多项目页字段中。Variant 类型,可读写。

  1. CurrentPageName

返回或设置 CubeField 的页面名称。可读/写 String 类型。

  1. CurrentPageName

返回或设置指定数据透视表上的当前显示页。该页名称将出现在页字段中。注意,只有当已存在当前显示页时,本属性才有效。String 类型,可读写。

  1. CurrentRegion

返回 Range 对象,该对象代表当前的区域
本示例选定工作表 Sheet1 上的当前区域。
Worksheets("Sheet1").Activate
ActiveCell.CurrentRegion.Select

  1. Cursor

返回或设置Microsoft Excel中鼠标指针的形状
本示例将鼠标指针形状更改为 I 形,稍停片刻,然后将其重新变为默认指针形状。
Sub ChangeCursor()
    Application.Cursor = xlIBeam
    For x = 1 To 1000
        For y = 1 to 1000
        Next y
    Next x
    Application.Cursor = xlDefault
End Sub

  1. CursorMovement

返回或设置一个值,此值用于表明使用的是可见光标还是逻辑光标
本示例设置 Microsoft Excel 使用可见光标。
Application.CursorMovement = xlVisualCursor

  1. CustomDocumentProperties

返回一个 DocumentProperties 集合,该集合代表指定工作簿的所有自定义文档属性
本示例在第一个工作表中列表显示自定义文档属性的名称和值。
rw = 1
Worksheets(1).Activate
For Each p In ActiveWorkbook.CustomDocumentProperties
    Cells(rw, 1).Value = p.Name
    Cells(rw, 2).Value = p.Value
    rw = rw + 1
Next

  1. CustomListCount

返回已定义的自定义序列的数目
本示例显示当前已定义的自定义序列的数目。
MsgBox "There are currently " & Application.CustomListCount & _
    " defined custom lists."

  1. CustomProperties

返回一个 CustomProperties 对象,该对象代表了与工作表相关的标识符信息
在本示例中,Microsoft Excel 向活动工作表中添加标识符信息,并将名称和值返回给用户。
Sub CheckCustomProperties()
    Dim wksSheet1 As Worksheet
    Set wksSheet1 = Application.ActiveSheet
    ' Add metadata to worksheet.
    wksSheet1.CustomProperties.Add _
        Name:="Market", Value:="Nasdaq"
    ' Display metadata.
    With wksSheet1.CustomProperties.Item(1)
        MsgBox .Name & vbTab & .Value
    End With
End Sub

  1. CustomViews

返回一个 CustomViews 集合,该集合代表指定工作簿的所有自定义视图
本示例在活动工作簿中新建一个自定义视图,并命名为“Summary”。
ActiveWorkbook.CustomViews.Add "Summary", True, True

  1. CustomViews

自定义工作簿视图的集合

  1. Cut

将对象剪切到剪贴板,或者将其粘贴到特定的目的地
本示例将工作表 Sheet1 上的 A1:G37 区域剪下,并放入剪贴板。
Worksheets("Sheet1").Range("A1:G37").Cut

  1. Cut

将对象剪切到剪贴板。
语法
表达式.Cut
表达式   一个代表 Shape 对象的变量。
返回值
Nothing

  1. Cut

将对象剪切到剪贴板。

  1. Cut

将对象剪切到剪贴板,或者将其粘贴到指定的目的地。

  1. CutCopyMode

返回或设置剪切或复制模式的状态
本示例在消息框中显示剪切或复制模式的状态
Select Case Application.CutCopyMode
    Case Is = False
        MsgBox "Not in Cut or Copy mode"
    Case Is = xlCopy
        MsgBox "In Copy mode"
    Case Is = xlCut
        MsgBox "In Cut mode"
End Select

  1. Cvar

类型转换函数可以强制将一个表达式转换成某种特定数据类型。
语法
CVar(expression)
必要的 expression 参数可以是任何字符串表达式或数值表达式。

  1. CVErr

返回 Error 子类型的 Variant,其中包含指定的错误号。
语法
CVErr(errornumber)
必要的 errornumber 参数可以是任何有效的错误号代码。
说明
可以在过程中,使用 CVErr 函数来创建用户自定义错误。例如,如果创建一个函数,它可以接受若干个参数,且正常返回一个字符串,则可以让函数来判断输入的参数,确认它们是在可接受的范围内。如果不是的话,此函数将不会返回所要的字符串。在这种情况下,CVErr 可以返回一个错误号,并告知应该采取的行动。

  1. Excel VBA属性、方法、事件大全——Part4(Complete List of Excel VBA attribute/method and event)
  1. Attribute/
    Method/Event

Description

  1. DashStyle

返回或设置指定直线的虚线样式。可以是 MsoLineDashStyle 常量之一。可读/写 Long 类型。

  1. DatabaseSort

如果为 True,则允许手动更改数据透视表字段中项目的位置。如果该字段中没有手动定位的项目,则返回 True。Boolean 类型,可读写。

  1. DataBinding

返回一个 XmlDataBinding 对象,该对象表示与指定的架构映射相关的绑定。只读。

  1. DataBodyRange

返回一个 Range 对象,它代表数据透视表中数值区域。只读。

  1. DataEntryMode

返回或设置“数据输入”模式
本示例检查“数据输入”模式是否处于打开状态,如果是,则关闭之。
If (Application.DataEntryMode = xlOn) Or _
    (Application.DataEntryMode = xlStrict) Then
        Application.DataEntryMode = xlOff
End If

  1. DataFields

返回一个对象,该对象表示单个数据透视表字段(PivotField 对象)或当前显示为数据字段的所有字段集合(PivotFields 对象)。只读。

  1. DataLabel

返回一个 DataLabel 对象,它代表与趋势线相关的数据标签。只读。

  1. DataLabel

返回一个 DataLabel 对象,它代表与数据点相关的数据标签。只读。

  1. DataLabelRange

返回一个 Range 对象,该对象表示在数据透视表中包含数据字段的标签的区域。只读。

  1. DataLabels

返回代表数据系列中单个数据标签(DataLabel 对象)或所有数据标签的集合(DataLabels 集合)的对象。

  1. DataPivotField

返回一个 PivotField 对象,该对象表示数据透视表中所有数据字段。只读。

  1. DataRange

返回一个 Range 对象,如下表所示。只读。

  1. DataSeries

在指定区域内创建数据系列
本示例在工作表 Sheet1 上的单元格区域 A1:A12 中创建包含 12 个日期的数据系列。该系列包含 1996 年中每个月份的最后一天。
Set dateRange = Worksheets("Sheet1").Range("A1:A12")
Worksheets("Sheet1").Range("A1").Formula = "31-JAN-1996"
dateRange.DataSeries Type:=xlChronological, Date:=xlMonth

  1. DataTable

返回 DataTable 对象,该对象代表图表的数据表。
本示例向嵌入图表添加带有外框的数据表。
With Worksheets(1).ChartObjects(1).Chart
    .HasDataTable = True
    .DataTable.HasBorderOutline = True
End With

  1. DataType

返回或设置一个 XlParameterDataType 值,它代表指定查询参数的数据类型。

  1. DataType

返回一个 XlPivotFieldDataType 值,它代表数据透视表字段中的数据类型。

  1. Date

设置当前系统日期。
语法
Date = date
对于运行 Microsoft Windows 95 的系统,要设置的 date 必须介于 1980 年 1月 1 日与 2099 年 12 月 31 日之间

  1. Date

返回包含系统日期的 Variant (Date)。
语法
Date
说明
为了设置系统日期,请使用 Date 语句。

  1. Date1904

如果指定工作簿使用的是 1904 日期系统,则该值为 True
本示例使 Microsoft Excel 对活动工作簿使用 1904 日期系统。
ActiveWorkbook.Date1904 = True

  1. DateAdd

返回包含一个日期的 Variant (Date),这一日期还加上了一段时间间隔。
语法
DateAdd(interval, number, date)
interval 必要。字符串表达式,是所要加上去的时间间隔。
number 必要。数值表达式,是要加上的时间间隔的数目。其数值可以为正数(得到未来的日期),也可以为负数(得到过去的日期)。
date 必要。Variant (Date) 或表示日期的文字,这一日期还加上了时间间隔。

  1. DateDiff

返回 Variant (Long) 的值,表示两个指定日期间的时间间隔数目。
语法
DateDiff(interval, date1, date2[, firstdayofweek[, firstweekofyear]])
interval 必要。字符串表达式,表示用来计算date1 和 date2 的时间差的时间间隔
Date1□date2 必要;Variant (Date)。计算中要用到的两个日期。
Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定,则以星期日为第一天。
firstweekofyear 可选。指定一年的第一周的常数。如果未予指定,则以包含 1 月 1 日的星期为第一周。

  1. DatePart

返回一个包含已知日期的指定时间部分的 Variant (Integer)。
语法
DatePart(interval, date[,firstdayofweek[, firstweekofyear]])
interval 必要。字符串表达式,是要返回的时间间隔。
date 必要。要计算的 Variant (Date) 值。
Firstdayofweek 可选。指定一个星期的第一天的常数。如果未予指定,则以星期日为第一天。
firstweekofyear 可选。指定一年第一周的常数。如果未予指定,则以包含 1 月 1 日的星期为第一周。

  1. DateSerial

返回包含指定的年、月、日的 Variant (Date)。
语法
DateSerial(year, month, day)
year 必要;Integer。从 100 到 9999 间的整数,或一数值表达式。
month 必要;Integer。任何数值表达式。
day 必要;Integer。任何数值表达式。

  1. DateValue

返回一个 Variant (Date)。
语法
DateValue(date)
必要的 date 参数 date 通常是字符串表达式,表示从 100 年 1 月 1 日到 9999 年 12 月 31 日之间的一个日期。但是,date 也可以是任何表达式,其所代表的日期、时间在上述范围内。

  1. DAverage

计算列表或数据库的列中符合指定条件的值的平均值。

  1. Day

返回一个 Variant (Integer),其值为 1 到 31 之间的整数,表示一个月中的某一日。
语法
Day(date)
必要的 date 参数,可以是任何能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null,则返回 Null。

  1. Days360

按一年 360 天的算法(一年 12 个月,每月 30 天)返回两个日期之间的天数,它用于某些会计计算中。

  1. Db

使用固定余额递减法返回指定周期内某项资产的折旧值。

  1. Dbcs

将字符串中的半角(单字节)字母转换为全角(双字节)字符。函数的名称(及其转换的字符)取决于语言设置。可读/写 String 类型。

  1. DCount

计算列表或数据库的列中符合指定条件并且包含数字的单元格的个数。

  1. DCountA

计算列表或数据库的列中符合指定条件的非空单元格的个数。

  1. DDB

返回一个 Double,指定一笔资产在一特定期间内的折旧。可使用双下落收复平衡方法或其它指定的方法进行计算。
语法
DDB(cost, salvage, life, period[, factor])
cost 必要。Double 指定资产的初始成本。
salvage 必要。Double.指定使用年限结束时的资产价值。
life 必要。Double 指定资产可用的可用年限。
period 必要。Double 指定计算资产折旧所用的那一期间。
factor 可选。Variant 指定收复平衡下落时的速度。如果省略的话,2(双下落方法)为缺省值。

  1. Ddb

使用双倍余额递减法或其他指定方法返回某项资产在指定周期内的折旧值。

  1. DDEAppReturnCode

返回带应用程序说明符的DDE返回代码,该代码包含在 Microsoft Excel 接收到的最后一个 DDE 确认信息中
本示例设置 appErrorCode 变量值为 DDE 返回代码。
appErrorCode = Application.DDEAppReturnCode

  1. DDEExecute

通过指定的 DDE 通道在另一个应用程序中执行一条命令或执行其他操作。
expression.DDEExecute(Channel, String)
expression可选。该表达式返回一个 Application 对象

  1. DDEInitiate

打开到一个应用程序的 DDE 通道。
expression.DDEInitiate(App, Topic)
expression可选。该表达式返回一个 Application 对象

  1. DDEPoke

向应用程序发送数据
expression.DDEPoke(Channel, Item, Data)
expression可选。该表达式返回一个 Application 对象

  1. DDERequest

来自指定应用程序的请求信息
expression.DDERequest(Channel, Item)
expression可选。该表达式返回一个 Application 对象。

  1. DDETerminate

关闭到另一个应用程序的 DDE 通道。
expression.DDETerminate(Channel)
expression可选。该表达式返回一个 Application 对象。

  1. Deactivate

图表、工作表或工作簿从活动状态转为非活动状态时产生此事件
本示例当工作簿转为非活动状态时,对所有打开的窗口进行排列。
Private Sub Workbook_Deactivate()
    Application.Windows.Arrange xlArrangeStyleTiled
End Sub

  1. Deactivate

图表、工作表或工作簿从活动状态转为非活动状态时产生此事件。
本示例当工作簿转为非活动状态时,对所有打开的窗口进行排列。
Private Sub Workbook_Deactivate()
    Application.Windows.Arrange xlArrangeStyleTiled
End Sub

  1. Dec2Bin

将十进制数转换为二进制数。

  1. Dec2Hex

将十进制数转换为十六进制数。

  1. Dec2Oct

将十进制数转换为八进制数。

  1. DecimalSeparator

设置或返回用作十位分隔符的字符
本示例将“1,234,567.89”放置在单元格 A1 中,然后将系统的十位分隔符和千位分隔符更改为短划线。
Sub ChangeSystemSeparators()
    Range("A1").Formula = "1,234,567.89"
    MsgBox "The system separators will now change."
    ' Define separators and apply.
    Application.DecimalSeparator = "-"
    Application.ThousandsSeparator = "-"
    Application.UseSystemSeparators = False
End Sub

  1. Declare

用于在模块级别中声明对动态链接库 (DLL) 中外部过程的引用。
语法 1
[Public | Private] Declare Sub name Lib "libname" [Alias "aliasname"] [([arglist])]
语法 2
[Public | Private] Declare Function name Lib "libname" [Alias "aliasname"] [([arglist])] [As type]
Public 可选的。用于声明对所有模块中的所有其它过程都可以使用的过程
Private 可选的。用于声明只能在包含该声明的模块中使用的过程。
Sub 可选的(但 Sub 或 Function 二者需选其一)。表示该过程没有返回值。
Function 可选的(但 Sub 或 Function 二者需选其一)。表示该过程会返回一个可用于表达式的值。
name 必需的。任何合法的过程名。注意动态链接库的入口处(entry points)区分大小写。
Lib 必需的。指明包含所声明过程的动态链接库或代码资源。所有声明都需要 Lib 子句。
libname 必需的。包含所声明的过程动态链接库名或代码资源名。
Alias 可选的。表示将被调用的过程在动态链接库 (DLL) 中还有另外的名称。当外部过程名与某个关键字重名时,就可以使用这个参数。当动态链接库的过程与同一范围内的公用变量、常数或任何其它过程的名称相同时,也可以使用 Alias。如果该动态链接库过程中的某个字符不符合动态链接库的命名约定时,也可以使用 Alias。
aliasname 可选的。动态链接库或代码资源中的过程名。如果首字符不是数字符号 (#),则 aliasname 是动态链接库中该过程的入口处的名称。如果首字符是 (#),则随后的字符必须指定该过程的入口处的顺序号。
arglist 可选的。代表调用该过程时需要传递的参数的变量表。
type 可选的。Function 过程返回值的数据类型;可以是 Byte、 Boolean 、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(只支持变长)或 Variant,用户定义类型,或对象类型。

  1. DefaultFilePath

返回或设置 Microsoft Excel 打开文件时使用的默认路径
本示例显示当前默认文件路径。
MsgBox "The current default file path is " & _
    Application.DefaultFilePath

  1. DefaultSaveFormat

返回或设置保存文件使用的默认格式
本示例设置保存文件的默认格式。
Application.DefaultSaveFormat = xlExcel4Workbook

  1. DefaultSheetDirection

返回或设置 Microsoft Excel 显示新窗口和工作表时的默认方向
本示例将默认方向设置为从右到左。
Application.DefaultSheetDirection = xlRTL

  1. DefaultWebOptions

返回 DefaultWebOptions 对象,该对象包含应用程序级的全局属性,当以网页保存文档或打开网页时,Microsoft Excel 会使用这些属性
本示例检查文档编码方式的默认设置是否为 Western,然后设置相应的字符串 strDocEncoding 的值。
If Application.DefaultWebOptions.Encoding = msoEncodingWestern Then
    strDocEncoding = "Western"
Else
    strDocEncoding = "Other"
End If

  1. DefaultWebOptions

包含应用程序级的全局属性,当将文档另存为网页或打开网页时,Microsoft Excel 将使用这些属性。您可以在应用程序(全局)级或在工作簿级返回或设置属性。
说明
工作簿级的属性设置会重写应用程序级的属性设置。工作簿级的属性设置包含在 WebOptions 对象中。

  1. Deftype

在模块级别上,为变量和传给过程的参数,设置缺省数据类型,以及为其名称以指定的字符开头的 Function 和 Property Get 过程,设置返回值类型。
语法
DefBool letterrange[, letterrange] . . .
DefByte letterrange[, letterrange] . . .
DefInt letterrange[, letterrange] . . .
DefLng letterrange[, letterrange] . . .
DefCur letterrange[, letterrange] . . .
DefSng letterrange[, letterrange] . . .
DefDbl letterrange[, letterrange] . . .
DefDec letterrange[, letterrange] . . .
DefDate letterrange[, letterrange] . . .
DefStr letterrange[, letterrange] . . .
DefObj letterrange[, letterrange] . . .
DefVar letterrange[, letterrange] . . .
所需的 letterrange 参数遵循下述语法:
letter1[-letter2]
letter1 和 letter2 参数指定设置缺省数据类型的名称范围。每个参数都是指变量,参数和 Function 过程,或 Property Get 过程名称的首字母,且参数可以是字母表中的任意字母。letterrange 中不区分字母的大小写。

  1. Degrees

将弧度转换为度。

  1. Delete

删除对象
本示例删除活动工作簿的 Sheet3 工作表,并且不显示确认对话框。
Application.DisplayAlerts = False
Worksheets("Sheet3").Delete
Application.DisplayAlerts = True

  1. Delete

删除对象
本示例删除 Sheet1 的 A1:D10 单元格区域,并将其右侧单元格向左移位
Worksheets("Sheet1").Range("A1:D10").Delete Shift:=xlShiftToLeft

  1. Delete

删除对象。
本示例删除 Sheet1 的 A1:D10 单元格区域,并将其右侧单元格向左移位
Worksheets("Sheet1").Range("A1:D10").Delete Shift:=xlShiftToLeft

  1. Delete

删除对象。
expression.Delete()
expression必需 。该表达式返回“应用于”列表中的对象之一

  1. Delete

删除对象。
expression.Delete()
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. Delete

删除对象。
本示例删除活动工作簿的 Sheet3 工作表,并且不显示确认对话框。
Application.DisplayAlerts = False
Worksheets("Sheet3").Delete
Application.DisplayAlerts = True

  1. Delete

从集合中删除 CommandBar 对象。在某些 Microsoft Office 应用程序中,CommandBar 已被新的功能区用户界面取代。有关详细信息,请在帮助中搜索关键字“功能区”。
语法
表达式.Delete
表达式   必需。一个代表 CommandBar 对象的变量。

  1. Delete

删除对象。
语法
表达式.Delete
表达式   一个代表 Name 对象的变量

  1. Delete

删除对象。

  1. Delete

删除对象。
语法
表达式.Delete
表达式   一个代表 Style 对象的变量。
返回值
Variant

  1. Delete

删除对象。
语法
表达式.Delete
表达式   一个代表 Shape 对象的变量。

  1. Delete

删除对象。
语法
表达式.Delete
表达式   一个代表 Comment 对象的变量。

  1. Delete

删除对象。
语法
表达式.Delete
表达式   一个代表 Charts 对象的变量。

  1. Delete

删除数据点所属的系列。

  1. Delete

删除自定义的文档属性。

  1. Delete

从工作簿中删除指定的 XML 映射。

  1. DeleteAll

删除有权访问工作表上受保护的区域的所有用户。

  1. DeleteChartAutoFormat

从图表的可用自动套用格式列表中删除自定义图表自动套用格式
本示例删除自定义自动套用格式“Presentation Chart”。
Application.DeleteChartAutoFormat name:="Presentation Chart"

  1. DeleteCustomList

删除一个自定义序列
本示例删除一个自定义序列。
n = Application.GetCustomListNum(Array("cogs", "sprockets", _
    "widgets", "gizmos"))
Application.DeleteCustomList n

  1. DeleteNumberFormat

从指定工作簿中删除一个自定义数字格式
本示例从当前工作簿中删除“000-00-0000”数字格式。
ActiveWorkbook.DeleteNumberFormat("000-00-0000")

  1. DeleteReplacement

删除“自动更正”替换数组中的一个输入项。
语法
表达式.DeleteReplacement(What)
表达式   一个代表 AutoCorrect 对象的变量。
参数
名称 必选/可选 数据类型 描述
What 必选 String 要替换的文本(当文本出现在要从“自动更正”替换数组中删除的行上时)。如果该字符串不在“自动更正”替换数组中,此方法将失败。

  1. DeleteSetting

在 Windows 注册表中 或 (Macintosh中)应用程序初始化文件中的信息,从应用程序项目里删除区域或注册表项设置。
语法
DeleteSetting appname, section[, key]
appname 必需的。字符串表达式,包含应用程序或工程的名称,区域或注册表项用于这些应用程序或工程。 在Macintosh中,这是System文件夹中Preferences文件夹中初始化文件的文件名。
section 必要。字符串表达式,包含要删除注册表项设置的区域名称。如果只有 appname 和 section,则将指定的区域连同所有有关的注册表项设置都删除。
key 可选。字符串表达式,包含要删除的注册表项设置。

  1. Delivery

返回或设置邮件传递的方法。可以是 XlRoutingSlipDelivery 常量之一。Long 类型,可读写。

  1. Delta

检验两个值是否相等。如果 number1 = number2,则返回 1;否则返回 0。

  1. Dependents

返回 Range 对象,该对象代表包含单元格所有依赖条件的区域
本示例选定工作表 Sheet1 中单元格 A1 的从属单元格。
Worksheets("Sheet1").Activate
Range("A1").Dependents.Select

  1. Depth

返回一个 Long 值,它代表分类轴刻度线标签的级别数。

  1. DepthPercent

返回或设置三维图表的深度,以图表宽度的百分比表示(有效范围从 20% 到 2000% )。
本示例将 Chart1 的深度设置为其宽度的 50%。本示例应在三维图表上运行(DepthPercent 属性在二维图表中无效)。
Charts("Chart1").DepthPercent = 50

  1. Description

获取或设置指定的 COMAddin 对象的说明性 String 值。可读/写。

  1. Deselect

取消对指定图表的选定。
本示例等价于在对活动图表进行处理时按下 Esc。本示例应在有组件(如坐标轴)被选定的图表上运行。
ActiveChart.Deselect

  1. Destination

返回查询表目标区域(查询结果表放置的区域)的左上角单元格。目标区域必须位于包含 QueryTable 对象的工作表中。Range 类型,只读。

  1. DevSq

返回数据点与其样本平均值的偏差的平方和。

  1. DGet

从列表或数据库的列中提取符合指定条件的单个值。

  1. Dialog

Dialog 对象
代表内置的 Microsoft Excel 对话框。
说明
Dialog 对象是 Dialogs 集合的成员。Dialogs 集合包含 Microsoft Excel 中的所有内置对话框。不能在集合中新建或添加内置对话框。Dialog 对象只能在 Show 方法中用来显示相应的对话框。

  1. DialogBox

显示由 Microsoft Excel 4.0 宏表上的对话框定义表所定义的对话框
本示例运行一个 Microsoft Excel 4.0 对话框,然后在消息框中显示返回值。dialogRange 变量是指在 Microsoft Excel 4.0 宏工作表上的称为“Macro1”的对话框定义表。
Set dialogRange = Excel4MacroSheets("Macro1").Range("myDialogBox")
result = dialogRange.DialogBox
MsgBox result

  1. Dialogs

返回一个 Dialogs 集合,此集合代表所有的内置对话框
本示例显示“文件”菜单的“打开”对话框。
Application.Dialogs(xlDialogOpen).Show

  1. Dialogs

Microsoft Excel 中所有 Dialog 对象的集合
可用 Dialogs 属性返回 Dialogs 集合。下例显示可用的内置 Microsoft Excel 对话框的数目。
MsgBox Application.Dialogs.Count

  1. DictLang

当 Microsoft Excel 执行拼写检查时,选择使用的词典语言。Long 类型,可读写。

  1. DifferentFirstPageHeaderFooter

如果在第一页使用不同的页眉或页脚,则为 True。可读/写 Boolean 类型。

  1. Dim

声明变量并分配存储空间。
语法
Dim [WithEvents] varname[([subscripts])] [As [New] type] [, [WithEvents] varname[([subscripts])] [As [New] type]] . . .
WithEvents 可选的。关键字,说明 varname 是一个用来响应由 ActiveX 对象触发的事件的对象变量。只有在类模块中才是合法的。使用 WithEvents,可以声明任意个所需的单变量,但不能使用 WithEvents 创建数组。New 和 WithEvents 不能一起使用。
varname 必需的。变量的名称;遵循标准的变量命名约定。
subscripts 可选的。数组变量的维数;最多可以定义 60 维的多维数组。subscripts 参数使用下面的语法:
  [lower To] upper [, [lower To] upper] . . .
如果不显式指定 lower,则数组的下界由 Option Base 语句控制。如果没有使用 Option Base 语句,则下界为 0。
New 可选的。可隐式地创建对象的关键字。如果使用 New 来声明对象变量,则在第一次引用该变量时将新建该对象的实例,因此不必使用 Set 语句来给该对象引用赋值。New 关键字不能声明任何内部数据类型的变量,以及从属对象的实例,也不能与 WithEvents 一起使用。
type 可选的。变量的数据类型;可以是 Byte、 Boolean 、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(对变长的字符串)、String * length (对定长的字符串)、Object、Variant、用户定义类型、或对象类型。所声明的每个变量都要一个单独的 As type 子句。

  1. Dir

返回一个 String,用以表示一个文件名、目录名或文件夹名称,它必须与指定的模式或文件属性、或磁盘卷标相匹配。
语法
Dir[(pathname[, attributes])]
pathname 可选参数。用来指定文件名的字符串表达式,可能包含目录或文件夹、以及驱动器。如果没有找到 pathname,则会返回零长度字符串 ("")。
attributes 可选参数。常数或数值表达式,其总和用来指定文件属性。如果省略,则会返回匹配 pathname 但不包含属性的文件。

  1. DirectDependents

返回 Range 对象,该对象代表包含一个单元格所有直接依赖条件的区域
本示例选定工作表 sheet1 中单元格 A1 的直接从属单元格。
Worksheets("Sheet1").Activate
Range("A1").DirectDependents.Select

  1. Direction

返回或设置朗读单元格的次序。Direction 属性的值为一个 XlSpeakDirection 常量。可读写。

  1. DirectPrecedents

返回 Range 对象,该对象代表包含一个单元格所有直接引用单元的区域
本示例选定工作表 sheet1 中单元格 A1 的直接引用单元格。
Worksheets("Sheet1").Activate
Range("A1").DirectPrecedents.Select

  1. Dirty

一次重新计算发生时指定要重新计算的单元格区域
本示例中,Excel在单元格A3中输入了一个公式,保存了更改,并重新计算了单元格 A3。
Sub UseDirtyMethod()
    MsgBox "Two values and a formula will be entered."
    Range("A1").Value = 1
    Range("A2").Value = 2
    Range("A3").Formula = "=A1+A2"
    ' Save the changes made to the worksheet.
    Application.DisplayAlerts = False
    Application.Save
    MsgBox "Changes saved."
    ' Force a recalculation of range A3.
    Application.Range("A3").Dirty
    MsgBox "Try to close the file without saving and a dialog box will appear."
End Sub

  1. DisableAskAQuestionDropdown

如果启用了“应答向导”下拉菜单,则为 True。可读写。
语法
表达式.DisableAskAQuestionDropdown
表达式   一个代表 CommandBars 对象的变量。

  1. DisableCustomize

如果禁用了工具栏的自定义功能,则为 True。可读写。
语法
表达式.DisableCustomize
表达式   一个代表 CommandBars 对象的变量。

  1. Disc

返回债券的贴现率。

  1. DisplayAlerts

如果宏运行时 Microsoft Excel 显示特定的警告和消息,则该值为 True
本示例关闭工作簿Book1.xls,但不提示用户保存所作更改。Book1.xls中的所有更改都不会保存。
Application.DisplayAlerts = False
Workbooks("BOOK1.XLS").Close
Application.DisplayAlerts = True

  1. DisplayAsCaption

此属性用于将透视字段的成员属性显示为标题。只读。

  1. DisplayAsTooltip

此属性用于指定在工具提示中是否显示透视字段的特定成员属性。可读写。Boolean。

  1. DisplayAutoCorrectOptions

允许用户显示或隐藏“自动更正选项”按钮。默认值为 True。Boolean 类型,可读写。
语法
表达式.DisplayAutoCorrectOptions
表达式   一个代表 AutoCorrect 对象的变量。

  1. DisplayBlanksAs

返回或设置在图表中绘制空白单元格的方式。
本示例设置 Microsoft Excel 在 Chart1 中不绘制空白单元格。
Charts("Chart1").DisplayBlanksAs = xlNotPlotted

  1. DisplayClipboardWindow

如果能显示 Microsoft Office 剪贴板,则返回 True
在本示例中,Microsoft Excel 确定是否可显示 Office 剪贴板,并通知用户。
Sub SeeClipboard()
    ' Determine if Office Clipboard can be displayed.
    If Application.DisplayClipboardWindow = True Then
        MsgBox "Office Clipboard can be displayed."
    Else
        MsgBox "Office Clipboard cannot be displayed."
    End If
End Sub

  1. DisplayCommentIndicator

返回或设置单元格批注和标识符的显示方式
本示例隐藏单元格提示,但保留批注标识符
Application.DisplayCommentIndicator = xlCommentIndicatorOnly

  1. DisplayContextTooltips

控制是否显示数据透视表单元格的工具提示。可读写 Boolean。

  1. DisplayDocumentActionTaskPane

设为True可显示“文档操作”任务窗格;设为 False 可隐藏“文档操作”任务窗格
expression.DisplayDocumentActionTaskPane
     expression    必需。该表达式返回一个 Application 对象。

  1. DisplayDrawingObjects

返回或设置图形的显示方式。
本示例隐藏当前工作簿中的所有图形。
ActiveWorkbook.DisplayDrawingObjects = xlHide

  1. DisplayEmptyColumn

如果对数值轴的 OLAP 提供程序的查询中包括非空 MDX 关键字,则返回 True。在结果集中,OLAP 提供程序不返回空列。如果省略非空关键字,则返回 False。Boolean 类型,可读写。

  1. DisplayEmptyRow

如果对分类轴的 OLAP 提供程序的查询中包括非空 MDX 关键字,则返回 True。在结果集中,OLAP 提供程序不返回空行。如果省略非空关键字,则返回 False。Boolean 类型,可读写。

  1. DisplayEquation

如果显示图表中的趋势线公式,则该值为 True(其数据标签与 R-平方值相同)。将该属性设为 True 可自动显示数据标签。Boolean 类型,可读写。

  1. DisplayErrorString

如果数据透视表在有错误的单元格中显示用户自定义的错误字符串,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. DisplayExcel4Menus

如果 Microsoft Excel 显示 4.0 版的菜单栏,则该值为 True
本示例将切换到显示 Microsoft Excel 4.0 版的菜单。
Application.DisplayExcel4Menus = True

  1. DisplayFieldCaptions

控制是否在网格中显示筛选器按钮以及行和列的透视字段标题。可读/写。

  1. DisplayFonts

如果在“字体”框中以实际字体显示字体名称,则为 True。可读写。
语法
表达式.DisplayFonts
表达式   一个代表 CommandBars 对象的变量。

  1. DisplayFormulaBar

如果编辑栏可见,则该值为 True
本示例隐藏编辑栏。
Application.DisplayFormulaBar = False

  1. DisplayFormulas

如果指定窗口正显示公式,则该值为 True,如果正显示数值,则该值为 False
本示例将 Book1.xls 的当前窗口更改为显示公式
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.DisplayFormulas = True

  1. DisplayFormulas

如果窗口正显示公式,则为 True;如果窗口正显示值,则为 False。可读/写 Boolean 类型。
语法
表达式.DisplayFormulas
表达式   一个代表 Window 对象的变量。

  1. DisplayFullScreen

如果 Microsoft Excel 处于全屏显示模式,则该值为 True
本示例设置 Microsoft Excel 以全屏显示模式进行显示。
Application.DisplayFullScreen = True

  1. DisplayFunctionToolTips

如果能显示函数的“工具提示”,则该值为 True
在本示例中,Microsoft Excel 将显示函数的“工具提示”的状态通知用户。
Sub CheckToolTip()
    ' Notify the user of the ability to display function ToolTips.
    If Application.DisplayFunctionToolTips = True Then
        MsgBox "The ability to display function ToolTips is on."
    Else
        MsgBox "The ability to display function ToolTips is off."
    End If
End Sub

  1. DisplayGridlines

如果显示网格线,则该值为 True
本示例切换 Book1.xls 活动窗口中的网格线显示方式。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.DisplayGridlines = Not(ActiveWindow.DisplayGridlines)

  1. DisplayGridlines

如果显示网格线,则为 True。可读/写 Boolean 类型。
语法
表达式.DisplayGridlines
表达式   一个代表 Window 对象的变量。

  1. DisplayHeadings

如果显示行列标题,则该值为 True;如果没有显示行列标题,则该值为 False
本示例隐藏 Book1.xls 活动窗口中的行列标题
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.DisplayHeadings = False

  1. DisplayHeadings

如果同时显示行标题和列标题,则为 True;如果未显示标题,则为 False。可读/写 Boolean 类型。
语法
表达式.DisplayHeadings
表达式   一个代表 Window 对象的变量。

  1. DisplayHorizontalScrollBar

如果显示水平滚动条,则该值为 True
本示例打开活动窗口的水平滚动条。
ActiveWindow.DisplayHorizontalScrollBar = True

  1. DisplayHorizontalScrollBar

如果显示水平滚动条,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.DisplayHorizontalScrollBar
表达式   一个代表 Window 对象的变量。

  1. DisplayImmediateItems

返回或设置 Boolean,用于指明当数据透视表的数据区域为空时,行和列区域中的项是否可见。如果该属性为 False,则当数据透视表的数据区域为空时,将隐藏行和列区域中的项。默认值为 True。

  1. DisplayInkComments

确定墨迹批注是否显示在工作簿中的 Boolean 值
expression.DisplayInkComments
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. DisplayInReport

此属性用于指定在数据透视表中是否显示指定的成员属性 PivotField。可读/写 Boolean 类型。

  1. DisplayInsertOptions

如果应显示“插入选项”按钮,则该值为 True
在本示例中,Microsoft Excel 将显示“插入选项”按钮的状态通知用户。
Sub SettingToolTip()
    ' Notify the user of the ToolTip status.
    If Application.DisplayInsertOptions = True Then
        MsgBox "The ability to display the Insert Options button is on."
    Else
        MsgBox "The ability to display the Insert Options button is off."
    End If
End Sub

  1. DisplayKeysInTooltips

如果每个命令栏控件的快捷键都显示在“工具提示”中,则为 True。可读写。
语法
表达式.DisplayKeysInTooltips
表达式   一个代表 CommandBars 对象的变量。

  1. DisplayMemberPropertyTooltips

控制是否在工具提示中显示成员属性。可读/写 Boolean 类型。

  1. DisplayNoteIndicator

如果包含注释的单元格显示单元格提示并包含注释标识符(单元格右上角的小圆点),则该值为 True
本示例隐藏注释标识符。
Application.DisplayNoteIndicator = False

  1. DisplayNullString

如果数据透视表在包含空值的单元格中显示用户自定义的字符串,则该值为 True。默认值为 True。Boolean 类型,可读写。

  1. DisplayOutline

如果显示分级显示符号,则该值为 True
本示例显示 Book1.xls 活动窗口中的分级显示符号。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.DisplayOutline = True

  1. DisplayOutline

如果显示分级显示符号,则为 True。可读/写 Boolean 类型。
语法
表达式.DisplayOutline
表达式   一个代表 Window 对象的变量。

  1. DisplayPageBreaks

如果显示指定工作表中的分页符(包括自动和手动分页符),则该值为 True
本示例使工作表 sheet1 显示分页符。
Worksheets("Sheet1").DisplayPageBreaks = True

  1. DisplayPasteOptions

如果能显示“粘贴选项”按钮,则该值为 True
在本示例中,Microsoft Excel 将显示“粘贴选项”按钮的状态通知用户。
Sub CheckDisplayFeature()
    ' Check if the options button can be displayed.
    If Application.DisplayPasteOptions = True Then
        MsgBox "The ability to display the Paste Options button is on."
    Else
        MsgBox "The ability to display the Paste Options button is off."
    End If
End Sub

  1. DisplayRecentFiles

如果在“文件”菜单中显示最近使用过的文件的名称,则该值为 True
本示例关闭最近使用过的文件名称列表。
Application.DisplayRecentFiles = False

  1. DisplayRightToLeft

如果指定的窗口、工作表或 ListObject 是从右到左显示,则该值为 True。如果对象从左到右显示,则该值为 False

  1. DisplayRightToLeft

如果指定的窗口或工作表是从右到左显示(而非从左到右),则为 True。如果对象从左到右显示,则为 False。Boolean 类型,只读。
语法
表达式.DisplayRightToLeft
表达式   一个代表 Window 对象的变量。

  1. DisplayRSquared

如果显示图表中趋势线的 R-平方值,则该值为 True(其数据标签与公式的相同)。将该属性设为 True 可自动显示数据标签。Boolean 类型,可读写。

  1. DisplayRuler

如果在指定窗口中显示标尺,则为 True。可读/写 Boolean 类型。
版本信息
 已添加版本:  Excel 2007
语法
表达式.DisplayRuler
表达式   一个代表 Window 对象的变量。

  1. DisplayScrollBars

如果滚动条对所有工作簿都可见,则该值为 True
本示例对所有工作簿都关闭滚动条。
Application.DisplayScrollBars = False

  1. DisplaySmartTags

返回或设置一个 XlSmartTagDisplayMode 常量,该常量表示智能标记的显示特征。可读写。

  1. DisplayStatusBar

如果显示状态栏,则该值为 True
本示例保存 DisplayStatusBar 属性的当前状态,然后将该属性设置为 True,以显示状态栏。
saveStatusBar = Application.DisplayStatusBar
Application.DisplayStatusBar = True

  1. DisplayTooltips

如果只要用户将指针放在命令栏控件上方就显示“屏幕提示”,则为 True。可读写。
语法
表达式.DisplayTooltips
表达式   一个代表 CommandBars 对象的变量。

  1. DisplayUnit

返回或设置数值轴的单位标签。XlDisplayUnit、xlCustom 或 xlNone 类型,可读写。

  1. DisplayUnitCustom

如果 DisplayUnit 属性的值是 xlCustom,则 DisplayUnitCustom 返回或设置显示的单位的值。该值范围必须是从 0 到 10E307。Double 类型,可读写。

  1. DisplayUnitLabel

返回指定坐标轴的 DisplayUnitLabel 对象。如果 HasDisplayUnitLabel 属性设置为 False,则返回 null。只读。

  1. DisplayVerticalScrollBar

如果显示垂直滚动条,则该值为 True
本示例显示活动窗口的垂直滚动条。
ActiveWindow.DisplayVerticalScrollBar = True

  1. DisplayVerticalScrollBar

如果显示垂直滚动条,则该属性值为 True。可读/写 Boolean 类型。
语法
表达式.DisplayVerticalScrollBar
表达式   一个代表 Window 对象的变量。

  1. DisplayWhitespace

如果显示空白,则为 True。可读/写 Boolean 类型。
版本信息
 已添加版本:  Excel 2007
语法
表达式.DisplayWhitespace
表达式   一个代表 Window 对象的变量

  1. DisplayWorkbookTabs

如果显示工作表标签,则该值为 True
本示例显示工作表标签。
ActiveWindow.DisplayWorkbookTabs = True

  1. DisplayWorkbookTabs

如果显示工作簿标签,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.DisplayWorkbookTabs
表达式   一个代表 Window 对象的变量。

  1. DisplayXMLSourcePane

将文件保存为 XML 电子表格格式,
打开“XML 源”任务窗格,并显示 XmlMap 参数指定的 XML 映射
可使用以下代码隐藏“XML 源”任务窗格。
Application.CommandBars("Task Pane").Visible = False

  1. DisplayZeros

如果显示零值,则该值为 True
本示例将 Book1.xls 中的活动窗口设置为显示零值。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.DisplayZeros = True

  1. DisplayZeros

如果显示零值,则为 True。可读/写 Boolean 类型。
语法
表达式.DisplayZeros
表达式   一个代表 Window 对象的变量。

  1. DivID

返回用于标识网页上 HTML <DIV> 标记的唯一标识符。此标记与保存为网页的文档中的某一项相关联。该项可以是整个工作簿、一张工作表、选定的打印区域、自动筛选区域、单元格区域、图表、数据透视表或查询表。String 类型,只读。

  1. DMax

返回列表或数据库的列中符合指定条件的最大数字。

  1. DMin

返回列表或数据库的列中符合指定条件的最小数字。

  1. Do...Loop

当条件为 True 时,或直到条件变为 True 时,重复执行一个语句块中的命令。
语法
Do [{While | Until} condition]
[statements]
[Exit Do]
[statements]
Loop
或者可以使用下面这种语法:
Do
[statements]
[Exit Do]
[statements]
Loop [{While | Until} condition]

condition 可选参数。数值表达式或字符串表达式,其值为 True 或 False。如果 condition 是 Null,则 condition 会被当作 False。
statements 一条或多条命令,它们将被重复当或直到 condition 为 True。

  1. DoAlert

显示一个警告并返回指示用户按下的按钮的 Long 值。可以选择通过“Microsoft Office 助手”或普通消息框显示此警告。

  1. DocumentLibraryVersions

返回一个 DocumentLibraryVersions 集合,代表启用版本控制的、存储在服务器上文档库中的共享工作簿的版本集合。
expression.DocumentLibraryVersions
expression必需。该表达式返回一个 Workbook 对象。

  1. DoEvents

转让控制权,以便让操作系统处理其它的事件。
语法
DoEvents( )
说明
DoEvents 函数会返回一个 Integer,以代表 Visual Basic 独立版本中打开的窗体数目,例如,Visual Basic,专业版,在其它的应用程序中,DoEvents 返回 0。

  1. Dollar

本“帮助”主题中描述的函数可将数字转换为文本格式,并应用货币符号。函数的名称及其应用的货币符号取决于您的语言设置。

  1. DollarDe

将按分数表示的价格转换为按小数表示的价格,使用函数 DOLLARDE 可以将分数表示的金额数字,如证券价格,转换为小数表示的数字。

  1. DollarFr

将按小数表示的价格转换为按分数表示的价格。使用函数 DOLLARFR 可以将小数表示的金额数字,如证券价格,转换为分数型数字。

  1. DoubleClick

等价于双击活动单元格
本示例双击工作表 Sheet1 中的活动单元格。
Worksheets("Sheet1").Activate
Application.DoubleClick

  1. DoughnutGroups

返回代表二维图表上单个圆环图图表组或圆环图图表组的集合的对象。
本示例设置 Chart1 中第一个圆环组的起始角度。
Charts("Chart1").DoughnutGroups(1).FirstSliceAngle = 45

  1. DoughnutHoleSize

返回或设置圆环图图表组的内径大小。内径大小以图表大小的百分比表示,有效取值范围为 10% 到 90%。Long 类型,可读写。

  1. DownBars

返回一个 DownBars 对象,该对象表示折线图中的跌柱线。仅应用于折线图。只读。

  1. DownloadComponents

如果必要的“Microsoft Office Web 组件”在您用 Web 浏览器查看已保存的文档时已经下载,但只有在尚未安装这些组件时,该值为 True。如果没有下载这些组件,则为 False。默认值是 False。Boolean 类型,可读写。

  1. DownloadURL

返回一个 String 值,该值表示智能标记的统一资源定位符 (URL)。只读。

  1. DProduct

计算列表或数据库的列中符合指定条件的值的乘积。

  1. Draft

如果打印工作表时不打印其中的图形,则该属性值为 True。Boolean 类型,可读写。

  1. DragOff

将一个分页符拖出打印区域。

  1. DragOver

当将一个单元格区域拖过图表时产生此事件。
本示例显示拖过图表的单元格区域的地址。
Private Sub Chart_DragOver()
    MsgBox Selection.Address
End Sub

  1. DragPlot

将一个单元格区域拖放到图表上时产生此事件。
本示例当将单元格区域拖放到图表上时更改该图表的类型。
Private Sub Chart_DragPlot()
    Me.ChartType = xlLine
End Sub

  1. DragToColumn

如果指定字段能被拖动到列位置上,则为 True。默认值是 True。Boolean 类型,可读写。

  1. DragToData

如果指定字段可被拖动到数据位置上,则为 True。默认值是 True。Boolean 类型,可读写。

  1. DragToHide

如果通过将字段拖离数据透视表可隐藏该字段,则为 True。默认值是 True。Boolean 类型,可读写。

  1. DragToPage

如果字段可被拖动到页位置上,则为 True。默认值是 True。Boolean 类型,可读写。

  1. DragToRow

如果字段可被拖动到行位置上,则为 True。默认值是 True。Boolean 类型,可读写。

  1. Drilled

设置多维数据集字段的分级成员选择控件中多维数据集字段成员的“drilled”(展开或可见)状态。该属性主要用于录制宏,而不用于其他用途。可读写。

  1. DrilledDown

如果指定数据透视表字段或数据透视表项的标志设置为“drilled”(展开或可见),则为 True。Boolean 类型,可读写。

  1. DrillTo

DrillTo 方法支持从另一个透视字段深化到指定的透视字段。

  1. DrillTo

DrillTo 方法支持从 PivotItem 中深化到指定的透视字段。

  1. DropDownLines

返回或设置组合框中下拉区域中显示的列表行的数目。Long 类型,可读写。

  1. DropLines

返回一个 DropLines 对象,该对象表示折线图或面积图上数据系列的垂直线。仅适用于折线图或面积图。只读。

  1. DStDev

将列表或数据库的列中符合指定条件的数字作为样本,估算总体的标准偏差。

  1. DStDevP

将列表或数据库的列中符合指定条件的数字作为整个总体,计算总体的标准偏差。

  1. DSum

计算列表或数据库的列中符合指定条件的数字之和。

  1. Duplicate

复制对象,并返回对新复制对象的引用。
语法
表达式.Duplicate
表达式   一个代表 Shape 对象的变量。
返回值
Shape

  1. Duplicate

复制对象,并返回对新复制对象的引用。

  1. Duration

返回假设面值 ¥100 的定期付息有价证券的修正期限。期限定义为一系列现金流现值的加权平均值,用于计量债券价格对于收益率变化的敏感程度。

  1. DVar

将列表或数据库的列中符合指定条件的数字作为一个样本,估算总体的方差。

  1. DVarP

将列表或数据库的列中符合指定条件的数字作为整个总体,计算总体的方差。

  1. Excel VBA属性、方法、事件大全——Part5(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. EDate

返回表示某个数据的序列号,该数据代表指定日期 (start_date) 之前或之后的月份数。使用函数 EDATE 可以计算与发行日处于一月中同一天的到期日的日期。

  1. EditDirectlyInCell

如果 Microsoft Excel 允许在单元格中直接进行编辑,则该值为 True
本示例在单元格中启用编辑。
Application.EditDirectlyInCell = True

  1. EditionOptions

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. EditWebPage

返回或设置用于 Web 查询的网页的统一资源定位符 (URL)。Variant 类型,可读写。

  1. Effect

利用给定的名义年利率和每年的复利期数,返回有效的年利率。

  1. Elevation

以角度为单位返回或设置三维图表视图的仰角。
本示例将 Chart1 的仰角设为 34 度。本示例应在三维图表上运行(Elevation 属性在二维图表上无效)。
Charts("Chart1").Elevation = 34

  1. EmailSubject

返回或设置指定超链接的电子邮件主题行的文本字符串。主题行是添加到超链接地址上的。String 类型,可读写。

  1. EmbedSmartTags

如果该属性值为 True,则在指定的工作簿上嵌入智能标记。Boolean 类型,可读写。

  1. EmptyCellReferences

如果该属性设置为 True(默认值),则 Microsoft Excel 使用“自动更正选项”按钮识别被选取的单元格,这些单元格中包括引用了空单元格的公式。如果该值为 False,则禁用空单元格引用检查。Boolean 类型,可读写。

  1. EnableAnimations

如果动态插入和删除功能有效,则该值为 True
本示例关闭动态插入和删除功能。
Application.EnableAnimations = False

  1. EnableAutoComplete

如果启用记忆式键入功能,则该值为 True
本示例启动记忆式键入功能。
Application.EnableAutoComplete = True

  1. EnableAutoFilter

当仅限于用户界面保护处于打开状态时,如果启用自动筛选箭头,则该值为 True
本示例启用受保护的工作表上的自动筛选箭头。
ActiveSheet.EnableAutoFilter = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True

  1. EnableAutoRecover

在规定的时间间隔内保存包含全部格式的已更改文件
下例检查“自动恢复”功能的设置,如果不能启用该功能,则 Excel 将启用该功能,并通知用户。
Sub UseAutoRecover()
    ' Check to see if the feature is enabled, if not, enable it.
    If ActiveWorkbook.EnableAutoRecover = False Then
        ActiveWorkbook.EnableAutoRecover = True
        MsgBox "The AutoRecover feature has been enabled."
    Else
        MsgBox "The AutoRecover feature is already enabled."
    End If
End Sub

  1. EnableCalculation

如果在必要的情况下 Microsoft Excel 自动重新计算工作表,则该值为 True。
本示例对自动重新计算功能进行设置,使 Microsoft Excel 不对第一张工作表自动进行重新计算。
Worksheets(1).EnableCalculation = False

  1. EnableCancelKey

控制 Microsoft Excel 将Ctrl+Break 用户中断用于运行程序的处理方式
本示例显示可使用 EnableCancelKey 属性设置自定义取消处理程序的方法。
On Error GoTo handleCancel
Application.EnableCancelKey = xlErrorHandler
MsgBox "This may take a long time: press ESC to cancel"
For x = 1 To 1000000    ' Do something 1,000,000 times (long!)
    ' do something here
Next x

handleCancel:
If Err = 18 Then
    MsgBox "You cancelled"
End If

  1. Enabled

如果启用对象,则为 True。Boolean 类型,可读写。
语法
表达式.Enabled
表达式   一个代表 AutoRecover 对象的变量。

  1. Enabled

获取或设置用于指定是否启用了指定 CommandBar 的 Boolean 值。可读写。
语法
表达式.Enabled
表达式   一个代表 CommandBar 对象的变量。

  1. Enabled

如果启用对象,则为 True。Boolean 类型,可读写。

  1. EnableDataValueEditing

如果为 True,则当用户覆盖数据透视表数据区域中的值时禁用警告。设置为 True 也可以使用户更改先前无法更改的数据值。默认值为 False。Boolean 类型,可读写。

  1. EnableDrilldown

如果启用“显示明细数据”,则该值为 True。默认值为 True。Boolean 类型,可读写。

  1. EnableEditing

如果允许用户对指定查询表进行编辑,则该值为 True;如果用户只能刷新查询表,则该值为 False。Boolean 类型,可读写。

  1. EnableEvents

如果对指定对象启用事件,则该值为 True
本示例在保存文件之前禁用事件,以使 BeforeSave 事件不能触发。
Application.EnableEvents = False
ActiveWorkbook.Save
Application.EnableEvents = True

  1. EnableFieldDialog

如果当用户双击数据透视表字段时,“数据透视表字段”对话框可用,则该属性值为 True。默认值为 True。Boolean 类型,可读写。

  1. EnableFieldList

如果为 False,则禁止显示数据透视表字段列表的功能。如果已经显示字段列表,则该列表将消失。默认值为 True。Boolean 类型,可读写。

  1. EnableItemSelection

如果为 False,则在用户界面中禁止使用下拉字段的功能。默认值为 True。Boolean 类型,可读写。

  1. EnableMultiplePageItems

被设置为 True,以便能够选取 OLAP 数据透视表的页字段区域中的多个项目。默认值是 False。可读/写 Boolean 类型。

  1. EnableMultiplePageItems

用于指定对于页面区域中的字段是否在筛选器下拉列表中显示复选框。可读/写 Boolean 类型。

  1. EnableOutlining

当仅限于用户界面保护处于打开状态时,如果启用分级显示符号,则该值为 True
本示例在受保护的工作表上启用分级显示符号。
ActiveSheet.EnableOutlining = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True

  1. EnablePivotTable

当仅限于用户界面保护处于打开状态时,如果启用数据透视表控件和操作,则该值为 True
本示例在受保护的工作表上启用数据透视表控件。
ActiveSheet.EnablePivotTable = True
ActiveSheet.Protect contents:=True, userInterfaceOnly:=True

  1. EnableRefresh

如果用户可刷新数据透视表高速缓存或查询表,则为 True。默认值为 True。Boolean 类型,可读写。

  1. EnableResize

如果能够调整窗口大小,则该值为 True
本示例设置活动窗口以使其大小不能被调整
ActiveWindow.EnableResize = False

  1. EnableResize

如果能够调整窗口大小,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.EnableResize
表达式   一个代表 Window 对象的变量。

  1. EnableSelection

返回或设置工作表中可被选定的单元格
本示例使在第一张工作表上不能进行任何选定。
With Worksheets(1)
    .EnableSelection = xlNoSelection
    .Protect Contents:=True, UserInterfaceOnly:=True
End With

  1. EnableSound

如果对 Microsoft Office 启用声音,则该值为 True
本示例禁用声音反馈。
Application.EnableSound = False

  1. EnableWizard

如果“数据透视表向导”可用,则该属性值为 True。默认值为 True。Boolean 类型,可读写。

  1. Enclosures

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. Encoding

当查看已保存的文档时,返回或设置 Web 浏览器使用的文档编码(代码页或字符集)。默认值为系统代码页。MsoEncoding 类型,可读写。

  1. End

返回一个 Range 对象,该对象代表包含源区域的区域尾端的单元格
本示例选定包含单元格 B4 的区域中 B 列顶端的单元格。
Range("B4").End(xlUp).Select
本示例选定包含单元格 B4 的区域中第 4 行尾端的单元格。
Range("B4").End(xlToRight).Select

  1. End

结束一个过程或块。
语法
End
End Function
End If
End Property
End Select
End Sub
End Type
End With

End 停止执行。不是必要的,可以放在过程中的任何位置关闭代码执行、关闭以 Open 语句打开的文件并清除变量。
End Function 必要的,用于结束一个 Function 语句。
End If 必要的,用于结束一个 If…Then…Else 语句块。
End Property 必要的,用于结束一个 Property Let、Property Get、或 Property Set 过程。
End Select 必要的,用于结束一个 Select Case 语句。
End Sub 必要的,用于结束一个 Sub 语句。
End Type 必要的,用于结束一个用户定义类型的定义(Type 语句)。
End With 必要的,用于结束一个 With 语句。

  1. EndArrowheadLength

返回或设置指定线条末尾的箭头的长度。MsoArrowheadLength 类型,可读写。

  1. EndArrowheadStyle

返回或设置指定线条端点的箭头样式。MsoArrowheadStyle 类型,可读写。

  1. EndArrowheadWidth

返回或设置指定线条端点的箭头的宽度。MsoArrowheadWidth 类型,可读写。

  1. EndConnect

将指定的连接符的终点连接到指定的形状上。如果在连接符的终点与其他形状之间已经有了连接,那么该已有的连接将中断。如果连接符的终点不在所需的连接结点,本方法将把连接符的终点移到该连接结点,并对连接符的大小和位置作相应的调整。可用 BeginConnect 方法将连接符的起点连接到某一形状上。

  1. EndConnected

如果该属性值为 msoTrue,则指定的连接符的端点已连接到了某一形状上。MsoTriState 类型,只读。

  1. EndConnectedShape

返回一个 Shape 对象,该对象表示指定连接符的终点所连到的形状。只读。

  1. EndConnectionSite

返回一个整数,该整数指定连接符终点的连接结点。Long 类型,只读。

  1. EndDisconnect

使指定的连接符的终点与其所连接的形状脱离。本方法并不更改连接符的尺寸和位置:连接符的终点仍保留在原来所连接的连接网站的位置,但与该连接网站之间不再有连接。可以使用 BeginDisconnect 方法使连接符的起点与某一形状分离。

  1. EndReview

终止对文件的审阅,该文件已用 SendForReview 方法发送候审
本示例终止对活动工作簿的审阅。执行该示例时,此过程显示一则消息,询问是否想要终止审阅。本示例假定活动工作簿已发送候审。
Sub EndWorkbookRev()
    ActiveWorkbook.EndReview
End Sub

  1. EndStyle

返回或设置误差线的尾端样式。可为以下 XlEndStyleCap 常量之一:xlCap 或 xlNoCap。Long 类型,可读写。

  1. EndWizard

释放由 StartWizard 方法返回的变量。

  1. EntireColumn

返回一个 Range 对象,该对象代表包含指定区域的整个列
本示例对包含活动单元格的列中的第一个单元格赋值。本示例必须在工作表上运行。
ActiveCell.EntireColumn.Cells(1, 1).Value = 5

  1. EntireRow

返回一个 Range 对象,该对象代表包含指定区域的整个行
本示例对包含活动单元格的行中的第一个单元格赋值。本示例必须在工作表上运行。
ActiveCell.EntireRow.Cells(1, 1).Value = 5

  1. Enum

定义枚举类型。
语法
[Public | Private] Enum name
membername [= constantexpression]
membername [= constantexpression]
. . .
End Enum
Public 可选的。表示该 Enum 类型在整个工程中都是可见的。Enum 类型的缺省情况是 Public。
Private 可选的。表示该 Enum 类型只在所声明的模块中是可见的。
name 必需的。该 Enum 类型的名称。name 必须是一个合法的 Visual Basic 标识符,在定义该 Enum 类型的变量或参数时用该名称来指定类型。
membername 必需的。用于指定该 Enum 类型的组成元素名称的合法 Visual Basic 标识符。
constantexpression 可选的。元素的值(为 Long 类型)。可以是别的 Enum 类型。如果没有指定 constantexpression,则所赋给的值或者是 0(如果该元素是第一个 membername),或者比其直接前驱的值大 1。

  1. EnvelopeVisible

如果电子邮件标题和信封工具栏都可见,则该值为 True
本示例检查第一个工作簿中电子邮件标题和信封工具栏是否可见。如果可见,则将变量 strSubject 设置为电子邮件主题行的文本。
If Workbooks(1).EnvelopeVisible = True Then
    strSubject = "Please read: Review immediately"
End If

  1. Environ

返回 String,它关连于一个操作系统环境变量。 在 Macintosh 中不可用
语法
Environ({envstring | number})
envstring 可选参数。包含一个环境变量名的字符串表达式。
number 可选参数。数值表达式,用来表示环境字符串在环境字符串表格中的数值顺序。number 参数可以是任意的数值表达式,不过在计算前,它会先转换为一个整数。

  1. EOF

返回一个 Integer,它包含 Boolean 值 True,表明已经到达为 Random 或顺序 Input 打开的文件的结尾。
语法
EOF(filenumber)
必要的 filenumber 参数是一个 Integer,包含任何有效的文件号。

  1. EoMonth

返回 start_date 的指定月数之前或之后的月份的最后一天的序列号。用函数 EOMONTH 可计算正好在特定月份中最后一天内的到期日或发行日。

  1. Erase

重新初始化大小固定的数组的元素,以及释放动态数组的存储空间。
语法
Erase arraylist
所需的 arraylist 参数是一个或多个用逗号隔开的需要清除的数组变量。

  1. Erf

返回误差函数在 lower_limit 和 upper_limit 之间的积分。

  1. ErfC

返回从指定参数到无穷积分的 ERF 函数的余误差函数。

  1. Error

模拟错误的发生。
语法
Error errornumber
必要的 errornumber 可以是任何有效的错误号。

  1. Error

返回对应于已知错误号的错误信息。
语法
Error[(errornumber)]
这个可选的 errornumber 参数可以为任何有效的错误号。如果 errornumber 是有效的错误号,但尚未被定义,则 Error 将返回字符串“应用程序定义的错误或对象定义的错误”。如果 errornumber 不是有效的错误号,则会导致错误发生。如果省略 errornumber,就会返回与最近一次运行时错误对应的消息。如果没有发生运行时错误,或者 errornumber 是 0,则 Error 返回一个长度为零的字符串 ("")。

  1. ErrorBar

将误差线应用于系列。Variant 类型。

  1. ErrorBars

返回一个 ErrorBars 对象,该对象表示数据系列中的误差线。只读。

  1. ErrorCheckingOptions

返回一个 ErrorCheckingOptions 对象,该对象代表应用程序的错误检查选项
在本示例中,TextDate 属性与 ErrorCheckingOptions 属性结合使用。当用户选择的单元格中的日期用2位数表示年份时,将出现“自动更正选项”按钮。
Sub CheckTextDate()
    ' Enable Microsoft Excel to identify dates written as text.
Application.ErrorCheckingOptions.TextDate = True
    Range("A1").Formula = "'April 23, 00"
End Sub

  1. ErrorCheckingOptions

表示某个应用程序的错误检查选项
使用 Application 对象的 ErrorCheckingOptions 属性可返回一个 ErrorCheckingOptions 对象。

引用 Errors 对象的 Item 属性可查看与错误检查相关的索引值列表

  1. ErrorMessage

返回或设置数据有效性检验错误消息。String 类型,可读写。

  1. Errors

允许用户访问错误检查选项
在本例中,单元格 A1 中放置了文本格式的数字。然后,Microsoft Excel 判断单元格 A1 中的数字是否为文本格式,并通知用户。
Sub CheckForErrors()
    Range("A1").Formula = "'12"
    If Range("A1").Errors.Item(xlNumberAsText).Value = True Then
        MsgBox "The number is written as text."
    Else
        MsgBox "The number is not written as text."
    End If
End Sub

  1. Errors

表示某个区域的各种电子表格错误

  1. ErrorString

返回一个 String 值,它代表 ODBC 错误字符串。

  1. ErrorString

返回或设置一个 String 值,它代表 DisplayErrorString 属性为 True 时如果单元格中有错误而显示的字符串。

  1. ErrorTitle

返回或设置数据有效性错误对话框的标题。String 类型,可读写。

  1. Evaluate

将一个 Microsoft Excel 名称转换为一个对象或者一个值
本示例将工作表 Sheet1 上 A1 单元格的字体设置为加粗。
Worksheets("Sheet1").Activate
boldCell = "A1"
Application.Evaluate(boldCell).Font.Bold = True

  1. EvaluateToError

如果该属性设置为 True(默认值),则 Microsoft Excel 将使用“自动更正选项”按钮识别被选中的单元格,这些单元格中包含计算结果错误的公式。如果该值为 False,则禁用对计算结果为错误值的单元格的错误检查。Boolean 类型,可读写。

  1. Even

返回向上舍入到最接近的偶数的数字。可以使用此函数处理成对出现的项目。例如,一个包装箱一行可容纳一宗或两宗货物。只有当这些货物的数目向上舍入到最接近的偶数,与包装箱的容量相匹配时,包装箱才会装满。

  1. EvenPage

返回或设置工作簿或节的偶数页上的文本对齐方式。

  1. Event

定义用户自定义的事件。
语法
[Public] Event procedurename [(arglist)]
Event 语句包含下面部分:
Public 可选的。指定该 Event 在整个工程中都是可见的。缺省情况下 Events 类型是 Public。应注意,事件只能在所声明的模块中产生。
procedurename 必需的。事件的名称;遵循标准的变量命名约定。

arglist 参数的语法及语法的各个部分如下:
[ByVal | ByRef] varname[( )] [As type]
ByVal 可选的。表示该参数是按值传递的。
ByRef 可选的。表示该参数是按地址传递的。ByRef 是 Visual Basic 的缺省设置。
varname 必需的。代表要传递给过程的参数变量的名称;遵循标准的变量命名约定。
type 可选的。指传递给过程的参数的数据类型;可以是 Byte、 Boolean 、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(只支持变长)、Object、Variant、用户定义类型或对象类型

  1. Excel4IntlMacroSheets

返回一个 Sheets 集合,此集合代表指定工作簿中所有国际通用的 Microsoft Excel 4.0 宏表
本示例显示活动工作簿中国际通用的 Microsoft Excel 4.0 宏表的数目。
MsgBox "There are " & _
ActiveWorkbook.Excel4IntlMacroSheets.Count & _
    " Microsoft Excel 4.0 international macro sheets" & _
    " in this workbook

  1. Excel4IntlMacroSheets

返回一个 Sheets 集合,此集合代表指定工作簿中所有国际通用的 Microsoft Excel 4.0 宏表。
本示例显示活动工作簿中国际通用的 Microsoft Excel 4.0 宏表的数目。
MsgBox "There are " & _
    ActiveWorkbook.Excel4IntlMacroSheets.Count & _
    " Microsoft Excel 4.0 international macro sheets" & _
    " in this workbook."

  1. Excel4MacroSheets

返回一个 Sheets 集合,此集合代表在指定工作簿中的所有 Microsoft Excel 4.0 宏表
本示例显示当前工作簿中 Microsoft Excel 4.0 宏表的数目。
MsgBox "There are " & ActiveWorkbook.Excel4MacroSheets.Count & _
    " Microsoft Excel 4.0 macro sheets in this workbook."

  1. ExclusiveAccess

指定当前用户对共享清单中的工作簿进行独占访问。
本示例检查活动工作簿是否以共享清单方式打开,如果是,则本示例设置当前用户以独占方式访问工作簿。
If ActiveWorkbook.MultiUserEditing Then
    ActiveWorkbook.ExclusiveAccess
End If

  1. Execute

执行指定的智能标记操作

  1. ExecuteExcel4Macro

执行一个 Microsoft Excel 4.0 宏函数,然后返回此函数的结果
本示例对工作表 Sheet1 上的 C3 单元格执行 GET.CELL(42) 宏函数,然后在一个消息框中显示结果。GET.CELL(42) 宏函数返回当前窗口左边界到活动单元格的左边之间的水平距离。Visual Basic 中没有与此宏函数直接等价的函数。
Worksheets("Sheet1").Activate
Range("C3").Select
MsgBox ExecuteExcel4Macro("GET.CELL(42)")

  1. ExecuteMso

执行由 idMso 参数标识的控件。
语法
表达式.ExecuteMso(idMso)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。

  1. Exit

退出 Do...Loop、For...Next、Function、Sub 或 Property 代码块。
语法
Exit Do
Exit For
Exit Function
Exit Property
Exit Sub
Exit Do 提供一种退出 Do...Loop 循环的方法,并且只能在 Do...Loop 循环中使用。Exit Do 会将控制权转移到 Loop 语句之后的语句。当 Exit Do 用在嵌套的 Do...Loop 循环中时,Exit Do 会将控制权转移到 Exit Do 所在位置的外层循环。
Exit For 提供一种退出 For 循环的方法,并且只能在 For...Next 或 For Each...Next 循环中使用。Exit For 会将控制权转移到 Next 之后的语句。当 Exit For 用在嵌套的 For 循环中时,Exit For 将控制权转移到 Exit For 所在位置的外层循环。
Exit Function 立即从包含该语句的 Function 过程中退出。程序会从调用 Function 的语句之后的语句继续执行。
Exit Property 立即从包含该语句的 Property 过程中退出。程序会从调用 Property 过程的语句之后的语句继续执行。
Exit Sub 立即从包含该语句的 Sub 过程中退出。程序会从调用 Sub 过程的语句之后的语句继续执行。

  1. Exp

返回 Double,指定 e(自然对数的底)的某次方。
语法
Exp(number)
必要的 number 参数 number 是 Double或任何有效的数值表达式。

  1. ExpandHelp

设置或返回一个 Boolean 值,代表指定的智能文档“帮助”文字控件在“文档操作”任务窗格中被展开还是被折叠。True 表示控件被展开。False 表示控件被折叠。

  1. Explosion

返回或设置饼图或圆环图的扇区的分离程度值。如果没有分离,则返回 0(零),即扇区的中心与饼图中心重合。Long 型,可读写。

  1. ExponDist

返回指数分布。使用 EXPONDIST 可以建立事件之间的时间间隔模型,如银行自动提款机支付一次现金所花费的时间。例如,可以使用函数 EXPONDIST 来确定这一过程最长持续一分钟的发生概率。

  1. Export

以图形格式导出图表。
本示例以 GIF 文件格式导出第一个图表。
Worksheets("Sheet1").ChartObjects(1) _
.Chart.Export _
    FileName:="current_sales.gif", FilterName:="GIF"

  1. Export

将映射到指定 XmlMap 对象的单元格的内容导出到 XML 数据文件。

  1. ExportXml

将映射到指定 XmlMap 对象的单元格的内容导出到 String 变量。

  1. Extend

向已存在的系列集合中添加新的数据点。

  1. ExtendList

如果 Microsoft Excel 自动将格式和公式扩展到清单中新增的数据上,则该值为 True
本示例设置 Excel,使其不对以后添加到清单中的数据应用格式和公式。
Application.ExtendList = False

  1. Extent

返回指定分页符的类型:全屏或仅在打印区域内。可为以下 任一 XlPageBreakExtent 常量:xlPageBreakFull 或 xlPageBreakPartial。Long 类型,只读。

  1. Extent

返回指定分页符的类型:全屏或仅在打印区域内。可为以下任一 XlPageBreakExtent 常量:xlPageBreakFull 或 xlPageBreakPartial。Long 类型,只读。

  1. Fact

返回数的阶乘。一个数的阶乘等于 1*2*3*...* 该数。

  1. FactDouble

返回数字的双倍阶乘。

  1. FDist

返回 F 概率分布。使用此函数可以确定两个数据系列是否存在变化程度上的不同。例如,分析进入高校的男生、女生的考试分数,确定女生分数的变化程度是否与男生不同。

  1. FeatureInstall

返回或设置一个值(常量),该值指定 Microsoft Excel 如何处理对所需功能尚未安装的方法和属性的调用
本示例激活 Microsoft Word 的一个新实例,并检查 FeatureInstall 属性的值。请确认设置了一个对 Microsoft Word 对象库的引用。如果 FeatureInstall 属性设置为 msoFeatureInstallNone,该代码将显示在消息框中,询问用户是否更改属性设置。如果用户响应“Yes”, 该属性将设置为 msoFeatureInstallOnDemand。
Dim WordApp As New Word.Application, Reply As Integer
Application.ActivateMicrosoftApp xlMicrosoftWord With WordApp
    If .FeatureInstall = msoFeatureInstallNone Then
        Reply = MsgBox("Uninstalled features for this " _
            & "application " & vbCrLf _
            & "may cause a run-time error when called." & vbCrLf _
            & vbCrLf _
            & "Would you like to change this setting" & vbCrLf _
            & "to automatically install missing features?" _
            , 52, "Feature Install Setting")
        If Reply = 6 Then
            .FeatureInstall = msoFeatureInstallOnDemand
        End If
    End If
End With

  1. FeatureTips

如果“Office 助手”提供有关更有效地使用应用程序功能的信息,则为 True。可读/写。

  1. FetchedRowOverflow

如果上次使用 Refresh 方法返回的行数比工作表中可用行数大,则该值为 True。Boolean 类型,只读。

  1. FieldListSortAscending

控制数据透视表字段列表中字段的排序顺序。当此属性设置为 True 时,字段按升序顺序排序。当它设置为 False 时,字段按数据源顺序排序。可读/写。

  1. FieldNames

如果数据源的字段名称作为返回数据的列标题显示,则该值为 True。默认值为 True。Boolean 类型,可读写。

  1. FileAttr

返回一个 Long,表示使用 Open 语句所打开文件的文件方式。
语法
FileAttr(filenumber, returntype)
filenumber 必要。Integer 类型,任何有效的文件号。
returntype 必要。Integer 类型。它是数字,指出返回信息的类型。指定 1 则可返回一个代表文件方式的数值。而仅仅在 16 位系统中, 指定 2 才可以恢复操作系统的文件句柄。在 32 位系统中不支持 Returntype 2,它会导致错误发生。

  1. FileConverters

返回已安装的文件转换器的信息
本示例显示是否安装了“Multiplan”文件转换器
installedCvts = Application.FileConverters
foundMultiplan = False
If Not IsNull(installedCvts) Then
    For arrayRow = 1 To UBound(installedCvts, 1)
        If installedCvts(arrayRow, 1) Like "*Multiplan*" Then
            foundMultiplan = True
            Exit For
        End If
    Next arrayRow
End If
If foundMultiplan = True Then
    MsgBox "Multiplan converter is installed"
Else
    MsgBox "Multiplan converter is not installed"
End If

  1. FileCopy

复制一个文件。
语法
FileCopy source, destination
source 必要参数。字符串表达式,用来表示要被复制的文件名。source 可以包含目录或文件夹、以及驱动器。
destination 必要参数。字符串表达式,用来指定要复制的目地文件名。destination 可以包含目录或文件夹、以及驱动器。

  1. FileDateTime

返回一个 Variant (Date),此为一个文件被创建或最后修改后的日期和时间。
语法
FileDateTime(pathname)
必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。

  1. FileDialog

返回一个 FileDialog 对象,该对象代表文件对话框的实例
在本示例中,Microsoft Excel 打开文件对话框,允许用户选择一个或多个文件。选中这些文件之后,Excel 将逐条显示每个文件的路径。
Sub UseFileDialogOpen()
    Dim lngCount As Long
    ' Open the file dialog
    With Application.FileDialog(msoFileDialogOpen)
        .AllowMultiSelect = True
        .Show
        ' Display paths of each file selected
        For lngCount = 1 To .SelectedItems.Count
            MsgBox .SelectedItems(lngCount)
        Next lngCount
    End With
End Sub

  1. FileFind

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。 有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助

  1. FileFormat

返回工作簿的格式或者类型。
本示例检查当前工作簿文件格式是否为 WK3 格式,如果是,则按常规文件格式保存该工作簿。
If ActiveWorkbook.FileFormat = xlWK3 Then
    ActiveWorkbook.SaveAs fileFormat:=xlNormal
End If

  1. FileLen

返回一个 Long,代表一个文件的长度,单位是字节。
语法
FileLen(pathname)
必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。

  1. FileName

返回或设置活动的“Office 助手”的路径和文件名。可读/写。

  1. Filename

返回或设置保存指定源对象位置的 URL(Intranet 或网站上)或路径(本地或网络)。String 型,可读写。

  1. FileSearch

为文件搜索返回一个 FileSearch 对象
本示例创建一个 FoundFiles 对象,该对象代表 My Documents 文件夹中的所有 Microsoft Excel 工作簿。
With Application.FileSearch
    .LookIn = "c:\my documents"
    .FileType = msoFileTypeExcelWorkbooks
    .Execute
End With

  1. FileSearch

为文件搜索返回一个 FileSearch 对象。本属性仅在 Microsoft Windows 中可用

  1. Fill

返回指定形状的 FillFormat 对象或指定图表的 ChartFillFormat 对象,这些对象包含形状或图表的填充格式属性。只读。
语法
表达式.Fill
表达式   一个代表 Shape 对象的变量。

  1. FillAcrossSheets

将单元格区域复制到工作表组中所有其他工作表的同一位置
本示例用工作表 Sheet1 上 A1:A5 区域的内容填充工作表 Sheet5 和 Sheet7 上的相同单元格区域。
x = Array("Sheet1", "Sheet5", "Sheet7")
Sheets(x).FillAcrossSheets _
    Worksheets("Sheet1").Range("A1:C5")

  1. FillAcrossSheets

将单元格区域复制到集合中所有其他工作表的同一位置。

  1. FillAdjacentFormulas

如果每当查询表刷新时,指定查询表右侧的公式就自动更新,则该属性值为 True。Boolean 类型,可读写。

  1. FillDown

从指定区域的顶部单元格开始向下填充,直至该区域的底部
本示例基于单元格 A1 的内容填写 Sheet1 的单元格区域 A1:A10。
Worksheets("Sheet1").Range("A1:A10").FillDown

  1. FillLeft

从指定区域的最右边单元格开始向左填充
本示例基于 Sheet1 上单元格 M1 的内容,填充单元格区域 A1:M1。
Worksheets("Sheet1").Range("A1:M1").FillLeft

  1. FillRight

从指定区域的最左边单元格开始向右填充
本示例基于 Sheet1 上单元格 A1 的内容,填充单元格区域 A1:M1。
Worksheets("Sheet1").Range("A1:M1").FillRight

  1. FillUp

从指定区域的底部单元格开始向上填充,直至该区域的顶部
本示例基于 Sheet1 上单元格 A10 的内容,填充单元格区域 A1:A10。
Worksheets("Sheet1").Range("A1:A10").FillUp

  1. Filter

返回一个下标从零开始的数组,该数组包含基于指定筛选条件的一个字符串数组的子集。
语法
Filter(sourcesrray, match[, include[, compare]])
sourcearray 必需的。要执行搜索的一维字符串数组。
match 必需的。要搜索的字符串。
include 可选的。Boolean值,表示返回子串包含还是不包含match字符串。如果include是True,Filter返回的是包含match子字符串的数组子集。如果include是False,Filter返回的是不包含match子字符串的数组子集。
compare 可选的。数字值,表示所使用的字符串比较类型。有关其设置,请参阅下面的“设置值”部分。

  1. FilterMode

果指定工作簿处于筛选模式,则该值为 True
本示例在消息框中显示 Sheet1 的筛选状态。
If Worksheets("Sheet1").FilterMode = True Then
    MsgBox "Filter mode is on"
Else
    MsgBox "Filter mode is off"
End If

  1. FilterMode

如果工作表的筛选模式为自动筛选,则返回 True。只读 Boolean 类型。

  1. Filters

返回一个 Filters 集合,该集合表示自动筛选区域中的所有筛选器。只读。

  1. Find

在区域中查找特定信息,并返回 Range 对象,该对象代表用于查找信息的第一个单元格
本示例在工作表的单元格区域 A1:A500 中查找包含值 2 的所有单元格,并将这些单元格的值更改为 5。
With Worksheets(1).Range("a1:a500")
    Set c = .Find(2, lookin:=xlValues)
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            c.Value = 5
            Set c = .FindNext(c)
        Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
End With

  1. Find

在工作表中查找特定信息。

  1. FindB

FIND 与 FINDB 查找一个文本字符串内的另一个文本字符串,并返回一个数字,表示从文本字符串(从中查找另一个文本字符串)的第一个字符起开始查找的第一个文本字符串的起始位置。

  1. FindControl

获取一个符合指定条件的 CommandBarControl 对象。
语法
表达式.FindControl(Type, Id, Tag, Visible)
表达式   一个代表 CommandBars 对象的变量。
参数
名称 必选/可选 数据类型 描述
Type 可选 Variant 控件的类型。
Id 可选 Variant 控件的标识符。
Tag 可选 Variant 控件的标记值。
Visible 可选 Variant 如果为 True,则只能在搜索中包含可见的命令栏控件。默认值为 False。可见的命令栏包括所有可见的工具栏和执行 FindControl 方法时打开的所有菜单。
返回值
CommandBarControl

  1. FindControl

获取一个符合指定条件的 CommandBarControl 对象。
语法
表达式.FindControl(Type, Id, Tag, Visible, Recursive)
表达式   一个代表 CommandBar 对象的变量。
参数
名称 必选/可选 数据类型 描述
Type 可选 Variant 控件的类型。
Id 可选 Variant 控件的标识符。
Tag 可选 Variant 控件的标记值。
Visible 可选 Variant 如果为 True,则只能在搜索中包含可见的命令栏控件。默认值为 False。可见的命令栏包括所有可见的工具栏和执行 FindControl 方法时打开的所有菜单。
Recursive 可选 Variant 如果该值为 True,那么将在命令栏及其所有弹出式子工具栏中查找。此参数仅应用于 CommandBar 对象。默认值为 False。
返回值
CommandBarControl

  1. FindControls

获取符合指定条件的 CommandBarControls 集合。
语法
表达式.FindControls(Type, Id, Tag, Visible)
表达式   一个代表 CommandBars 对象的变量。
参数
名称 必选/可选 数据类型 描述
Type 可选 Variant 为指定控件类型的 MsoControlType 常量之一。
Id 可选 Variant 控件的标识符。
Tag 可选 Variant 控件的标记值。
Visible 可选 Variant 如果为 True,则只能在搜索中包含可见的命令栏控件。默认值为 False。
返回值
CommandBarControls

  1. FindFile

显示“打开”对话框
本示例显示“打开”对话框。
Application.FindFile

  1. FindFormat

设置或返回要查找的单元格格式类型的搜索条件
在本示例中,搜索条件设置为查找文字为 Arial、常规和 10 号字体的单元格,并通知用户。
Sub UseFindFormat()
    ' Establish search criteria.
    With Application.FindFormat.Font
        .Name = "Arial"
        .FontStyle = "Regular"
        .Size = 10
    End With
    ' Notify user.
    With Application.FindFormat.Font
        MsgBox .Name & "-" & .FontStyle & "-" & .Size & _
            " font is what the search criteria is set to."
    End With
End Sub

  1. FindNext

继续执行用 Find 方法启动的搜索
本示例在单元格区域 A1:A500 中查找值为 2 的单元格,并将这些单元格的值变为 5。
With Worksheets(1).Range("a1:a500")
    Set c = .Find(2, lookin:=xlValues)
    If Not c Is Nothing Then
        firstAddress = c.Address
        Do
            c.Value = 5
            Set c = .FindNext(c)
        Loop While Not c Is Nothing And c.Address <> firstAddress
    End If
End With

  1. FindPrevious

继续执行用 Find 方法启动的搜索
本示例演示 FindPrevious 方法如何与 Find 方法和 FindNext 方法共用。运行本示例之前,请确保 Sheet1 的 B 列中至少出现过两次“Phoenix”。
Set fc = Worksheets("Sheet1").Columns("B").Find(what:="Phoenix")
    MsgBox "The first occurrence is in cell " & fc.Address
Set fc = Worksheets("Sheet1").Columns("B").FindNext(after:=fc)
    MsgBox "The next occurrence is in cell " & fc.Address
Set fc = Worksheets("Sheet1").Columns("B").FindPrevious(after:=fc)
    MsgBox "The previous occurrence is in cell " & fc.Address

  1. FInv

返回 F 概率分布的反函数值。如果 p = FDIST(x,...),则 FINV(p,...) = x。

  1. FirstPage

返回或设置工作簿或节的第一页上的文本对齐方式。

  1. FirstPageNumber

返回或设置打印指定工作表时第一页的页号。如果设为 xlAutomatic,则 Microsoft Excel 采用第一页的页号。默认值为 xlAutomatic。Long 类型,可读写。

  1. FirstSliceAngle

以度为单位返回或设置饼图或圆环图的第一扇区的角度(从垂直方向顺时针计算)。仅应用于饼图、三维饼图和圆环图。值的范围从 0 到 360。Long 类型,可读写。

  1. Fisher

返回点 x 的 Fisher 变换。该变换生成一个正态分布而非偏斜的函数。使用此函数可以完成相关系数的假设检验。

  1. FisherInv

返回 Fisher 变换的反函数值。使用此变换可以分析数据区域或数组之间的相关性。如果 y = FISHER(x),则 FISHERINV(y) = x。

  1. FitToPagesTall

返回或设置打印工作表时,对工作表进行缩放使用的页高。仅应用于工作表。Variant 类型,可读写。

  1. FitToPagesWide

返回或设置打印工作表时,对工作表进行缩放使用的页宽。仅应用于工作表。Variant 类型,可读写。

  1. Fix、Int

返回参数的整数部分。
语法
Int(number)
Fix(number)
必要的 number 参数是 Double 或任何有效的数值表达式。如果 number 包含 Null,则返回 Null。

  1. Fixed

将数字舍入到指定的小数位数,使用句点和逗号,以十进制数格式对该数进行格式设置,并以文本形式返回结果。

  1. FixedDecimal

将此属性设置为True之后,所有输入的数据由FixedDecimalPlaces 属性设定的小数位数设置格式
本示例将 FixedDecimal 属性设置为 True,并将 FixedDecimalPlaces 属性设为 4。本示例运行后,在工作表中输入“30000”将生成“3”,输入“12500”生成“1.25”。
Application.FixedDecimal = True
Application.FixedDecimalPlaces = 4

  1. FixedDecimalPlaces

如果 FixedDecimal 属性的值为 True,则返回或设置原来所设定的小数位数
本示例将 FixedDecimal 属性设置为 True,并将 FixedDecimalPlaces 属性设为 4。本示例运行后,在工作表中输入“30000”将生成“3”,输入“12500”生成“1.25”。
Application.FixedDecimal = True
Application.FixedDecimalPlaces = 4

  1. Flip

绕指定形状的水平或垂直对称轴翻转该形状。
语法
表达式.Flip(FlipCmd)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
FlipCmd 必选 MsoFlipCmd 指定形状是水平翻转还是垂直翻转。

  1. Floor

返回一个 Floor 对象,该对象代表三维图表的基底
本示例将 Chart1 的基底颜色设为蓝色。本示例应在三维图表上运行(Floor 属性在二维图表无效)。
Charts("Chart1").Floor.Interior.ColorIndex = 5

  1. Floor

将 number 向下舍入(向零的方向),使其等于最接近的 significance 的倍数。

  1. FolderSuffix

返回文件夹后缀,当您将文档保存为网页、使用长文件名,以及选择将支持文件单独保存在某个文件夹中(即,如果 UseLongFileNames 和 OrganizeInFolder 属性设置为 True)时,Microsoft Excel 使用该后缀。String 型,只读。

  1. Follow

如果已经下载指定文档,则显示缓冲区中的该文档。否则,本方法对指定超链接进行处理以下载目标文档,然后将该文档在适当的应用程序中显示出来。

  1. FollowHyperlink

本方法对指定超链接进行处理以下载目标文档,然后将该文档在适当的应用程序中显示出来。
本示例将 www.gohere.com 中的文档加载到一个新窗口,并将其添加到历史记录文件夹。
ActiveWorkbook.FollowHyperlink Address:="http://example.microsoft.com", _
    NewWindow:=True

  1. FollowHyperlink

当单击工作表上的任意超链接时,发生此事件
本示例对在当前活动工作簿中访问过的所有链接保留一个列表或历史记录。
Private Sub Worksheet_FollowHyperlink(ByVal Target As Hyperlink)
    With UserForm1
        .ListBox1.AddItem Target.Address
        .Show
    End With
End Sub

  1. Font

返回一个 Font 对象,该对象代表指定对象的字体
本示例判断单元格 A1 的字体名称是否为 Arial,并通知用户。
Sub CheckFont()
    Range("A1").Select
    ' Determine if the font name for selected cell is Arial.
    If Range("A1").Font.Name = "Arial" Then
        MsgBox "The font name for this cell is 'Arial'"
    Else
        MsgBox "The font name for this cell is not 'Arial'"
    End If
End Sub

  1. Font

包含对象的字体属性(字体名称、字体大小、字体颜色等)。

  1. Font

返回一个 Font 对象,该对象允许用户根据单元格的字体格式设置或返回搜索条件。
语法

表达式.Font

表达式   一个代表 CellFormat 对象的变量。

  1. Font

返回一个 Font 对象,它代表指定对象的字体。
语法
表达式.Font
表达式   一个代表 Style 对象的变量。

  1. Font

返回一个 Font 对象,它代表指定对象的字体。

  1. FontBold

如果指定艺术字中的字体格式为加粗,则该属性值为 True。MsoTriState 类型,可读写。

  1. FontItalic

如果指定艺术字中的字体是倾斜的,则返回 msoTrue。MsoTriState 类型,可读写。

  1. FontName

返回或设置指定艺术字的字体名称。String 类型,可读写。

  1. Fonts

返回 WebPageFonts 集合,该集合代表用户在 Excel 中打开网页,而该网页中没有指定任何字体信息,或者当前默认字体无法显示网页中的字符集时,Microsoft Excel 将使用的字体集。只读。

  1. FontSize

以磅为单位返回或设置指定艺术字的字体大小。Single 类型,可读写。

  1. FontStyle

返回或设置字体样式
本示例将 Sheet1 中 A1 单元格的字体样式设为加粗和倾斜。
Worksheets("Sheet1").Range("A1").Font.FontStyle = "Bold Italic"

  1. FooterMargin

以磅为单位返回或设置页脚到页面底端的距离。Double 类型,可读写。

  1. For Each...Next

针对一个数组或集合中的每个元素,重复执行一组语句。
语法
For Each element In group
[statements]
[Exit For]
[statements]
Next [element]
element 必要参数。用来遍历集合或数组中所有元素的变量。对于集合来说,element 可能是一个 Variant 变量、一个通用对象变量或任何特殊对象变量。对于数组而言,element只能是一个 Variant 变量。
group 必要参数。对象集合或数组的名称(用户定义类型的数组除外)。
statements 可选参数,针对 group 中的每一项执行的一条或多条语句。

  1. For...Next

以指定次数来重复执行一组语句。
语法
For counter = start To end [Step step]
[statements]
[Exit For]
[statements]
Next [counter]
counter 必要参数。用做循环计数器的数值变量。这个变量不能是 Boolean 或数组元素。
start 必要参数。counter 的初值。
End 必要参数,counter 的终值。
Step 可选参数。counter 的步长。如果没有指定,则 step 的缺省值为 1。
Statements 可选参数。放在 For 和 Next 之间的一条或多条语句,它们将被执行指定的次数。

  1. Forecast

根据已有的数值计算或预测未来值。此预测值为基于给定的 x 值推导出的 y 值。已知的数值为已有的 x 值和 y 值,再利用线性回归对新值进行预测。可以使用该函数对未来销售额、库存需求或消费趋势进行预测。

  1. ForeColor

返回或设置一个 ColorFormat 对象,它代表指定的前景填充色或纯色。

  1. ForeColor

返回或设置一个 ChartColorFormat 对象,它代表指定的前景填充色或纯色。

  1. Format

返回 Variant (String),其中含有一个表达式,它是根据格式表达式中的指令来格式化的。
语法
Format(expression[, format[, firstdayofweek[, firstweekofyear]]])
expression 必要参数。任何有效的表达式。
format 可选参数。有效的命名表达式或用户自定义格式表达式。
firstdayofweek 可选参数。常数,表示一星期的第一天。
firstweekofyear 可选参数。常数,表示一年的第一周。

  1. Format

返回 ChartFormat 对象。只读。

  1. FormatCondition

代表条件格式。
说明
FormatCondition 对象是 FormatConditions 集合的成员。对于给定区域,FormatConditions 集合中包含的条件格式不能超过三个。

  1. FormatConditions

返回 FormatConditions 集合,该集合代表指定区域的所有条件格式
本示例修改单元格区域 E1:E10 的现有条件格式。
Worksheets(1).Range("e1:e10").FormatConditions(1) _
    .Modify xlCellValue, xlLess, "=$a$1"

  1. FormatConditions

代表单个区域的所有条件格式的集合

  1. FormatCurrency

返回一个货币值格式的表达式,它使用系统控制面板中定义的货币符号。
语法
FormatCurrency(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])
Expression 必需的。要格式化的表达式。
NumDigitsAfterDecimal 可选的。数字值,表示小数点右边的显示位数。缺省值为–1,表示使用计算机的区域设置值。
IncludeLeadingDigit 可选的。三态常数,表示小数点前是否显示一个零。关于其值,请参阅“设置值”部分。
UseParensForNegativeNumbers 可选的。三态常数,表示是否把负数值放在园括号内。关于其值,请参阅“设置值”部分。
GroupDigits 可选的。三态常数,表示是否用组分隔符对数字进行分组,组分隔符由计算机的区域设置值指定。关于其值,请参阅“设置值”部分。

  1. FormatDateTime

返回一个日期或时间格式的表达式。
语法
FormatDateTime(Date[,NamedFormat])
Date 必需的。要被格式化的日期表达式。
NamedFormat 可选的。数字值,表示日期/时间所使用的格式。如果忽略该值,则使用vbGeneralDate。

  1. FormatNumber

返回一个数字格式的表达式。
语法
FormatNumber(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])
Expression 必需的。要被格式化的表达式。
NumDigitsAfterDecimal 可选的。数字值,表示小数点右边的显示位数。缺省值为–1,表示使用计算机的区域设置值。
IncludeLeadingDigit 可选的。三态常数,表示小数点前是否显示零。关于其值,请参阅“设置值”部分。
UseParensForNegativeNumbers 可选的。三态常数,表示是否把负数值放在圆括号内。关于其值,请参阅“设置值”部分。
GroupDigits 可选的。的三态常数,表示是否用组分隔符对数字分组,组分隔符在计算机的区域设置值中指定。关于其值,请参阅“设置值”部分。

  1. FormatPercent

返回一个百分比格式(乘以100)的表达式,后面有%符号。
语法
FormatPercent(Expression[,NumDigitsAfterDecimal [,IncludeLeadingDigit [,UseParensForNegativeNumbers [,GroupDigits]]]])
Expression 必需的。要格式化的表达式。
NumDigitsAfterDecimal 可选的。表示小数点右边的显示位数。缺省值为–1,表示使用计算机的区域设置值。
IncludeLeadingDigit 可选的。三态常数,表示小数点前是否显示零。关于其值,请参阅“设置值”部分。
UseParensForNegativeNumbers 可选的。三态常数,表示是否把负数放在圆括号内。关于其值,请参阅“设置值”部分。
GroupDigits 可选的。三态常数,表示是否用组分隔符对数字进行分组,组分隔符在计算机的区域设置值中指定。关于其值,请参阅“设置值”部分。

  1. FormatRow

返回或设置一个 Boolean 值,指定在条件格式规则的计算结果为 True 时是否应设置整个 Excel 表行的格式。默认值为 False。

  1. FormControlType

回 Microsoft Excel 控件 (Microsoft Excel 控件:Excel 本身具有的控件,而不是 ActiveX 控件。)类型。XlFormControl 类型,只读。
语法
表达式.FormControlType
表达式   一个代表 Shape 对象的变量。

  1. Formula

返回或设置 A1 样式表示法和宏语言中的对象的公式
本示例设置 Sheet1 中 A1 单元格的公式。
Worksheets("Sheet1").Range("A1").Formula = "=$A$4+$A$10"

  1. Formula

返回一个 String 值,它代表多维表达式 (MDX) 语法中成员的公式。

  1. Formula

返回或设置一个 String 值,它代表 A1 样式表示法和宏语言中的对象的公式。

  1. Formula1

返回与条件格式或者数据有效性相关联的值或表达式。可为常量值、字符串值、单元格引用或公式。String 型,只读。

  1. Formula2

返回与条件格式或数据有效性验证第二部分相关联的值或表达式。仅用于数据有效性条件格式 Operator 属性为 xlBetween 或 xlNotBetween 的情况。可为常量值、字符串值、单元格引用或公式。String 类型,只读。

  1. FormulaArray

返回或设置区域的数组公式
本示例在 Sheet1 上的单元格区域 A1:C5 中输入数组常量 3。
Worksheets("Sheet1").Range("A1:C5").FormulaArray = "=3"
本示例在 sheet1 上的单元格区域 E1:E3 中输入数组公式“=SUM(R1C1:R3C3)”。
Worksheets("Sheet1").Range("E1:E3").FormulaArray = _
    "=Sum(R1C1:R3C3)"

  1. FormulaHidden

如果工作表处于保护状态时将隐藏公式,则该值为 True
本示例在工作表处于保护状态时,隐藏 Sheet1 中单元格 A1 和 B1 的公式。
Sub HideFormulas()
Worksheets("Sheet1").Range("A1:B1").FormulaHidden = True
End Sub

  1. FormulaHidden

返回或设置一个 Variant 值,它指明在工作表处于保护状态时是否隐藏公式。
语法

表达式.FormulaHidden

表达式   一个代表 CellFormat 对象的变量。

  1. FormulaHidden

返回或设置一个 Boolean 值,它指明在工作表处于保护状态时是否隐藏公式。
语法
表达式.FormulaHidden
表达式   一个代表 Style 对象的变量。

  1. FormulaHidden

返回或设置一个 Boolean 值,它指明在工作表处于保护状态时是否隐藏公式。

  1. FormulaLabel

返回或设置指定区域的公式标志类型
本示例对当前活动工作簿设置 AcceptLabelsInFormulas 属性,然后将单元格 B1:D1 设置为列标志。
ActiveWorkbook.AcceptLabelsInFormulas = True
Worksheets(1).Range("b1:d1").FormulaLabel = xlColumnLabels

  1. FormulaLocal

返回或设置指定对象的公式,用用户语言中 A1-样式引用
假定使用的是美国英语版 Microsoft Excel,并往第一张工作表的 A11 单元格中输入了公式“=SUM(A1:A10)”。如果在一台运行德文版 Microsoft Excel 的计算机上打开该工作表,并运行下例,该示例将在消息框中显示公式“=SUMME(A1:A10)”。
MsgBox Worksheets(1).Range(A11).FormulaLocal

  1. FormulaLocal

返回或设置指定对象的公式,使用用户语言 A1 格式引用。String 型,可读写。

  1. FormulaR1C1

返回或设置指定对象的公式,用宏语言的 R1C1-样式符号表示
本示例为 Sheet1 的 B1 单元格设置公式。
Worksheets("Sheet1").Range("B1").FormulaR1C1 = "=SQRT(R1C1)"

  1. FormulaR1C1

返回或设置指定对象的公式,使用宏语言 R1C1 格式符号表示。String 型,可读写。

  1. FormulaR1C1Local

返回或设置指定对象的公式,用用户语言的 R1C1-样式符号表示
假定使用的是美国英语版的 Microsoft Excel,并向第一张工作表的 A11 单元格中输入了公式“=SUM(A1:A10)”。如果在一台运行德文版 Microsoft Excel 的计算机上打开该工作表,并运行下列示例,该示例将在消息框中显示公式“=SUMME(Z1S1:Z10S1)”。
MsgBox Worksheets(1).Range("A11").FormulaR1C1Local

  1. FormulaR1C1Local

返回或设置指定对象的公式,使用用户语言 R1C1 格式符号表示。String 型,可读写。

  1. Forward

返回或设置趋势线向前延伸的周期数目(或散点图中的单位个数)。Long 类型,可读写。

  1. Forward2

返回或设置趋势线向前延伸的周期数目(或散点图中的单位个数)。可读/写 Double 类型。

  1. ForwardMailer

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. FreeFile

返回一个 Integer,代表下一个可供 Open 语句使用的文件号。
语法
FreeFile[(rangenumber)]
可选的参数 rangenumber 是一个 Variant,它指定一个范围,以便返回该范围之内的下一个可用文件号。指定 0(缺省值)则返回一个介于 1 – 255 之间的文件号。指定 1 则返回一个介于 256 – 511 之间的文件号。

  1. FreezePanes

如果拆分窗格被冻结,则该值为 True
本示例冻结 Book1.xls 当前窗口的拆分窗格。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.FreezePanes = True

  1. FreezePanes

如果拆分窗格被冻结,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.FreezePanes
表达式   一个代表 Window 对象的变量。

  1. Frequency

计算数值在某个区域内的出现频率,然后返回一个垂直数组。例如,使用函数 FREQUENCY 可以在分数区域内计算测验分数的个数。由于函数 FREQUENCY 返回一个数组,所以它必须以数组公式的形式输入。

  1. FTest

返回 F 检验的结果。F 检验返回的是当 array1 和 array2 的方差无明显不同时的双尾概率。可以使用此函数来确定两个样本的方差是否不同。例如,给定公立和私立学校的测试成绩,可以检验各学校间测试成绩的差别程度。

  1. FullName

返回对象的名称,包括其磁盘路径的字符串
本示例显示每一个可用加载宏的路径及文件名。
For Each a In AddIns
    MsgBox a.FullName
Next a
本示例显示当前工作簿的路径及文件名(假定尚未保存此工作簿)。
MsgBox ActiveWorkbook.FullName

  1. FullName

返回对象的名称(以字符串表示),包括其磁盘路径。String 型,只读。
语法
表达式.FullName
表达式   一个代表 AddIn 对象的变量。
返回对象的名称(以字符串表示),包括其磁盘路径。String 型,只读。
语法
表达式.FullName
表达式   一个代表 AddIn 对象的变量。

  1. FullName

返回对象的名称(以字符串表示),包括其磁盘路径。String 型,只读。

  1. FullNameURLEncoded

返回指示对象名称(包括其磁盘路径)的字符串
在本示例中,Microsoft Excel 向用户显示活动工作簿的路径和文件名称。
Sub UseCanonical()
    ' Display the full path to user.
    MsgBox ActiveWorkbook.FullNameURLEncoded
End Sub

  1. Function

声明 Function 过程的名称,参数以及构成其主体的代码。
语法
[Public | Private | Friend] [Static] Function name [(arglist)] [As type]
[statements]
[name = expression]
[Exit Function]
[statements]
[name = expression]
End Function
Public 可选的。表示所有模块的所有其它过程都可访问这个 Function 过程。如果是在包含 Option Private 的模块中使用,则这个过程在该工程外是不可使用的。
Private 可选的。表示只有包含其声明的模块的其它过程可以访问该 Function 过程。
Friend 可选的。只能在类模块中使用。表示该 Function 过程在整个工程中都是可见的,但对于对象实例的控制者是不可见的。
Static 可选的。表示在调用之间将保留 Function 过程的局部变量值。Static 属性对在该 Function 外声明的变量不会产生影响,即使过程中也使用了这些变量
name 必需的。Function 的名称;遵循标准的变量命名约定。
arglist 可选的。代表在调用时要传递给 Function 过程的参数变量列表。多个变量应用逗号隔开。
type 可选的。Function 过程的返回值的数据类型,可以是 Byte、 Boolean 、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(除定长)、Object、Variant或任何用户定义类型。
statements 可选的。在 Function 过程中执行的任何语句组。
expression 可选的。Function 的返回值。

  1. Function

返回或设置对数据透视表字段汇总时所使用的函数(仅用于数据字段)。XlConsolidationFunction 类型,可读写。

  1. FunctionWizard

对指定区域左上角单元格启动函数向导
本示例对 Sheet1 中活动单元格启动函数向导。
Worksheets("Sheet1").Activate
ActiveCell.FunctionWizard

  1. FV

返回一个 Double,指定未来的定期定额支付且利率固定的年金。
语法
FV(rate, nper, pmt[, pv[, type]])
rate 必要。Double,指定每一期的利率。例如,如果有一笔贷款年百分率 (APR) 为百分之十且按月付款的汽车贷款,则利率为 0.1/12 或 0.0083。
nper 必要。Integer,指定一笔年金的付款总期限。例如,如果对一笔为期四年的汽车贷款选择按月付款方式,则贷款期限共有 4 * 12(或 48)个付款期。
pmt 必要。Double 指定每一期的付款金额。付款金额通常包含本金和利息,而且此付款金额在年金的有效期间是不会改变的。
pv 可选。Variant,指定未来一系列付款(或一次付清款项)的现值。例如,当借钱买一辆汽车时时,向贷方所借的金额为未来每月付款给贷方的现值。如果省略的话,缺省值为 0。
type 可选。Variant,指定贷款到期时间。如果贷款在贷款周期结束时到期,请使用 0。如果贷款在周期开始时到期,请使用 1。如果省略的话,缺省值为 0

  1. Fv

基于固定利率和等额分期付款方式,返回某项投资的未来值。

  1. FVSchedule

基于一系列复利返回本金的未来值。函数 FVSCHEDULE 用于计算某项投资在变动或可调利率下的未来值。

  1. Excel VBA属性、方法、事件大全——Part6(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. GammaDist

返回 γ 分布函数值。可以使用此函数来研究具有偏态分布的变量。γ 分布通常用于队列分析。

  1. GammaInv

返回 γ 累积分布函数的反函数值。如果 p = GAMMADIST(x,...),则 GAMMAINV(p,...) = x。

  1. GammaLn

返回 γ 函数的自然对数 Γ(x)。

  1. GapDepth

以数据标志宽度的形式返回或设置三维图表中数据系列之间的距离,本属性的值必须在 0 和 500 之间。
本示例将 Chart1 的数据系列之间的距离设为数据标志宽度的 200%。本示例应在三维图表上运行(GapDepth 属性在二维图表上无效)。
Charts("Chart1").GapDepth = 200

  1. GapWidth

对于条形图和柱形图:以条形或柱形宽度百分数的形式返回或设置条形簇或柱形簇之间的距离。对于饼图中的扇形和饼图中的条形:返回或设置图表的第一节和第二节之间的间距。Long 类型,可读写。

  1. Gcd

返回两个或多个整数的最大公约数,最大公约数是能分别将 Number1 和 Number2 除尽的最大整数。

  1. GenerateGetPivotData

当 Microsoft Excel 能够获取数据透视表数据时,返回 True
在本示例中,Microsoft Excel 确定获取数据透视表数据的状态,并通知用户。本示例假定数据透视表位于活动工作表上。
Sub PivotTableInfo()
    ' Determine the ability to get PivotTable report data and notify user.
    If Application.GenerateGetPivotData = True Then
        MsgBox "The ability to get PivotTable report data is enabled."
    Else
        Msgbox "The ability to get PivotTable report data is disabled."
    End If
End Sub

  1. GeoMean

返回正数数组或区域的几何平均值。例如,可以使用函数 GEOMEAN 计算可变复利的平均增长率。

  1. GermanPostReform

如果该值为 True,则使用德语后期修订规则检查单词的拼写。如果该值为 False,则取消该功能。Boolean 类型,可读写。

  1. GeStep

如果 Number 大于等于 step,返回 1,否则返回 0(零)。使用此函数可对一组值进行筛选。例如,通过计算多个函数 GESTEP 的返回值,可以检测出数据集中超过某个临界值的数据个数。

  1. Get

将一个已打开的磁盘文件读入一个变量之中。
语法
Get [#]filenumber, [recnumber], varname
filenumber 必要。任何有效的文件号。
recnumber 可选。Variant (Long)。记录号(Random 方式的文件)或字节数(Binary 方式的文件),以表示在此处开始读出数据。
varname 必要。一个有效的变量名,将读出的数据放入其中。

  1. GetAllSettings

从 Windows 注册表 或 (Macintosh中)应用程序初始化文件中的信息中返回应用程序项目的所有注册表项设置及其相应值
语法
GetAllSettings(appname, section)
appname 必要。字符串表达式,包含应用程序或工程的名称,并要求这些应用程序或工程有注册表项设置 在Macintosh中,这是System文件夹中Preferences文件夹中初始化文件的文件名。
section 必要。字符串表达式,包含区域名称,并要求该区域有注册表项设置。GetAllSettings 返回 Variant,其内容为字符串的二维数组,该二维数组包含指定区域中的所有注册表项设置及其对应值。

  1. GetAttr

返回一个 Integer,此为一个文件、目录、或文件夹的属性。
语法
GetAttr(pathname)
必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。

  1. GetChartElement

返回指定的 X 坐标和 Y 坐标上图表元素的信息。
当鼠标移动到图表图例上时,本示例发出警告。
Private Sub Chart_MouseMove(ByVal Button As Long, _
        ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
    Dim IDNum As Long
    Dim a As Long
    Dim b As Long
    ActiveChart.GetChartElement X, Y, IDNum, a, b
    If IDNum = xlLegendEntry Then _
        MsgBox "WARNING: Move away from the legend"
End Sub

  1. GetCustomListContents

返回一个自定义序列(一个字符串数组)。
本示例将第一个自定义序列的元素写到 Sheet1 的第一列中。
listArray = Application.GetCustomListContents(1)
For i = LBound(listArray, 1) To UBound(listArray, 1)
    Worksheets("sheet1").Cells(i, 1).Value = listArray(i)
Next i

  1. GetData

返回数据透视表中数据字段的值。

  1. GetEnabledMso

如果启用了 idMso 参数标识的控件,则返回 True。
语法
表达式.GetEnabledMso(idMso)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。
返回值
Boolean

  1. GetImageMso

返回由 idMso 参数标识的控件图像(缩放到指定的宽度和高度尺寸)的 IPictureDisp 对象。
语法
表达式.GetImageMso(idMso, Width, Height)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。
Width 必选 Integer 图像的宽度。
Height 必选 Integer 图像的高度。
返回值
IPictureDisp

  1. GetLabelMso

将 idMso 参数标识的控件的标签作为 String 类型的值返回。
语法
表达式.GetLabelMso(idMso)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。
返回值
String

  1. GetObject

返回文件中的 ActiveX 对象的引用。
语法
GetObject([pathname] [, class])
pathname 可选的;Variant (String)。包含待检索对象的文件的全路径和名称。如果省略 pathname,则 class 是必需的。
class 可选的;Variant (String)。代表该对象的类的字符串。

  1. GetPhonetic

返回指定文本串的日语拼音文本
本示例显示指定字符串中所有可能的拼音文本字符串。
strPhoText = Application.GetPhonetic("")
While strPhoText <> ""
    MsgBox strPhoText
    strPhoText = Application.GetPhonetic()
Wend

  1. GetPivotData

返回一个 Range 对象,并返回有关数据透视表中数据项的信息。

  1. GetPressedMso

返回一个值,该值指示是否已按下 idMso 参数标识的 toggleButton 控件。
语法
表达式.GetPressedMso(idMso)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。
返回值
Boolean

  1. GetSaveAsFilename

显示标准的“另存为”对话框,获取用户文件名,而无须真正保存任何文件。
本示例显示文本文件的“另存为”对话框。如果用户选择了一个文件名,则在消息框中显示所选的文件名。
fileSaveName = Application.GetSaveAsFilename( _
    fileFilter:="Text Files (*.txt), *.txt")
If fileSaveName <> False Then
    MsgBox "Save as " & fileSaveName
End If

  1. GetScreentipMso

将 idMso 参数标识的控件的屏幕提示作为 String 类型的值返回。
语法
表达式.GetScreentipMso(idMso)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。
返回值
String

  1. GetSetting

从 Windows 注册表中 或 (Macintosh中)应用程序初始化文件中的信息的应用程序项目返回注册表项设置值。
语法
GetSetting(appname, section, key[, default])
appname 必要。字符串表达式,包含应用程序或工程的名称,要求这些应用程序或工程有注册表项设置。 在Macintosh中,这是System文件夹中Preferences文件夹中初始化文件的文件名。
section 必要。字符串表达式,包含区域名称,要求该区域有注册表项设置。
key 必要。字符串表达式,返回注册表项设置的名称。
default 可选。表达式,如果注册表项设置中没有设置值,则返回缺省值。如果省略,则 default 取值为长度为零的字符串 ("")。

  1. GetSupertipMso

将 idMso 参数标识的控件的超级提示作为 String 类型的值返回。
语法
表达式.GetSupertipMso(idMso)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。
返回值
String

  1. GetVisibleMso

如果 idMso 参数标识的控件可见,则返回 True。
语法
表达式.GetVisibleMso(idMso)
表达式   一个返回 CommandBars 对象的表达式。
参数
名称 必选/可选 数据类型 描述
idMso 必选 String 控件的标识符。
返回值
Boolean

  1. Glow

返回一个包含形状发光格式属性的指定形状的 GlowFormat 对象。只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.Glow
表达式   一个代表 Shape 对象的变量。

  1. GoalSeek

为得出特定结果而进行单变量求解
本示例假定Sheet1中包含单元格“Polynomial”,该单元格的公式为=(X^3)+(3*X^2)+6,另有名为“X”的空单元格。本示例将求出X的一个解,使得单元格“Polynomial”的值为 15。
Worksheets("Sheet1").Range("Polynomial").GoalSeek _
    Goal:=15, _
ChangingCell:=Worksheets("Sheet1").Range("X")

  1. GoSub...Return

在一个过程中跳到另一个子程序中执行,执行后再返回。
语法
GoSub line
...
line
...

Return
必要的 line 参数可以是任何行标签或行号。

  1. GotFocus

当 ActiveX 控件获得输入焦点时,发生此事件。

  1. Goto

选定任意工作簿中的任意区域或任意 Visual Basic 过程,并且如果该工作簿未处于活动状 态,就激活该工作簿
本示例选定 Sheet1 中的单元格 A154,并滚动工作表以显示该单元格。
Application.Goto Reference:=Worksheets("Sheet1").Range("A154"),scroll:=True

  1. GoTo

无条件地转移到过程中指定的行。
语法
GoTo line
必要的 line 参数可以是任意的行标签或行号。

  1. GradientColorType

返回指定填充的渐变颜色类型。MsoGradientColorType,只读。

  1. GradientDegree

以浮点数值的方式返回单色阴影填充的渐变程度,数值大小介于 0.0(暗)到 1.0(亮)之间。Single 型,只读。

  1. GradientStops

返回渐变填充的终点。只读。

  1. GradientStyle

返回指定填充的渐变样式。MsoGradientStyle,只读。

  1. GradientVariant

以整数值(1 至 4)形式返回指定填充的底纹变量。此属性的值对应于“填充效果”对话框中“渐变”选项卡的渐变变量(从左到右、从上到下编号)。Long 型,只读。

  1. GrandTotalName

返回或设置显示在指定数据透视表的总计列或行标题中的文本串标志。默认值为字符串“Grand Total”。String 类型,可读写。

  1. Graphic

返回或设置页面右边缘与页脚右边界之间的距离(以磅为单位)。可读/写 String 类型。包括应用于页眉和页脚的图片对象的属性。

  1. GridlineColor

以 RGB 值返回或设置网格线颜色
本示例将 Book1.xls 活动窗口的网格线颜色设为红色。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.GridlineColor = RGB(255,0,0)

  1. GridlineColor

以 RGB 值返回或设置网格线颜色。Long 类型,可读写。
语法
表达式.GridlineColor
表达式   一个代表 Window 对象的变量。

  1. GridlineColorIndex

返回或设置网格线颜色,其值为当前调色板中的索引
本示例将当前窗口中的网格线颜色设为蓝色。
ActiveWindow.GridlineColorIndex = 5

  1. GridlineColorIndex

返回或设置网格线颜色,其值为当前调色板中的索引,或为下列 XlColorIndex 常量。
语法
表达式.GridlineColorIndex
表达式   一个代表 Window 对象的变量。

  1. Group

当Range对象代表数据透视表字段的数据区域中的单个单元格时,Group 方法在该字段中执行基于数字或日期的组合
本示例用 10天期限组合名为“ORDER_DATE”的字段。
Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
Set groupRange = pvtTable.PivotFields("ORDER_DATE").DataRange
groupRange.Cells(1).Group by:=10, _
    periods:=Array(False, False, False, _
        True, False, False, False)

  1. GroupItems

返回一个 GroupShapes 对象,它代表指定形状组中的单个形状。使用 GroupShapes 对象的 Item 方法可从形状组中返回单个形状。应用于代表成组形状的 Shape 对象。只读。
语法
表达式.GroupItems
表达式   一个代表 Shape 对象的变量。

  1. GroupLevel

返回一组字段中指定字段的位置(如果该字段是分组字段集合中的成员)。只读。

  1. Growth

根据现有的数据预测指数增长值。根据现有的 x 值和 y 值,GROWTH 函数返回一组新的 x 值对应的 y 值。可以使用 GROWTH 工作表函数来拟合满足现有 x 值和 y 值的指数曲线。

  1. GuessHelp

如果“Office 助手”气球基于用户在单击“助手”窗口或按“F1”之前所选的关键字来显示一列“帮助”主题,则为 True。可读/写。

  1. Guid

获取指定 COMAddIn 对象的类标识符 (CLSID)。只读。

  1. HarMean

返回一组数据的调和平均值。调和平均值与倒数的算术平均值互为倒数。

  1. Has3DEffect

如果数据系列有三维外观,则为 True。可读/写 Boolean 类型。

  1. Has3DEffect

如果数据点具有三维外观,则为 True。可读/写 Boolean 类型。

  1. Has3DShading

如果图表组具有三维阴影,则该值为 True。本属性仅适合曲面图,如果要将其设置给非曲面图,则将返回运行时错误。Boolean 类型,可读写。

  1. HasArray

如果指定单元格是数组公式的一部分,则该值为 True
如果sheet1上的活动单元格为数组的一部分,则本示例将显示消息框。
Worksheets("Sheet1").Activate
If ActiveCell.HasArray =True Then
    MsgBox "The active cell is part of an array"
End If

  1. HasAxis

返回或设置图表中具有的坐标轴。
本示例显示 Chart1 中的主数值坐标轴。
Charts("Chart1").HasAxis(xlValue, xlPrimary) = True

  1. HasBorderHorizontal

如果图表数据表具有水平单元格边框,则该属性值为 True。Boolean 类型,可读写。

  1. HasBorderOutline

如果图表数据表具有外部边框,则该属性值为 True。Boolean 类型,可读写。

  1. HasBorderVertical

如果图表数据表具有垂直单元格边框,则该属性值为 True。Boolean 类型,可读写。

  1. HasChart

返回形状是否包含图表。MsoTriState 类型,只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.HasChart
表达式   一个代表 Shape 对象的变量。

  1. HasDataLabel

如果数据点具有数据标签,则该属性值为 True。Boolean 类型,可读写。

  1. HasDataLabels

如果数据系列具有数据标签,则该属性值为 True。Boolean 类型,可读写。

  1. HasDataTable

如果图表有数据表,则该值为 True。
本示例使嵌入图表数据表显示时带有外边框,但无内部网格线。
With Worksheets(1).ChartObjects(1).Chart
    .HasDataTable = True
    With .DataTable
        .HasBorderHorizontal = False
        .HasBorderVertical = False
        .HasBorderOutline = True
    End With
End With

  1. HasDisplayUnitLabel

如果由 DisplayUnit 或 DisplayUnitCustom 属性指定的标签显示在指定坐标轴上,则该属性值为 True。默认值为 True。Boolean 类型,可读写。

  1. HasDropLines

如果折线图或者面积图中有垂直线,则该值为 True。仅应用于折线图和面积图。Boolean 类型,可读写。

  1. HasErrorBars

如果序列有错误条时,该值为 True。该属性对三维图表无效。Boolean 类型,可读写。

  1. HasFormula

如果区域中所有单元格均包含公式,则该值为 True
本示例提示用户选定sheet1的区域。如果该选定区域内所有单元格均包含公式,则本示例将显示消息框。
Worksheets("Sheet1").Activate
Set rr = Application.InputBox( _
    prompt:="Select a range on this worksheet", _
    Type:=8)
If rr.HasFormula = True Then
    MsgBox "Every cell in the selection contains a formula"
End If

  1. HasHiLoLines

如果折线图有高低点连线,则为 True。仅应用于折线图。Boolean 类型,可读写。

  1. HasLeaderLines

如果数据系列有引导线,则该属性值为 True。Boolean 类型,可读写。

  1. HasLegend

如果图表有图例,则该值为
本示例显示 Chart1 的图例,然后将图例的字体颜色设为蓝色。
With Charts("Chart1")
    .HasLegend = True
    .Legend.Font.ColorIndex = 5
End With

  1. HasMajorGridlines

如果坐标轴有主要网格线,则该值为 True。只有主要坐标轴组中的坐标轴才能有网格线。Boolean 类型,可读写。

  1. HasMemberProperties

如果存在专门为多维数据集字段显示的成员属性,则返回 True。Boolean 类型,只读。

  1. HasMinorGridlines

如果坐标轴有次要网格线,则该值为 True。只有主要坐标轴组中的坐标轴才能有网格线。Boolean 类型,可读写。

  1. HasPassword

如果指定工作簿有密码保护,则该值为 True
本示例检查当前工作簿是否有密码保护,如果有则显示一条信息。
If ActiveWorkbook.HasPassword = True Then
    MsgBox "Remember to obtain the workbook password" & Chr(13) & _
        " from the Network Administrator."
End If

  1. HasPivotFields

如果数据透视图控件显示在指定数据透视图报表中,则该值为 True。
本示例禁用“1996 Report”工作簿中“Sales”图表上的数据透视图控件。
Workbooks("1996 Report").Charts("Sales") _
    .PivotLayout.HasPivotFields = False

  1. HasRadarAxisLabels

如果雷达图有坐标轴标志,则该值为 True。仅适用于雷达图。Boolean 类型,可读写。

  1. HasRoutingSlip

如果指定工作簿含有传送名单,则该值为 True
本示例为 Book1.xls 创建一个传递名单,然后将该工作簿逐个传送给三个收信人。
Workbooks("BOOK1.XLS").HasRoutingSlip = True
With Workbooks("BOOK1.XLS").RoutingSlip
    .Delivery = xlOneAfterAnother
    .Recipients = Array("Adam Bendel", _
        "Jean Selva", "Bernard Gabor")
    .Subject = "Here is BOOK1.XLS"
    .Message = "Here is the workbook. What do you think?"
End With
Workbooks("BOOK1.XLS").Route

  1. HasSeriesLines

如果堆积柱形图或堆积条形图有系列线,或者复合饼图或复合条饼图在两个部分之间有连接线,则该属性值为 True。仅适用于二维堆积柱形图、堆积条形图、复合饼图或复合条饼图。Boolean 类型,可读写。

  1. HasTitle

如果坐标轴或图表有可见标题,则该值为 True
本示例为 Chart1 的分类坐标轴添加坐标轴标志。
With Charts("Chart1").Axes(xlCategory)
    .HasTitle = True
    .AxisTitle.Text = "July Sales"
End With

  1. HasTitle

如果坐标轴或图表有可见标题,则为 True。Boolean 类型,可读写。

  1. HasUpDownBars

如果折线图中有涨跌柱线,则该值为 True。仅应用于折线图。Boolean 类型,可读写。

  1. HeaderMargin

以磅为单位返回或设置页面顶端到页眉的距离。Double 类型,可读写。

  1. HebrewModes

返回或设置希伯来语拼写检查的模式。XlHebrewModes 类型,可读写。

  1. Height

主应用程序窗口的高度

  1. Height

窗口的高度
本示例设置嵌入图表的高度。
Worksheets("Sheet1").ChartObjects(1).Height = 288

  1. Height

区域的高度
本示例设置嵌入图表的高度。
Worksheets("Sheet1").ChartObjects(1).Height = 288

  1. Height

获取或设置 CommandBar 的高度。可读写。
语法
表达式.Height
表达式   一个代表 CommandBar 对象的变量。
返回值
Integer

  1. Height

返回或设置一个 Single 值,它代表对象的高度(以磅为单位)。
语法
表达式.Height
表达式   一个代表 Shape 对象的变量。

  1. Height

返回或设置一个 Double 值,它代表对象的宽度(以磅为单位)。

  1. Height

返回或设置一个 Single 值,它代表对象的高度(以磅为单位)。

  1. Height

返回一个 Double 值,它代表对象的高度(以磅为单位)。

  1. Height

返回或设置一个 Double 值,它代表窗口的高度(以磅为单位)。
语法
表达式.Height
表达式   一个代表 Window 对象的变量。

  1. HeightPercent

返回或设置三维图表的高度,以图表宽度的百分比表示,有效取值范围为 5% 到 500% 。
本示例将 Chart1 的高度设为其宽度的 80%。本示例应在三维图表上运行。
Charts("Chart1").HeightPercent = 80

  1. Help

显示一个帮助主题。
本示例显示帮助文件 Otisapp.hlp 中的 65527 号主题。
Application.Help "OTISAPP.HLP", 65527

  1. Help

为标准的 Office 联机帮助显示“Office 助手”及内置的带有“请问您要做什么?”的“助手”气球。

  1. Hex

返回代表十六进制数值的 String。
语法
Hex(number)
必要的 number 参数为任何有效的数值表达式或字符串表达式。

  1. Hex2Bin

将十六进制数转换为二进制数。

  1. Hex2Dec

将十六进制数转换为十进制数。

  1. Hex2Oct

将十六进制数转换为八进制数。

  1. Hidden

如果行或列处于隐藏状态,则该值为 True
本示例隐藏 Sheet1 的 C 列。
Worksheets("Sheet1").Columns("C").Hidden = True

  1. Hidden

返回或设置一个 Boolean 值,它指明方案是否已被隐藏。

  1. Hidden

返回或设置一个 Variant 值,它代表多维数据集字段的层次成员选择控件中多维数据集字段成员的隐藏状态。

  1. Hidden

此属性用于隐藏 OLAP 层次结构的各个级别。可读/写 Boolean 类型。

  1. HiddenFields

返回一个对象,该对象表示单个数据透视表字段(PivotField 对象),或表示当前未显示为行、列、页或数据字段的所有字段的集合(PivotFields 对象)。只读。

  1. HiddenItems

返回一个对象,该对象表示单个隐藏数据透视表项(PivotItem 对象),或表示指定字段中所有隐藏项的集合(PivotItems 对象)。只读。

  1. HiddenItemsList

返回或设置一个字符串数组,该数组为数据透视表字段的隐藏项。Variant 类型,可读写。

  1. HighlightChangesOnScreen

如果将指定共享工作簿的更改在屏幕上突出显示,则该值为 True
本示例将指定共享工作簿的更改突出显示。
ThisWorkbook.HighlightChangesOnScreen

  1. HighlightChangesOptions

控制共享工作簿更改的显示方式
本示例在不同工作表中显示共享工作簿的更改。
With ActiveWorkbook
    .HighlightChangesOptions _
        When:=xlSinceMyLastSave, _
        Who:="Everyone"
    .ListChangesOnNewSheet = True
End With

  1. HighPriorityTips

如果“Office 助手”只显示高优先级的提示,则为 True。可读/写。

  1. HiLoLines

返回 HiLoLines 对象,该对象表示折线图上一个数据系列高低点连线。仅应用于折线图。只读。

  1. Hinstance

返回正调用 Microsoft Excel 的实例的实例句柄
在本示例中,Microsoft Excel 将正调用 Excel 的实例的实例句柄通知给用户。
Sub CheckHinstance()
    MsgBox Application.Hinstance
End Sub

  1. HLookup

在表格或数值数组的首行查找某个值,然后返回表格或数组当前列中指定行中的值。当比较值位于数据表的首行,并且要向下查找指定的行数时,请使用 HLOOKUP。当比较值位于要查找的数据左边的一列中时,请使用 VLOOKUP。

  1. HorizontalAlignment

返回或设置指定对象的水平对齐方式
本示例设置 Sheet1 中单元格区域 A1:A5 的对齐方式为左对齐。
Worksheets("Sheet1").Range("A1:A5").HorizontalAlignment = xlLeft

  1. HorizontalAlignment

返回或设置一个 Variant 值,它代表指定对象的水平对齐方式。
语法

表达式.HorizontalAlignment

表达式   一个代表 CellFormat 对象的变量。

  1. HorizontalAlignment

返回或设置一个 XlHAlign 值,它代表指定对象的水平对齐方式。
语法
表达式.HorizontalAlignment
表达式   一个代表 Style 对象的变量。

  1. HorizontalAlignment

返回或设置一个 XlHAlign 值,它代表指定对象的水平对齐方式。

  1. HorizontalAlignment

返回或设置一个 Variant 值,它代表指定对象的水平对齐方式。

  1. HorizontalFlip

如果指定的形状绕水平对称轴翻转,则为 True。MsoTriState,只读。
语法
表达式.HorizontalFlip
表达式   一个代表 Shape 对象的变量。

  1. Hour

返回一个 Variant (Integer),其值为 0 到 23 之间的整数,表示一天之中的某一钟点。
语法
Hour(time)
必要的 time 参数,可以是任何能够表示时刻的 Variant、数值表达式、字符串表达式或它们的组合。如果 time 包含 Null,则返回 Null。

  1. HPageBreaks

返回 HPageBreaks 集合,该集合代表工作表上的水平分页符
本示例显示全屏幕水平分页符和打印区水平分页符的个数。
For Each pb in Worksheets(1).HPageBreaks
    If pb.Extent = xlPageBreakFull Then
        cFull = cFull + 1
    Else
        cPartial = cPartial + 1
    End If
Next
MsgBox cFull & " full-screen page breaks, " & cPartial & _
    " print-area page breaks"

  1. HPageBreaks

返回一个 HPageBreaks 集合,它代表工作表上的水平分页符。只读。

  1. HPageBreaks

返回一个 HPageBreaks 集合,它代表图表上的水平分页符。只读。
语法
表达式.HPageBreaks
表达式   一个代表 Charts 对象的变量。

  1. HTMLProject

返回指定工作簿中的 HTMLProject 对象,该对象代表顶层项目分支,如“Microsoft 脚本编辑器”的“项目资源管理器”。
本示例刷新活动工作簿中的 HTML 项目。
ActiveWorkbook.HTMLProject.RefreshProject

  1. HtmlType

返回或设置在将指定项保存到网页中时,由 Microsoft Excel 所生成的 HTML 的类型。可以为下表中列出的 XlHtmlType 常量之一,用于指定该项在网页中是静态还是可交互的。默认值为 xlHtmlStatic。

  1. Hwnd

返回一个 Microsoft Excel 窗口的最高级别的窗口句柄
在本示例中,Microsoft Excel 向用户通知 Excel 窗口的最高级别的窗口句柄。
Sub CheckHwnd()
    MsgBox "The top-level window handle is: " & _
        Application.Hwnd
End Sub

  1. Hyperlink

代表一个超链接。
说明
Hyperlink 对象是 Hyperlinks 集合的成员。

  1. Hyperlink

返回一个 Hyperlink 对象,该对象表示该形状的超链接。
语法
表达式.Hyperlink
表达式   一个代表 Shape 对象的变量。

  1. Hyperlinks

返回一个 Hyperlinks 集合,该集合代表指定区域或工作表的超链接。
本示例检查第一张工作表上的链接是否含有“Microsoft”。
For Each h in Worksheets(1).Hyperlinks
    If Instr(h.Name, "Microsoft") <> 0 Then h.Follow
Next

  1. Hyperlinks

返回一个 Hyperlinks 集合,该集合代表指定区域或工作表的超链接
本示例检查第一张工作表上的链接是否含有“Microsoft”。
For Each h in Worksheets(1).Hyperlinks
    If Instr(h.Name, "Microsoft") <> 0 Then h.Follow
Next

  1. Hyperlinks

代表工作表或区域的超链接的集合

  1. HypGeomDist

返回超几何分布。在给定样本容量、样本总体成功次数和样本总体容量时,HYPGEOMDIST 返回样本取得给定成功次数的概率。使用 HYPGEOMDIST 可解决有限总体的问题,其中每个观察值或为成功或为失败,且其中给定样本容量的每一个子集有相等的发生概率。

  1. Excel VBA属性、方法、事件大全——Part7(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. ID

返回或设置当以网页保存页面时指定单元格的识别标志
本示例将活动工作表上 A1 单元格的 ID 属性设置为“target”。
ActiveSheet.Range("A1").ID = "target"
然后,将文档保存为网页,并将下面的 HTML 行添加到网页中。
<A HREF="#target">Quarterly earnings</A>

  1. ID

返回一个 Long 值,它代表指定对象的类型。
语法
表达式.ID
表达式   一个代表 Shape 对象的变量。

  1. If...Then...Else

根据表达式的值有条件地执行一组语句。
语法
If condition Then [statements][Else elsestatements]
或者,可以使用块形式的语法:
If condition Then
[statements]

[ElseIf condition-n Then
[elseifstatements] ...

[Else
[elsestatements]]
End If
condition 必要参数。一个或多个具有下面两种类型的表达式:
  数值表达式或字符串表达式,其运算结果为 True 或 False。如果 condition 为 Null,则 condition 会视为 False。
TypeOf objectname Is objecttype 形式的表达式。其中的 objectname 是任何对象的引用,而 objecttype 则是任何有效的对象类型。如果 objectname 是 objecttype 所指定的一种对象类型,则表达式为 True,否则为False。
statements 在块形式中是可选参数;但是在单行形式中,且没有 Else 子句时,则为必要参数。一条或多条以冒号分开的语句,它们在 condition 为 True 时执行。
condition-n 可选参数。与 condition 同。
elseifstatements 可选参数。一条或多条语句,它们在相关的 condition-n 为 True 时执行。
elsestatements 可选参数。一条或多条语句,它们在前面的 condition 或 condition-n 都不为 True 时执行。

  1. IfError

如果某个公式的计算结果为错误,则返回指定的一个值;否则返回该公式的结果。可以使用 IFERROR 函数捕获和处理公式中的错误。

  1. Ignore

允许用户设置或返回某一区域的错误检查选项的状态。如果该值为 False,则某一区域的错误检查选项可用。如果该值为 True,则禁用某一区域的错误检查选项。Boolean 类型,可读写。

  1. IgnoreBlank

如果指定区域内的数据有效性检验允许空值,则该值为 True。Boolean 类型,可读写。

  1. IgnoreCaps

如果该属性值为 False,则指示 Microsoft Excel 检查大写单词。如果该值为 True,则指示 Excel 在使用拼写检查时忽略大写单词。可读/写 Boolean 类型。

  1. IgnoreFileNames

如果该值为 False,则指示 Microsoft Excel 检查 Internet 和文件的地址。如果该值为 True,则指示 Excel 在使用拼写检查时忽略 Internet 和文件地址。Boolean 类型,可读写。

  1. IgnoreMixedDigits

如果该属性值为 False,则指示 Microsoft Excel 检查混合数字。如果该值为 True,则指示 Excel 在检查拼写时忽略混合数字。Boolean 类型,可读写。

  1. IgnoreRemoteRequests

如果远程 DDE 请求被忽略,则该值为 True
本示例设置 IgnoreRemoteRequests 属性为 True,从而忽略远程 DDE 请求。
Application.IgnoreRemoteRequests = True

  1. Iif

根据表达式的值,来返回两部分中的其中一个。
语法
IIf(expr, truepart, falsepart)
expr 必要参数。用来判断真伪的表达式。
truepart 必要参数。如果 expr 为 True,则返回这部分的值或表达式。
falsepart 必要参数。如果 expr 为 False,则返回这部分的值或表达式。

  1. ImAbs

返回以 x + yi 或 x + yj 文本格式表示的复数的绝对值(模)。

  1. Imaginary

返回以 x + yi 或 x + yj 文本格式表示的复数的虚系数。

  1. ImArgument

返回代表以弧度表示的角的参数 (theta),以便利用以下公式进行计算:

  1. ImConjugate

返回以 x + yi 或 x + yj 文本格式表示的复数的共轭复数。

  1. ImCos

返回以 x + yi 或 x + yj 文本格式表示的复数的余弦值。

  1. ImDiv

返回以 x + yi 或 x + yj 文本格式表示的两个复数的商。

  1. IMEMode

返回或设置日文输入规则的说明。可以是下表列出的 XlIMEMode 常量之一。Long 类型,可读写。

  1. IMEStatus

返回一个 Integer,用来指定当前 Microsoft Windows 的输入法 (IME) 方式;只对东亚区版本有效。
语法
IMEStatus

  1. ImExp

返回以 x + yi 或 x + yj 文本格式表示的复数的指数。

  1. ImLn

返回以 x + yi 或 x + yj 文本格式表示的复数的自然对数。

  1. ImLog10

返回以 x + yi 或 x + yj 文本格式表示的复数的常用对数(以 10 为底数)。

  1. ImLog2

返回以 x + yi 或 x + yj 文本格式表示的复数的以 2 为底数的对数。

  1. Implements

指定要在包含该语句的类模块中实现的接口或类。
语法
Implements [InterfaceName | Class]
所需的 InterfaceName 或 Class 是类型库中的接口或类的名称,该类型库中的方法将用与 Visual Basic 类中相一致的方法来实现。

  1. Import

将数据从指定的 XML 数据文件导入到已经映射至指定的 XmlMap 对象的单元格中。

  1. ImportXml

将 XML 数据从 String 变量导入到已被映射到指定 XmlMap 对象的单元格。

  1. ImPower

返回以 x + yi 或 x + yj 文本格式表示的复数的乘幂。

  1. ImProduct

返回以 x + yi 或 x + yj 文本格式表示的 2 到 29 个复数的乘积。

  1. ImReal

返回以 x + yi 或 x + yj 文本格式表示的复数的实系数。

  1. ImSin

返回以 x + yi 或 x + yj 文本格式表示的复数的正弦值。

  1. ImSqrt

返回以 x + yi 或 x + yj 文本格式表示的复数的平方根。

  1. ImSub

返回以 x + yi 或 x + yj 文本格式表示的两个复数的差。

  1. ImSum

返回以 x + yi 或 x + yj 文本格式表示的两个或更多个复数的和。

  1. InactiveListBorderVisible

一个 Boolean 值,指定当列表不处于活动状态时,此列表的边框是否可见
下例隐藏了工作簿中所有非活动列表的边框。
Sub HideListBorders()
    ActiveWorkbook.InactiveListBorderVisible = False
End Sub

  1. InCellDropdown

如果数据有效性显示含有有效取值的下拉列表,则该属性值为 True。Boolean 类型,可读写。

  1. InchesToPoints

将度量单位从英寸转换为磅。
本示例将 Sheet1 中的左边距设为 2.5 英寸。
Worksheets("Sheet1").PageSetup.LeftMargin = _
Application.InchesToPoints(2.5)

  1. IncludeAlignment

如果样式包含 AddIndent、HorizontalAlignment、VerticalAlignment、WrapText、IndentLevel 和 Orientation 属性,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.IncludeAlignment
表达式   一个代表 Style 对象的变量。

  1. IncludeAlignment

如果样式包含 AddIndent、HorizontalAlignment、VerticalAlignment、WrapText、IndentLevel 和 Orientation 属性,则该属性值为 True。Boolean 类型,可读写。

  1. IncludeBorder

如果指定样式中包含 Color、ColorIndex、LineStyle 和 Weight 边框属性,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.IncludeBorder
表达式   一个代表 Style 对象的变量。

  1. IncludeBorder

如果指定样式中包含 Color、ColorIndex、LineStyle 和 Weight 边框属性,则该属性值为 True。Boolean 类型,可读写。

  1. IncludeFont

如果样式包含 Background、Bold、Color、ColorIndex、FontStyle、Italic、Name、Size、Strikethrough、Subscript、Superscript 和 Underline 字体属性,则此属性为 True。Boolean 类型,可读写。
语法
表达式.IncludeFont
表达式   一个代表 Style 对象的变量。

  1. IncludeFont

如果样式包含 Background、Bold、Color、ColorIndex、FontStyle、Italic、Name、Size、Strikethrough、Subscript、Superscript 和 Underline 字体属性,则此属性为 True。Boolean 类型,可读写。

  1. IncludeInLayout

如果在确定图表布局时图表标题将占用图表布局空间,则为 True。默认值是 True。可读/写 Boolean 类型。

  1. IncludeInLayout

如果在确定图表布局时轴标题将占用图表布局空间,则为 True。默认值是 True。可读/写 Boolean 类型。

  1. IncludeInLayout

如果在确定图表布局时图例将占用图表布局空间,则为 True。默认值是 True。可读/写 Boolean 类型。

  1. IncludeNewItemsInFilter

IncludeNewItemsInFilter 属性用于跟踪 OLAP 数据透视表中包含/排除的项目。可读/写。

  1. IncludeNewItemsInFilter

在将手动筛选应用于透视字段时,此属性允许开发人员指定是应跟踪排除的项目还是应跟踪包含的项目。可读/写 Boolean 类型。

  1. IncludeNumber

如果样式中包含 NumberFormat 属性,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.IncludeNumber
表达式   一个代表 Style 对象的变量。

  1. IncludeNumber

如果样式中包含 NumberFormat 属性,则该属性值为 True。Boolean 类型,可读写。

  1. IncludePatterns

如果指定样式中包含 Color、ColorIndex、InvertIfNegative、Pattern、PatternColor 和 PatternColorIndex 对象的内部属性,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.IncludePatterns
表达式   一个代表 Style 对象的变量。

  1. IncludePatterns

如果指定样式中包含 Color、ColorIndex、InvertIfNegative、Pattern、PatternColor 和 PatternColorIndex 对象的内部属性,则该属性值为 True。Boolean 类型,可读写。

  1. IncludeProtection

如果指定样式中包含 FormulaHidden 和 Locked 保护属性,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.IncludeProtection
表达式   一个代表 Style 对象的变量。

  1. IncludeProtection

如果指定样式中包含 FormulaHidden 和 Locked 保护属性,则该属性值为 True。Boolean 类型,可读写。

  1. InconsistentFormula

如果该值为 True(默认值),则 Microsoft Excel 将识别包含不一致公式的单元格区域。如果该值为 False,则禁用不一致公式的检查。Boolean 类型,可读写。

  1. InconsistentTableFormula

如果表公式不一致,则返回 True。可读/写 Boolean 类型。

  1. IncrementBrightness

按指定数值改变图片亮度。可以使用 Brightness 属性设置图片的绝对亮度。

  1. IncrementContrast

按指定值改变图片的对比度。可以使用 Contrast 属性设置图片的绝对对比度。

  1. IncrementLeft

以指定磅数水平移动指定形状。
语法
表达式.IncrementLeft(Increment)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
Increment 必选 Single 以磅为单位指定形状水平移动的距离。正值使形状向右移动,负值使形状向左移动。

  1. IncrementOffsetX

按指定磅值更改阴影的水平偏移量。可以使用 OffsetX 属性设置阴影的绝对水平偏移量。

  1. IncrementOffsetY

按指定磅值更改阴影的垂直偏移量。可以使用 OffsetY 属性设置阴影的绝对垂直偏移量。

  1. IncrementRotation

使指定的形状按指定度数值绕 Z 轴旋转。使用 Rotation 属性可设置形状的绝对转角。
语法
表达式.IncrementRotation(Increment)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
Increment 必选 Single 指定形状的水平旋转量,以度为单位。正值为顺时针旋转形状,负值逆时针旋转形状。

  1. IncrementTop

以指定磅数垂直移动指定形状。
语法
表达式.IncrementTop(Increment)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
Increment 必选 Single 指定形状对象垂直移动的距离,以磅为单位。正值将形状下移,负值将形状上移。

  1. IndentLevel

返回或设置单元格或单元格区域的缩进量
本示例将单元格 A10 的缩进量增加至 15。
With Range("A10")
    .IndentLevel = 15
End With

  1. IndentLevel

返回或设置一个 Variant 值,它代表单元格或单元格区域的缩进量。可为 0 到 15 之间的整数。
语法

表达式.IndentLevel

表达式   一个代表 CellFormat 对象的变量。

  1. IndentLevel

返回或设置一个 Long 值,它代表样式的缩进量。
语法
表达式.IndentLevel
表达式   一个代表 Style 对象的变量。

  1. IndentLevel

返回或设置一个 Long 值,它代表样式的缩进量。

  1. Index

返回对象在其同类对象所组成的集合内的编号。
本示例显示由您所键入的名称指定的工作表的选项卡编号。例如,如果 Sheet4 为活动工作簿中第三个工作表选项卡,本示例就在消息框中显示“3”。
Sub DisplayTabNumber()
    Dim strSheetName as String
    strSheetName = InputBox("Type a sheet name, such as Sheet4.")
    MsgBox "This sheet is tab number " & Sheets(strSheetName).Index
End Sub

  1. Index

返回对象在其同类对象所组成的集合内的编号
本示例显示由您所键入的名称指定的工作表的选项卡编号。例如,如果 Sheet4 为活动工作簿中第三个工作表选项卡,本示例就在消息框中显示“3”。
Sub DisplayTabNumber()
    Dim strSheetName as String

    strSheetName = InputBox("Type a sheet name, such as Sheet4.")

    MsgBox "This sheet is tab number " & Sheets(strSheetName).Index
End Sub

  1. Index

获取一个 Long 类型的值,该值代表集合中 CommandBar 对象的索引号。只读。
语法
表达式.Index
表达式   一个代表 CommandBar 对象的变量。
返回值
Long

  1. Index

它代表对象在其同类对象所组成的集合内的索引号。返回 Long 值
语法
表达式.Index
表达式   一个代表 Name 对象的变量

  1. Index

返回表/区域中的值或对值的引用。INDEX 函数有两种形式:数组形式和引用形式。

  1. Index

返回 Long 值,它代表对象在其同类对象所组成的集合内的索引号。

  1. Index

返回或设置一个 Long 值,它代表 PivotFormula 对象在 PivotFormulas 集合中的索引号。

  1. Index

返回 Long 值,它代表对象在其同类对象所组成的集合内的索引号。
语法
表达式.Index
表达式   一个代表 Window 对象的变量。

  1. IndicatorColorIndex

返回或设置错误检查选项的指示器的颜色。XlColorIndex 类型,可读写。

  1. InGridDropZones

此属性用于为 PivotTable 对象切换网格中的拖放区域。在一些情况下,它还会影响数据透视表的布局。可读/写 Boolean 类型。

  1. InnerDetail

当最内部行或列字段的 ShowDetail 属性设为 True 时,返回或设置这些详细数据的字段名称。String 类型,可读写。

  1. Input

返回 String,它包含以 Input 或 Binary 方式打开的文件中的字符。
语法
Input(number, [#]filenumber)
number 必要。任何有效的数值表达式,指定要返回的字符个数。
filenumber 必要。任何有效的文件号。

  1. Input #

从已打开的顺序文件中读出数据并将数据指定给变量。
语法
Input #filenumber, varlist
filenumber 必要。任何有效的文件号。
varlist 必要。用逗号分界的变量列表,将文件中读出的值分配给这些变量;这些变量不可能是一个数组或对象变量。但是,可以使用变量描述数组元素或用户定义类型的元素。

  1. InputBox

显示一个接收用户输入的对话框
本示例提示用户输入数字。
myNum = Application.InputBox("Enter a number")

  1. InputBox

在一对话框来中显示提示,等待用户输入正文或按下按钮,并返回包含文本框内容的 String。
语法
InputBox(prompt[, title] [, default] [, xpos] [, ypos] [, helpfile, context])
Prompt 必需的。作为对话框消息出现的字符串表达式。prompt 的最大长度大约是 1024 个字符,由所用字符的宽度决定。如果 prompt 包含多个行,则可在各行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或回车换行符的组合 (Chr(13) & Chr(10)) 来分隔。
Title 可选的。显示对话框标题栏中的字符串表达式。如果省略 title,则把应用程序名放入标题栏中。
Default 可选的。显示文本框中的字符串表达式,在没有其它输入时作为缺省值。如果省略 default,则文本框为空。
Xpos 可选的。数值表达式,成对出现,指定对话框的左边与屏幕左边的水平距离。如果省略 xpos,则对话框会在水平方向居中。
Ypos 可选的。数值表达式,成对出现,指定对话框的上边与屏幕上边的距离。如果省略 ypos,则对话框被放置在屏幕垂直方向距下边大约三分之一的位置。
Helpfile 可选的。字符串表达式,识别帮助文件,用该文件为对话框提供上下文相关的帮助。如果已提供 helpfile,则也必须提供 context。
Context 可选的。数值表达式,由帮助文件的作者指定给某个帮助主题的帮助上下文编号。如果已提供 context,则也必须要提供 helpfile。

  1. InputMessage

返回或设置数据有效性检验输入信息。String 类型,可读写。

  1. InputTitle

返回或设置数据有效性输入对话框的标题。String 类型,可读写。

  1. Insert

在工作表或宏表中插入一个单元格或单元格区域,其他单元格作相应移位以腾出空间
本示例选择活动文档的第三个图形,检查该图形是否是一个Freeform对象,如果是,则插入一个节点。本示例假定在活动工作表中存在三种图形
Sub InsertShapeNode()
    ActiveSheet.Shapes(3).Select
    With Selection.ShapeRange
        If .Type = msoFreeform Then
            .Nodes.Insert _
                Index:=3, SegmentType:=msoSegmentCurve, _
                EditingType:=msoEditingSymmetric, X1:=35, Y1:=100
            .Fill.ForeColor.RGB = RGB(0, 0, 200)
            .Fill.Visible = msoTrue
        Else
            MsgBox "This shape is not a Freeform object."
        End If
    End With
End Sub

  1. Insert

在选定字符前面插入字符串
本示例选择活动文档的第三个图形,检查该图形是否是一个 Freeform 对象,如果是,则插入一个节点。本示例假定在活动工作表中存在三种图形。
Sub InsertShapeNode()
    ActiveSheet.Shapes(3).Select
    With Selection.ShapeRange
        If .Type = msoFreeform Then
            .Nodes.Insert _
                Index:=3, SegmentType:=msoSegmentCurve, _
                EditingType:=msoEditingSymmetric, X1:=35, Y1:=100
            .Fill.ForeColor.RGB = RGB(0, 0, 200)
            .Fill.Visible = msoTrue
        Else
            MsgBox "This shape is not a Freeform object."
        End If
    End With
End Sub

  1. InsertIndent

向指定的区域添加缩进量
本示例减少单元格 A10 的缩进量。
With Range("a10")
    .InsertIndent -1
End With

  1. InsideHeight

以磅为单位返回绘图区内部高度。Double 类型,只读。

  1. InsideLeft

以磅为单位返回从图表边界至绘图区内部左边界的距离。Double 类型,只读。

  1. InsideTop

以磅为单位返回从图表边界至绘图区内部上边界的距离。Double 类型,只读。

  1. InsideWidth

以磅为单位返回绘图区内部宽度。Double 类型,只读。

  1. Installed

如果安装了此加载宏,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.Installed
表达式   一个代表 AddIn 对象的变量。

  1. InstallManifest

将指定的 XML 扩展包安装在用户的计算机上,使一个或多个用户可以使用 XML 智能文档解决方案。

  1. InStr

返回 Variant (Long),指定一字符串在另一字符串中最先出现的位置。
语法
InStr([start, ]string1, string2[, compare])
start 可选参数。为数值表达式,设置每次搜索的起点。如果省略,将从第一个字符的位置开始。如果 start 包含 Null,将发生错误。如果指定了 compare 参数,则一定要有 start 参数。
string1 必要参数。接受搜索的字符串表达式。
string2 必要参数。被搜索的字符串表达式。
Compare 可选参数。指定字符串比较。如果 compare 是 Null,将发生错误。如果省略 compare,Option Compare 的设置将决定比较的类型。指定一个有效的LCID (LocaleID) 以在比较中使用与区域有关的规则。

  1. InStrRev

返回一个字符串在另一个字符串中出现的位置,从字符串的末尾算起。
语法
InstrRev(stringcheck, stringmatch[, start[, compare]])
stringcheck 必需的。要执行搜索的字符串表达式。
stringmatch 必需的。要搜索的字符串表达式。
start 可选的。数值表达式,设置每次搜索的开始位置。如果忽略,则使用–1,它表示从上一个字符位置开始搜索。如果start包含
Null,则产生一个错误。
compare 可选的。数字值,指出在判断子字符串时所使用的比较方法。如果忽略,则执行二进制比较。关于其值,请参阅“设置值”部分。

  1. Interactive

如果 Microsoft Excel 处于交互模式,则该值为 True;此属性值通常为 True
本示例演示当在 Windows 中使用 DDE 时将 Interactive 属性设置为 False,并在运行结束时将此属性设回 True。这样以防用户干预宏的运行。
Application.Interactive = False
Application.DisplayAlerts = False
channelNumber = Application.DDEInitiate( _
    app:="WinWord", _
    topic:="C:\WINWORD\FORMLETR.DOC")
Application.DDEExecute channelNumber, "[FILEPRINT]"
Application.DDETerminate channelNumber
Application.DisplayAlerts = True
Application.Interactive = True

  1. Intercept

利用现有的 x 值与 y 值计算直线与 y 轴的截距。截距为穿过已知的 known x 和 known y 数据点的线性回归线与 y 轴的交点。当自变量为 0(零)时,使用 INTERCEPT 函数可以决定因变量的值。例如,当所有的数据点都是在室温或更高的温度下取得的,可以用 INTERCEPT 函数预测在 0°C 时金属的电阻。

  1. Intercept

返回或设置趋势线与数值轴的交叉点。可读/写 Double 类型。

  1. InterceptIsAuto

如果趋势线与数值轴的交叉点由回归分析自动确定,则该属性值为 True。Boolean 类型,可读写。

  1. Interior

返回 Interior 对象,该对象代表指定对象的内部
本示例将 Sheet1 中 A1 单元格的内部颜色设为蓝绿色。
Sub SetColor()
Worksheets("Sheet1").Range("A1").Interior.ColorIndex = 8  ' Cyan
End Sub

  1. Interior

代表对象的内部

  1. Interior

返回一个 Interior 对象,它代表指定对象的内部。
语法
表达式.Interior
表达式   一个代表 Style 对象的变量。

  1. Interior

返回一个 Interior 对象,该对象允许用户根据单元格内部格式设置或返回搜索条件。
语法

表达式.Interior

表达式   一个代表 CellFormat 对象的变量。

  1. Interior

返回一个 Interior 对象,它代表指定对象的内部。
语法
表达式.Interior
表达式   一个代表 Style 对象的变量。

  1. Interior

返回一个 Interior 对象,它代表指定对象的内部。

  1. International

返回当前国家/地区和区域设置的信息
本示例显示区域设置中的十进制分隔符。
MsgBox "The decimal separator is " & _
Application.International(xlDecimalSeparator)

  1. Intersect

返回一个 Range 对象,此对象代表两个或多个范围重叠的矩形区域。
本示例在 Sheet1 中选定两个命名区域 rg1 和 rg2 的重叠区域。如果所选区域不重叠,本示例将显示一条相应的信息。
Worksheets("Sheet1").Activate
Set isect = Application.Intersect(Range("rg1"), Range("rg2"))
If isect Is Nothing Then
    MsgBox "Ranges do not intersect"
Else
    isect.Select
End If

  1. IntRate

返回完全投资型债券的利率。

  1. InvertIfNegative

如果指定项与一个负数相对应时 Microsoft Excel 就将其反色,则该值为 True
本示例反转 Chart1 中第一个数据系列的负值的图案。本示例须在二维柱形图上运行。
Charts("Chart1").SeriesCollection(1).InvertIfNegative = True

  1. InvertIfNegative

如果指定项与一个负数相对应时 Microsoft Excel 就将其反色,则为 True。Boolean 类型,可读写。

  1. Ipmt

返回一个 Double,指定在一段时间内对定期定额支付且利率固定的年金所支付的利息值。
语法
IPmt(rate, per, nper, pv[, fv[, type]])
rate 必要。Double 指定每一期的利率。例如,如果有一笔贷款年百分率 (APR) 为百分之十且按月付款的汽车贷款,则每一期的利率为 0.1/12,或 0.0083。
per 必要。Double 指定在 nper 间范围 1 中的付款周期。
nper 必要。Double 指定一笔年金的付款总期数。例如,如果在一笔为期四年的汽车贷款中选择按月付款方式,则贷款共有 4 * 12(或 48)个付款期。
pv 必要。Double,指定未来一系列付款或收款的现值。例如,当借钱买汽车时,向贷方所借金额为将来每月偿付给贷方款项的现值。
fv 可选。Variant 指定在付清贷款后所希望的未来值或现金结存。例如,贷款的未来值在贷款付清后为 0 美元。但是,如果想要在 18 年间存下 50,000 美元作为子女教育基金,那么 50,000 美元为未来值。如果省略的话,缺省值为 0。
type 可选。Variant 指定贷款到期时间。如果贷款在贷款周期结束时到期,请使用 0。如果贷款在周期开始时到期,请使用 1。如果省略的话,缺省值为 0。

  1. Ipmt

基于固定利率和等额分期付款方式,返回给定期数内对某项投资支付的利息。

  1. IRR

返回一个 Double,指定一系列周期性现金流(支出或收入)的内部利率。
语法
IRR(values()[, guess])
values() 必要。Double 数组,指定现金流值。此数组必须至少含有一个负值(支付)和一个正值(收入)。
Guess 可选。Variant,指定 IRR 返回的估算值。如果省略,guess 为 0.1 (10%)。

  1. Irr

返回由数值代表的一组现金流的内部收益率。这些现金流不必为均衡的,但作为年金,它们必须按固定的间隔产生,如按月或按年。内部收益率为投资的回收利率,其中包含定期支付(负值)和定期收入(正值)。

  1. IsAddin

如果指定工作簿作为加载宏运行,则该值为 True
本示例检查指定工作簿是否为加载宏,如果是则运行选定的代码。
If ThisWorkbook.IsAddin Then
    ' this code runs when the workbook is an add-in
End If

  1. IsArray

返回 Boolean 值,指出变量是否为一个数组。
语法
IsArray(varname)
必要的 varname 参数是一个指定变量的标识符。

  1. IsCalculated

如果数据透视表字段为计算字段或计算项,则此属性为 True。Boolean 类型,只读。

  1. IsCalculated

如果数据透视表字段或数据透视表项为计算字段或计算项,则此属性为 True。Boolean 类型,只读。

  1. IsConnected

如果 MaintainConnection 属性为 True,并且数据透视表缓存当前与其源相连,则返回 True。如果数据透视表缓存当前未与其源相连,则返回 False。只读 Boolean 类型。

  1. IsDate

返回 Boolean 值,指出一个表达式是否可以转换成日期。
语法
IsDate(expression)
必要的 expression 参数是一个 Variant,包含日期表达式或字符串表达式,这里的字符串表达式是可以作为日期或时间来认定的。

  1. IsDate

如果 CubeField 为日期,则返回 True,只读 Boolean 类型。

  1. IsEmpty

返回 Boolean 值,指出变量是否已经初始化。
语法
IsEmpty(expression)
必要的 expression 参数是一个 Variant,包含一个数值或字符串表达式。但是,因为 IsEmpty 被用来确定个别变量是否已初始化,所以 expression 参数通常是单一变量名。

  1. IsErr

检查值类型,并根据值是否引用 #N/A 之外的任何错误值而返回 TRUE 或 FALSE。

  1. IsError

返回 Boolean 值,指出表达式是否为一个错误值。
语法
IsError(expression)
必需的 expression 参数,可以是任何有效表达式。

  1. IsError

检查值类型,并根据值是否引用任何错误值(#N/A、#VALUE!、#REF!、#DIV/0!、#NUM!、#NAME? 或 #NULL!)而返回 TRUE 或 FALSE。

  1. IsEven

检查值类型,并根据值是否为偶数而返回 TRUE 或 FALSE。

  1. IsExportable

如果 Microsoft Excel 可以使用指定架构映射中的 XPath 对象导出 XML 数据,并且可以导出映射到指定架构映射的所有 XML 列表,则返回 True。

  1. IsInPlace

如果指定工作簿正在适当位置上进行编辑,则该值为 True。
本示例表示工作簿是在适当位置上打开并正在编辑还是仅在 Microsoft Excel 中打开。
Private Sub Workbook_Open()
    If ThisWorkbook.IsInPlace = True Then
        MsgBox "Editing in place"
    Else
        MsgBox "Editing in Microsoft Excel"
    End If
End Sub

  1. IsLogical

检查值类型,并根据值是否引用逻辑值而返回 TRUE 或 FALSE。

  1. IsMemberProperty

如果数据透视表字段包含成员属性,则返回 True。Boolean 类型,只读。

  1. IsMissing

返回 Boolean 值,指出一个可选的 Variant 参数是否已经传递给过程。
语法
IsMissing(argname)
必要的 argname 参数包含一个可选的 Variant 过程参数名。

  1. IsNA

检查值类型,并根据值是否引用错误值 #N/A(值不可用)而返回 TRUE 或 FALSE。

  1. IsNonText

检查值类型,并根据值是否引用任何非文本项而返回 TRUE 或 FALSE。(请注意,如果值引用了空白单元格,则此函数将返回 TRUE。)

  1. IsNull

返回 Boolean 值,指出表达式是否不包含任何有效数据 (Null)。
语法
IsNull(expression)
必要的 expression 参数是一个 Variant,其中包含数值表达式或字符串表达式。

  1. IsNumber

检查值类型,并根据值是否引用数字而返回 TRUE 或 FALSE。

  1. IsNumeric

返回 Boolean 值,指出表达式的运算结果是否为数。
语法
IsNumeric(expression)
必要的 expression 参数是一个 Variant,包含数值表达式或字符串表达式。

  1. IsObject

返回 Boolean 值,指出标识符是否表示对象变量。
语法
IsObject(identifier)
必要的 identifier 参数是一个变量名。

  1. IsOdd

检查值类型,并根据值是否为奇数而返回 TRUE 或 FALSE。

  1. Ispmt

计算特定投资期内要支付的利息。提供此函数是为了与 Lotus 1-2-3 兼容。

  1. IsText

检查值类型,并根据值是否引用文本而返回 TRUE 或 FALSE。

  1. IsValid

返回一个 Boolean 值,该 Boolean 值用于指明在当前会话过程中,指定的计算成员是否已经与 OLAP 提供程序一起实例化。

  1. IsWorkbookParameter

以工作簿参数的形式返回或设置指定的 Name 对象。可读/写 Boolean 类型。
语法
表达式.IsWorkbookParameter
表达式   一个代表 Name 对象的变量。

  1. Italic

如果字形为倾斜,则该值为 True
本示例将 Sheet1 中 A1:A5 区域的字形设为倾斜。
Worksheets("Sheet1").Range("A1:A5").Font.Italic = True

  1. Item

从集合中返回一个对象。
语法
表达式.Item(Index)
表达式   一个代表 Dialogs 对象的变量。
参数
名称  必选/可选  数据类型  描述
Index  必选  XlBuiltInDialog  Variant,对象的名称或索引号。

  1. Item

返回 Names 集合中的单个 Name 对象
本示例将活动工作簿中的“mySortRange”名称删除。
ActiveWorkbook.Names.Item("mySortRange").Delete

  1. Item

返回一个集合的单个对象。
本示例将活动窗口最大化。
Windows.Item(1).WindowState = xlMaximized

  1. Item

返回一个集合的单个对象。
本示例将变量 wb 设置为 Myaddin.xla 的工作簿。
Set wb = Workbooks.Item("myaddin.xla")

  1. Item

返回一个 Range 对象,该对象代表对指定区域某一偏移量处的区域
本示例基于单元格 A1 的内容填写 Sheet1 的单元格区域 A1:A10。
Worksheets("Sheet1").Range.Item("A1:A10").FillDown

  1. Item

返回一个集合的单个对象。
本示例检查当前选定区域是否为多重选定区域,如果是,则清除其中的第一个子区域的内容。
If Selection.Areas.Count <> 1 Then
    Selection.Areas.Item(1).Clear
End If

  1. Item

返回一个 Border 对象,该对象代表单元格区域或样式的某一边框。
下例设置单元格区域 A1:G1 的底部边界的颜色。
Worksheets("Sheet1").Range("a1:g1"). _
    Borders.Item(xlEdgeBottom).Color = RGB(255, 0, 0)

  1. Item

返回 Error 对象的单个成员。
expression.Item(Index)
expression必需。该表达式返回一个 Errors 对象。
Index Variant 类型,必需。Index也可以是这些常量之一。

  1. Item

返回集合中的单个对象。
本示例对 E1:E10 单元格的现有条件格式的格式属性进行设置
With Worksheets(1).Range("e1:e10").FormatConditions.Item(1)
    With .Borders
        .LineStyle = xlContinuous
        .Weight = xlThin
        .ColorIndex = 6
    End With
End With

  1. Item

返回一个集合的单个对象
下例激活 E5 单元格的第一个超链接。
Worksheets(1).Range("E5").Hyperlinks.Item(1).Follow

  1. Item

返回一个集合的单个对象。
本示例激活工作表 Sheet1。
Sheets.Item("sheet1").Activate

  1. Item

获取与 Assistant 对象关联的文本。只读。

  1. Item

获取指定的 COMAddIns 集合的成员。

  1. Item

获取 CommandBars 集合中的 CommandBar 对象。只读。
语法
表达式.Item(Index)
表达式   必需。一个代表 CommandBars 对象的变量。

  1. Item

从集合中返回一个对象。

  1. Item

从集合中返回一个对象。
语法
表达式.Item(Index)
表达式   一个代表 Shapes 对象的变量。
参数
名称 必选/可选 数据类型 描述
Index 必选 Variant 对象的名称或索引号。
返回值
包含在集合中的一个 Shape 对象。

  1. Item

返回或设置由 Index 参数指定的调整值。Single 型,可读写。

  1. Item

从集合中返回一个对象。
语法
表达式.Item(Index)
表达式   一个代表 Comments 对象的变量。

  1. Item

从集合中返回一个对象。
语法
表达式.Item(Index)
表达式   一个代表 Charts 对象的变量。
参数
名称 必选/可选 数据类型 描述
Index 必选 Variant 对象的名称或索引号。

  1. Item

从 Axes 集合中返回一个 Axis 对象。

  1. Item

获取 DocumentProperties 集合中的一个 DocumentProperty 对象。只读。

  1. Iteration

如果 Microsoft Excel 使用迭代来处理循环引用,则该值为 True
本示例将 Iteration 属性设置为 True,以使用迭代来处理循环引用。
Application.Iteration = True

  1. Join

返回一个字符串,该字符串是通过连接某个数组中的多个子字符串而创建的。
语法
Join(sourcearray[, delimiter])
sourcearray 必需的。包含被连接子字符串的一维数组。
delimiter 可选的。在返回字符串中用于分隔子字符串的字符。如果忽略该项,则使用空格(" ")来分隔子字符串。如果delimiter是零长度字符串(""),则列表中的所有项目都连接在一起,中间没有分隔符。

  1. Justify

调整区域内的文字,使之均衡地填充该区域
本示例调整 Sheet1 上单元格 A1 中的文字。
Worksheets("Sheet1").Range("A1").Justify

  1. Excel VBA属性、方法、事件大全——Part8(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. KeepChangeHistory

如果共享工作簿修订记录功能处于打开状态,则该值为 True
本示例用于设置追踪天数:当修订记录功能处于打开状态时,为活动工作簿的修订记录功能设置跟踪天数。
With ActiveWorkbook
    If .KeepChangeHistory Then
        .ChangeHistoryDuration = 7
    End If
End With

  1. KernedPairs

如果指定艺术字中的字符对是自动缩紧的,则该属性值为 True。MsoTriState 类型,可读写。

  1. KeyboardShortcutTips

如果“Office 助手”显示有关键盘快捷方式的帮助信息,则为 True。可读/写。

  1. Kill

从磁盘中删除文件。
语法
Kill pathname
必要的 pathname 参数是用来指定一个文件名的字符串表达式。pathname 可以包含目录或文件夹、以及驱动器。

  1. KoreanCombineAux

如果该属性值为 True,则 Microsoft Excel 在进行拼写检查时将合并朝鲜语助动词和形容词。Boolean 类型,可读写。

  1. KoreanProcessCompound

如果该属性值为 True,则 Microsoft Excel 在使用拼写检查时将处理朝鲜语复合名词。Boolean 类型,可读写。

  1. KoreanUseAutoChangeList

如果该属性值为 True,则 Microsoft Excel 将在使用拼写检查时使用朝鲜语自动更改列表。Boolean 类型,可读写。

  1. Kurt

返回一组数据的峰值。峰值反映与正态分布相比某一分布的尖锐度或平坦度。正峰值表示相对尖锐的分布。负峰值表示相对平坦的分布。

  1. LabelRange

返回一个 Range 对象,它代表包含字段标签的单元格。只读。

  1. LabelRange

返回一个 Range 对象,它表示数据透视表中所有包含数据项的单元格。只读。

  1. LanguageID

获取一个 MsoAppLanguageID 常量,代表安装语言、用户界面语言或帮助语言的区域设置标识符 (LCID)。只读。

  1. LanguagePreferredForEditing

如果 MsoLanguageID 常量的值已在 Windows 注册表中被标识为首选编辑语言,则获取 True。只读。

  1. LanguageSettings

返回 LanguageSettings 对象,该对象包含 Microsoft Excel 中有关语言设置的信息
本示例返回在安装 Microsoft Excel 时所选语言的语言标识符。
Set objLangSet = Application.LanguageSettings
MsgBox objLangSet.LanguageID(msoLanguageIDInstall)

  1. Large

返回数据集中第 k 个最大值。使用此函数可以根据相对标准来选择数值。例如,可以使用函数 LARGE 得到第一名、第二名或第三名的得分。

  1. LargeButtons

如果显示的工具栏按钮比常规尺寸要大,则为 True。可读写。
语法
表达式.LargeButtons
表达式   一个代表 CommandBars 对象的变量。

  1. LargeChange

滚动一页时,返回或设置滚动框增加或减少的量(当用户单击滚动条时)。Long 类型,可读写。

  1. LargeScroll

按页滚动窗口内容。
本示例将 Sheet1 的活动窗口中的内容向下滚动三页。
Worksheets("Sheet1").Activate
ActiveWindow.LargeScroll down:=3

  1. LargeScroll

按页滚动窗口内容。
语法
表达式.LargeScroll(Down, Up, ToRight, ToLeft)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
Down 可选 Variant 向下滚动内容的页数。
Up 可选 Variant 向上滚动内容的页数。
ToRight 可选 Variant 向右滚动内容的页数。
ToLeft 可选 Variant 向左滚动内容的页数。
返回值
Variant

  1. LargeScroll

按页滚动窗口内容。

  1. LayoutBlankLine

如果在数据透视表的指定行字段后插入了一个空行,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. LayoutCompactRow

指定在选择行时是否压缩透视字段(在一列中显示多个透视字段的项目)。可读/写 Boolean 类型。

  1. LayoutForm

返回或设置指定的数据透视表项出现的方式,即以表格格式还是以分级显示格式显示。XlLayoutFormType 类型,可读写。

  1. LayoutPageBreak

如果每个字段后都插入了分页符,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. LayoutRowDefault

此属性指定初次将透视字段添加到数据透视表中时它们的布局设置。可读/写 xlLayoutRowType 类型。

  1. LayoutSubtotalLocation

返回或设置与指定字段相关(在其上面或下面)的数据透视表字段分类汇总的位置。XlSubtototalLocationType 类型,可读写。

  1. Lbound

返回一个 Long 型数据,其值为指定数组维可用的最小下标。
语法
LBound(arrayname[, dimension])
arrayname 必需的。数组变量的名称,遵循标准的变量命名约定。
dimension 可选的;Variant (Long)。指定返回哪一维的下界。1 表示第一维,2 表示第二维,如此类推。如果省略 dimension,就认为是 1。

  1. Lcase

返回转成小写的 String。
语法
LCase(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 包含 Null,将返回 Null。

  1. Lcm

返回整数的最小公倍数。最小公倍数是所有整数参数 number1、number2 等等的最小正整数倍数。用函数 LCM 可以将分母不同的分数相加。

  1. LeaderLines

返回一个 LeaderLines 对象,该对象表示系列的引导线。只读。

  1. Left

从屏幕左边界至 Microsoft Excel 主窗口左边界的距离

  1. Left

从用户区左边界至窗口左边界的距离
本示例使嵌入图表的左边界与 B 列的左边界对齐。
With Worksheets("Sheet1")
    .ChartObjects(1).Left = .Columns("B").Left
End With

  1. Left

从 A 列左边界至该区域左边界的距离
expression.Left
expression必需。该表达式返回上述对象之一

  1. Left

返回 Variant (String),其中包含字符串中从左边算起指定数量的字符。
语法
Left(string, length)
string 必要参数。字符串表达式其中最左边的那些字符将被返回。如果 string 包含 Null,将返回 Null。
length 必要参数;为 Variant (Long)。数值表达式,指出将返回多少个字符。如果为 0,返回零长度字符串 ("")。如果大于或等于 string 的字符数,则返回整个字符串。

  1. Left

相对于屏幕设置或获取 Office 助手窗口距离对象左边缘的距离(以磅为单位)。可读写。

  1. Left

设置或获取从对象左边缘算起 CommandBar 相对于屏幕的水平距离(以像素为单位)。可读写。
语法
表达式.Left
表达式   必需。一个代表 CommandBar 对象的变量。

  1. Left

返回或设置 Single 值,它代表从对象左边缘到工作表的 A 列左边缘或到图表上的图表区左边缘的距离(以磅为单位)。
语法
表达式.Left
表达式   一个代表 Shape 对象的变量。

  1. Left

返回或设置 Double 值,它代表从对象左边缘到工作表的 A 列左边缘或图表上的图表区左边缘的距离(以磅为单位)。

  1. Left

返回一个 Double 值,它代表从对象左边缘到图表区左边缘的距离(以磅为单位)。

  1. Left

返回一个 Double 值,它代表从客户区左边缘到窗口左边缘的距离(以磅为单位)。
语法
表达式.Left
表达式   一个代表 Window 对象的变量。

  1. LeftFooter

返回或设置工作簿或节的左页脚上的文本对齐方式。

  1. LeftFooterPicture

返回一个 Graphic 对象,该对象表示页脚左边的图片。用于设置图片的属性。

  1. LeftHeader

返回或设置工作簿或节的左页眉上的文本对齐方式。

  1. LeftHeaderPicture

返回一个 Graphic 对象,该对象表示页眉左边的图片。用于设置图片的属性。

  1. LeftMargin

以磅为单位返回或设置左边距的大小。Double 类型,可读写。

  1. Legend

返回一个 Legend 对象,该对象代表指定图表中的图例
本示例显示 Chart1 的图例,然后将图例的字体颜色设为蓝色。
Charts("Chart1").HasLegend = True
Charts("Chart1").Legend.Font.ColorIndex = 5

  1. LegendEntries

返回表示图例中的单个图例项(LegendEntry 对象)或图例项集合(LegendEntries 对象)的对象。

  1. LegendKey

返回一个 LegendKey 对象,该对象表示与图例项相关的图例标示。

  1. Len

返回 Long,其中包含字符串内字符的数目,或是存储一变量所需的字节数。
语法
Len(string | varname)
string 任何有效的字符串表达式。如果 string 包含 Null,会返回 Null。
Varname 任何有效的变量名称。如果 varname 包含 Null,会返回 Null。如果 varname 是 Variant,Len 会视其为 String 并且总是返回其包含的字符数。

  1. Length

返回一个 Long 值,它代表 Start 属性指定的位置的拼音文本的字符个数。

  1. Let

将表达式的值赋给变量或属性。
语法
[Let] varname = expression
Let 可选的。显式使用 Let 关键字也是一种格式,但通常都省略该关键字。
varname 必需的。变量或属性的名称;遵循标准变量命名约定。
expression 必需的。赋给变量或属性的值。

  1. LibraryPath

String类型,只读。返回库文件夹的路径,不带末尾分隔符
本示例打开 Library 文件夹中的 Oscar.xla 文件。
pathSep = Application.PathSeparator
f = Application.LibraryPath & pathSep & "Oscar.Xla"
Workbooks.Open filename:=f

  1. Line

返回一个 LineFormat 对象,它包含指定形状的线条格式属性。对于线条,LineFormat 对象代表线条本身;而对于带有边框的形状,LineFormat 对象代表边框。只读。
语法
表达式.Line
表达式   一个代表 Shape 对象的变量。

  1. Line Input #

从已打开的顺序文件中读出一行并将它分配给 String 变量。
语法
Line Input #filenumber, varname
filenumber 必要。任何有效的文件号。
varname 必要。有效的 Variant 或 String 变量名。

  1. Line3DGroup

返回一个 ChartGroup 对象,该对象代表三维图表上的折线图图表组
本示例设置 Chart1 的三维折线组,使其中的每个数据标志都使用不同的颜色。
Charts("Chart1").Line3DGroup.VaryByCategories = True

  1. LineGroups

返回代表二维图表上单个折线图图表组或折线图图表组集合的对象
本示例设置 Chart1 的折线组一,使其中的每个数据标志使用不同的颜色。本示例应在二维图表上运行。
Charts("Chart1").LineGroups(1).VaryByCategories = True

  1. LinEst

使用最小二乘法对已知数据进行最佳直线拟合,并返回描述此直线的数组。因为此函数返回数值数组,所以必须以数组公式的形式输入。

  1. LineStyle

返回或设置边框的线型
本示例为 Chart1 的图表区和绘图区域设置边框。
With Charts("Chart1")
    .ChartArea.Border.LineStyle = xlDashDot
    With .PlotArea.Border
        .LineStyle = xlDashDotDot
        .Weight = xlThick
    End With
End With

  1. LineStyle

返回或设置边框的线型。XlLineStyle、xlGray25、xlGray50、xlGray75 或 xlAutomatic 类型,可读写。

  1. LinkedCell

返回或设置指向控制值的工作表区域。如果为这些单元格赋值,则指定控制也会取得相应的值。与此类似,如果更改控制的值,则单元格的值也作相应变动。String 型,可读写。

  1. LinkFormat

包含链接 OLE 对象的属性。
说明
如果指定 Shape 对象不代表一个链接对象,则 LinkFormat 属性会失败。

  1. LinkFormat

返回一个 LinkFormat 对象,该对象包含链接的 OLE 对象属性。只读。
语法
表达式.LinkFormat
表达式   一个代表 Shape 对象的变量。

  1. LinkInfo

返回工作簿中某个链接的日期及其更新状态
如果链接是自动更新的,本示例将显示消息框。
If ActiveWorkbook.LinkInfo( _
        "Word.Document|Document1!'!DDE_LINK1", xlUpdateState, _
            xlOLELinks) = 1 Then
    MsgBox "Link updates automatically"
End If

  1. LinkSource

获取或设置所链接的自定义文档属性的来源。可读/写。

  1. LinkSources

返回工作簿中链接的数组
本示例显示活动工作簿中 OLE 和 DDE 链接的列表。本方法应在包含一个或多个链接 Word 对象的工作簿中运行。
aLinks = ActiveWorkbook.LinkSources(xlOLELinks)
If Not IsEmpty(aLinks) Then
    For i = 1 To UBound(aLinks)
        MsgBox "Link " & i & ":" & Chr(13) & aLinks(i)
    Next i
End If

  1. LinkToContent

如果自定义文档属性的值链接到容器文档的内容,则为 True。如果该值是静态的,则为 False。可读/写。

  1. List

以字符串数组的形式,返回或设置指定列表框或组合框中的文字项,也可返回或设置单个文字项。如果指定列表框中没有数据项将出错。

  1. ListChangesOnNewSheet

如果在不同工作表中显示共享工作簿的更改,则该值为 True
本示例在不同工作表中显示共享工作簿的更改。
With ActiveWorkbook
    .HighlightChangesOptions _
        When:=xlSinceMyLastSave, _
        Who:="Everyone"
    .ListChangesOnNewSheet = True
End With

  1. ListCount

返回列表框或者组合框中数据项的数目。如果列表中没有数据项,则返回 0(零)。Long 类型,只读。

  1. ListDataValidation

如果在列表中启用了数据有效性验证,则该属性值为 Boolean 值 True。Boolean 类型,可读写。

  1. ListFillRange

返回或设置用于填充指定列表框的工作表区域。对该属性进行设置将破坏列表框中的所有列表项。String 型,可读写。

  1. ListFormulas

在分离工作表上创建数据透视表的计算项和计算字段的列表。

  1. ListHeaderRows

返回指定区域中标题行的行数
本示例将变量 rTbl 设为活动单元格所在的当前区域,但不包含任何标题行。
Set rTbl = ActiveCell.CurrentRegion
' remove the headers from the range
iHdrRows = rTbl.ListHeaderRows
If iHdrRows > 0 Then
    ' resize the range minus n rows
    Set rTbl = rTbl.Resize(rTbl.Rows.Count - iHdrRows)
    ' and then move the resized range down to
    ' get to the first non-header row
    Set rTbl = rTbl.Offset(iHdrRows)
End If

  1. ListIndex

返回或设置列表框或组合框中当前选定项的索引号。Long 类型,可读写。

  1. ListObject

为 Range 对象或 QueryTable 对象返回一个 ListObject 对象
expression.ListObject
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. ListObject

为 QueryTable 对象返回一个 ListObject 对象。ListObject 对象,只读。

  1. ListObjects

返回工作表中 ListObject 对象的集合。
expression.ListObjects
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. ListSelection

设置或返回一个 Long 值,该值表示智能文档列表框控件中选定项目的索引号。可读写。

  1. Ln

返回数字的自然对数。自然对数以常数项 e (2.71828182845904) 为底。

  1. Load

装载一对象但却不显示。
语法
Load object
object 代表对象表达式,其值为“应用于”列表中的对象。

  1. LoadPictures

在 Microsoft Excel 中打开某个文档时,如果加载图像,则该值为 True,通常这些图像和文档并不是在 Microsoft Excel 中创建的。如果未加载图像,则该值为 False。默认值为 True。Boolean 类型,可读写。

  1. Loc

返回一个 Long,在已打开的文件中指定当前读/写位置。
语法
Loc(filenumber)
必要的 filenumber 参数是任何一个有效的 Integer 文件号。

  1. LocalConnection

返回或设置脱机多维数据集文件的连接字符串。可读写 String 类型。

  1. Location

移动图表的位置。
本示例将嵌入图表移至新图表“Monthly Sales”。
Worksheets(1).ChartObjects(1).Chart _
    .Location xlLocationAsNewSheet, "Monthly Sales"

  1. Location

返回或设置定义分页符位置的单元格(Range 对象)。水平分页符与定位单元格的上边缘对齐;垂直分页符与定位单元格的左边缘对齐。Range 类型,可读写。

  1. LocationInTable

返回一个常量,该常量描述包含指定区域左上角区域的数据透视表的一部分
本示例显示一个消息框,用以描述数据透视表中活动单元格所在的位置。
Worksheets("Sheet1").Activate
Select Case ActiveCell.LocationInTable
Case Is = xlRowHeader
    MsgBox "Active cell is part of a row header"
Case Is = xlColumnHeader
    MsgBox "Active cell is part of a column header"
Case Is = xlPageHeader
    MsgBox "Active cell is part of a page header"
Case Is = xlDataHeader
    MsgBox "Active cell is part of a data header"
Case Is = xlRowItem
    MsgBox "Active cell is part of a row item"
Case Is = xlColumnItem
    MsgBox "Active cell is part of a column item"
Case Is = xlPageItem
    MsgBox "Active cell is part of a page item"
Case Is = xlDataItem
    MsgBox "Active cell is part of a data item"
Case Is = xlTableBody
    MsgBox "Active cell is part of the table body"
End Select

  1. LocationOfComponents

返回或设置中央 URL(对于 Intranet 或 Web)或路径(对于本地或网络而言),授权用户可以在查看保存的文档时,从这些位置下载“Microsoft Office Web 组件”。默认值是 Microsoft Office 的本地或网络安装路径。String 型,可读写。

  1. Lock,Unlock

对于用Open语句打开的全部文件或一部分文件,其它进程所进行的控制访问。
语法
Lock [#]filenumber[, recordrange]
. . .
Unlock [#]filenumber[, recordrange]
filenumber 必要。任何有效的文件号。
recordrange 可选。要锁定或解锁的记录范围。

  1. LockAspectRatio

如果指定的形状在调整大小时其原始比例保持不变,则此属性为 True。如果调整大小时可以分别更改形状的高度和宽度,则此属性为 False。MsoTriState 类型,可读写。
语法
表达式.LockAspectRatio
表达式   一个代表 Shape 对象的变量。

  1. LockAspectRatio

如果指定的形状在调整大小时其原始比例保持不变,则此属性为 True。如果调整大小时可以分别更改形状的高度和宽度,则此属性为 False。MsoTriState 类型,可读写。

  1. Locked

解除对区域单元格的锁定,以便当该工作表受保护时也可对这些单元格进行修改
本示例解除对 Sheet1 中 A1:G37 区域单元格的锁定,以便当该工作表受保护时也可对这些单元格进行修改。
Worksheets("Sheet1").Range("A1:G37").Locked = False
Worksheets("Sheet1").Protect

  1. Locked

返回或设置一个 Variant 值,它指明对象是否已被锁定。
语法

表达式.Locked

表达式   一个代表 CellFormat 对象的变量。

  1. Locked

返回或设置一个 Boolean 值,它指明对象是否已被锁定。
语法
表达式.Locked
表达式   一个代表 Style 对象的变量。

  1. Locked

返回或设置一个 Boolean 值,它指明对象是否已被锁定。
语法
表达式.Locked
表达式   一个代表 Shape 对象的变量。

  1. Locked

返回或设置一个 Boolean 值,它指明对象是否已被锁定。

  1. LockedText

当工作簿受保护时,指定对象中的文字是否被锁定以免发生更改,则该属性值为 True。Boolean 类型,可读写。

  1. LOF

返回一个 Long,表示用 Open 语句打开的文件的大小,该大小以字节为单位。
语法
LOF(filenumber)
必要的 filenumber 参数是一个 Integer,包含一个有效的文件号。

  1. Log

返回一个 Double,指定参数的自然对数值。
语法
Log(number)
必要的 number 参数是 Double 或任何有效的大于 0 的数值表达式。

  1. Log

按所指定的底数,返回一个数的对数。

  1. Log10

返回以 10 为底的对数。

  1. LogBase

在使用对数刻度时返回或设置对数的底。可读/写 Double 类型。

  1. LogEst

在回归分析中,计算最符合数据的指数回归拟合曲线,并返回描述该曲线的数值数组。因为此函数返回数值数组,所以必须以数组公式的形式输入。

  1. LogInv

使用对数分布可分析经过对数变换的数据。

  1. LogNormDist

返回 x 的对数累积分布函数,其中 ln(x) 是服从参数 mean 和 standard_dev 的正态分布。使用此函数可以分析经过对数变换的数据。

  1. Lookup

从单行或单列区域或者从一个数组返回值。LOOKUP 函数具有两种语法形式:向量形式和数组形式。

  1. LostFocus

当 ActiveX 控件失去输入焦点时,发生此事件。

  1. Lset

在一字符串变量中将一字符串往左对齐,或是将一用户定义类型变量复制到另一用户自定义类型变量。
语法
LSet stringvar = string
LSet varname1 = varname2
stringvar 必要参数。字符串变量名称。
string 必要参数。在 stringvar 内想往左对齐的字符串表达式。
Varname1 必要参数。用户自定义类型变量名,内容将复制进来。
Varname2 必要参数。用户自定义类型变量名,内容将复制出去。

  1. LTrim、RTrim、 Trim

返回 Variant (String),其中包含指定字符串的拷贝,没有前导空白 (LTrim)、尾随空白 (RTrim) 或前导和尾随空白 (Trim)。
语法
LTrim(string)
RTrim(string)
Trim(string)
必要的 string 参数可以是任何有效的字符串表达式。如果 string 包含 Null,将返回 Null。

  1. Excel VBA属性、方法、事件大全——Part9(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. MacID

此函数用在 Macintosh 上,将长为4个字符的常量 转换成被 Dir, Kill, Shell, 和 AppActivate.使用的值。
语法
MacID(常量)
所需的常量参数包含4个字符,用来说明一个资源类型、文件类型、数字签名或 Apple Event,例如: “TEXT”、 “OBIN”,Excel 文件用 "XLS5" 说明(Excel 97用 "XLS8" 说明), Microsoft Word 用 "W6BN" 说明(Word 97用 "W8BN" 说明),如此等等.

  1. MacroOptions

对应于“宏选项”对话框中的选项
本示例将用户定义的宏“TestMacro”添加到名为“My Custom Category”的自定义类别中。运行本示例后,可以看到包含“TestMacro”用户定义函数的“My Custom Category”显示在“插入函数”对话框的“或选择类别”下拉列表中。
Function TestMacro()
    MsgBox ActiveWorkbook.Name
End Function
Sub AddUDFToCustomCategory()
    Application.MacroOptions Macro:="TestMacro", Category:="My Custom Category"
End Sub

  1. MacroType

返回或设置名称所引用的对象。XlXLMMacroType 类型,可读写。
语法
表达式.MacroType
表达式   一个代表 Name 对象的变量。
说明
XlXLMMacroType 可为以下 XlXLMMacroType 常量之一。
xlCommand 引用一个用户定义宏的名称。
xlFunction 引用一个用户定义函数的名称。
xlNotXLM 此名称不引用函数或宏。

  1. MacScript

执行一个脚本并返回由此脚本返回的值,如果脚本有返回值的话。
语法
MacScript 脚本
参数脚本是一个字符串表达式。此字符串表达式既可以是一系列 AppleScript 的命令,也可以说明成 AppleScript 脚本或一个脚本文件的名字。
Remarks
多行脚本可由嵌入回车字符(Chr(13))生成。

  1. MailEnvelope

代表文档的电子邮件标题
本示例设置活动工作表标题的注释。
Sub HeaderComments()
ActiveSheet.MailEnvelope.Introduction = "To Whom It May Concern: "
End Sub

  1. MailEnvelope

代表文档的电子邮件标题
本示例设置活动工作表标题的注释。
Sub HeaderComments()
    ActiveSheet.MailEnvelope.Introduction = "To Whom It May Concern: "
End Sub

  1. Mailer

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. Mailer

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. MailLogoff

关闭一个 Microsoft Excel 建立的 MAPI 邮件会话
本示例检查是否有邮件会话,如果有,则将其关闭。
If Not IsNull(Application.MailSession) Then Application.MailLogoff

  1. MailLogon

登录进入 MAPI Mail 或 Microsoft Exchange 并建立一个邮件会话
本示例登录进入默认邮件帐户。
If IsNull(Application.MailSession) Then
    Application.MailLogon
End If

  1. MailSession

以十六进制数串的形式返回 MAPI 邮件会话(如果存在活动会话);如果没有会话,则返回 Null
本示例检查是否有邮件会话,如果有,则将其关闭。
If Not IsNull(Application.MailSession) Then Application.MailLogoff

  1. MailSystem

返回安装在主机上的邮件系统
本示例显示安装在此计算机上的邮件系统名称。
Select Case Application.MailSystem
    Case xlMAPI
        MsgBox "Mail system is Microsoft Mail"
    Case xlPowerTalk
        MsgBox "Mail system is PowerTalk"
    Case xlNoMailSystem
        MsgBox "No mail system installed"
End Select

  1. MaintainConnection

如果从刷新数据开始直至关闭工作簿,都一直保留指向指定数据源的连接,则为 True。默认值是 True。Boolean 类型,可读写。

  1. MajorGridlines

返回一个 Gridlines 对象,该对象表示指定坐标轴的主要网格线。只有主要坐标轴组中的坐标轴才能有网格线。只读。

  1. MajorTickMark

返回或设置指定坐标轴的主刻度线类型。XlTickMark 类型,可读写。

  1. MajorUnit

返回或设置数值轴的主要单位。Double 类型,可读写。

  1. MajorUnitIsAuto

如果 Microsoft Excel 计算数值轴的主要单位,则该属性值为 True。Boolean 类型,可读写。

  1. MajorUnitScale

当 CategoryType 属性设置为 xlTimeScale 时,返回或设置分类轴主要单位的刻度值。XlTimeUnit 类型,可读写。

  1. MakeConnection

为指定的数据透视表缓存建立连接。

  1. ManualUpdate

如果数据透视表仅在用户请求时重新计算,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. MapPaperSize

如果自动调整以其他国家/地区的标准纸张大小(例如,A4)来设置格式的文档,以便以用户所在的国家/地区的标准纸张大小(例如,信件)来正确地打印文档,则该值为 True
本示例判断 Microsoft Excel 是否能按照用户所在的国家/地区的设置来调整纸张大小,并通知用户。
Sub UseMapPaperSize()
    ' Determine setting and notify user.
    If Application.MapPaperSize = True Then
        MsgBox "Microsoft Excel automatically " & _
            "adjusts the paper size according to the country/region setting."
    Else
        MsgBox "Microsoft Excel does not " & _
            "automatically adjusts the paper size according to the country/region setting."
    End If
End Sub

  1. MarginBottom

以磅为单位返回或设置从文本框底端到包含文本的形状中内接矩形底端的距离。可读/写。Single 类型。

  1. MarginLeft

以磅为单位返回或设置从文本框左边界到包含文本的形状中内接矩形左边界的距离。可读写。Single 类型。

  1. MarginRight

以磅为单位返回或设置从文本框右边界到包含文本的形状中内接矩形右边界的距离。可读写。Single 类型。

  1. MarginTop

以磅为单位返回或设置从文本框架顶端到包含文本的形状中内接矩形顶端的距离。可读写。Single 类型。

  1. MarkerBackgroundColor

将数据标志的背景色设置为 RGB 值或返回对应的颜色索引值。仅适用于折线图、散点图和雷达图。Long 型,可读写。

  1. MarkerBackgroundColorIndex

返回或设置数据标志的背景色,表示为当前调色板中的索引或下列 XlColorIndex 常量之一:xlColorIndexAutomatic 或 xlColorIndexNone。仅适用于折线图、散点图和雷达图。Long 类型,可读写。

  1. MarkerForegroundColor

将数据标志的背景色设置为 RGB 值或返回对应的颜色索引值。仅适用于折线图、散点图和雷达图。Long 型,可读写。

  1. MarkerForegroundColorIndex

返回或设置数据标志的前景色,表示为当前调色板中的索引或下列 XlColorIndex 常量之一:xlColorIndexAutomatic 或 xlColorIndexNone。仅适用于折线图、散点图和雷达图。Long 类型,可读写。

  1. MarkerSize

返回或设置数据标志的大小,以磅为单位。可以是 2 到 72 之间的一个值。Long 型,可读写。

  1. MarkerStyle

返回或设置折线图、散点图或雷达图中数据点或数据系列的数据标志样式。XlMarkerStyle 类型,可读写。

  1. Match

返回在指定方式下与指定数值匹配的数组中元素的相应位置。如果需要找出匹配元素的位置而不是匹配元素本身,则应该使用 MATCH 函数而不是 LOOKUP 函数。

  1. MathCoprocessorAvailable

如果数学协处理器可用,则该值为 True
本示例检查数学协处理器是否可用,如果不可用,则显示一条信息。
If Not Application.MathCoprocessorAvailable Then
    MsgBox "This macro requires a math coprocessor"
End If

  1. Max

返回一组值中的最大值。

  1. Max

返回或设置滚动条或微调控制项区域的最大值。滚动条或微调控制项的值不会超过指定的最大值。可读写 Long 类型。

  1. MaxChange

Double 类型,可读写。返回或设置 Microsoft Excel 处理循环引用时迭代之间的最大变化值
本示例将每次迭代的最大变化值设为 0.1
Application.MaxChange = 0.1

  1. Maximum

返回或设置最近使用文件清单中文件数目的上限。可为 0(零)到 9 之间的数字。Long 类型,可读写。

  1. MaximumScale

返回或设置数值轴上的最大值。Double 类型,可读写。

  1. MaximumScaleIsAuto

如果 Microsoft Excel 计算该数值轴的最大值,则该属性值为 True。Boolean 类型,可读写。

  1. MaxIterations

返回或设置 Microsoft Excel 处理循环引用的最大迭代次数
本示例设置最大迭代次数为 1000。
Application.MaxIterations = 1000

  1. MDeterm

返回一个数组的矩阵行列式的值。

  1. MDuration

返回假设面值 ¥100 的债券的 Macauley 修正期限。

  1. MDX

返回一个 String 类型的值,该值表示将发送给提供程序以填充当前数据透视表视图的多维表达式 (MDX)。只读。

  1. Median

返回给定数字集合的中值。中值是处于一组数字中间的数字。

  1. MemberPropertyCaption

设置 MemberPropertyCaption 属性可控制将哪个成员属性用作指定级别的标题。可读写 Boolean 类型。

  1. MemoryFree

以字节为单位返回 Microsoft Excel 剩余内存量
本示例在一个信息框中显示剩余内存字节数
MsgBox "Microsoft Excel has " & _
    Application.MemoryFree & " bytes free"

  1. MemoryUsed

返回对象当前使用的内存大小,以字节表示。Long 型,只读。

  1. MenuAnimationStyle

获取或设置一个代表命令栏的动画方式的 MsoMenuAnimation。可读写。
语法
表达式.MenuAnimationStyle
表达式   一个代表 CommandBars 对象的变量。

  1. Merge

通过指定 Range 对象创建合并单元格
本示例将工作簿 Template.xls 中的样式合并到活动工作簿中。
ActiveWorkbook.Styles.Merge Workbook:=Workbooks("TEMPLATE.XLS")

  1. Merge

将另一张工作表中的方案合并到 Scenarios 集合中。

  1. Merge

将另一张工作簿中的样式合并到 Styles 集合中。

  1. MergeArea

返回一个 Range 对象,该对象代表包含指定单元格的合并区域
本示例为包含单元格 A3 的合并区域赋值。
Set ma = Range("a3").MergeArea
If ma.Address = "$A$3" Then
    MsgBox "not merged"
Else
    ma.Cells(1, 1).Value = "42"
End If

  1. MergeCells

如果区域或样式包含合并单元格,则该值为 True
本示例为包含单元格 A3 的合并区域赋值。
Set ma = Range("a3").MergeArea
If Range("a3").MergeCells Then
    ma.Cells(1, 1).Value = "42"
End If

  1. MergeCells

如果区域或样式包含合并单元格,则为 True。Variant。可读写。
语法

表达式.MergeCells

表达式   一个代表 CellFormat 对象的变量。

  1. MergeCells

如果样式包含合并的单元格,则为 True。Variant 型,可读写。
语法
表达式.MergeCells
表达式   一个代表 Style 对象的变量。

  1. MergeCells

如果样式包含合并的单元格,则为 True。Variant 型,可读写。

  1. MergeLabels

如果指定的数据透视表的外部行项、列项、分类汇总和总计标志使用合并单元格,则该属性值为 True。Boolean 类型,可读写。

  1. MergeWorkbook

将某工作簿中的改动合并到已打开的工作簿中
本示例将工作簿 Book1.xls 中的改动合并到活动工作簿中。
ActiveWorkbook.MergeWorkbook "Book1.xls"

  1. Message

返回或设置传送名单的消息文字。这些文字将作为传送指定工作簿时的邮件消息内容。String 类型,可读写。

  1. Mid

在一 Variant (String) 变量中以另一个字符串中的字符替换其中指定数量的字符。
语法
Mid(stringvar, start[, length]) = string
stringvar 必要参数。被更改的字符串变量名。
start 必要参数;Variant (Long)。stringvar 中被替换的字符开头位置。
length 可选参数;Variant (Long)。被替换的字符数。如果省略,string将全部用上。
string 必要参数。字符串表达式,替换部分 stringvar 的字符串。

  1. Mid

返回 Variant (String),其中包含字符串中指定数量的字符。
语法
Mid(string, start[, length])
string 必要参数。字符串表达式,从中返回字符。如果 string 包含 Null,将返回 Null。
start 必要参数。为 Long。string 中被取出部分的字符位置。如果 start 超过 string 的字符数,Mid 返回零长度字符串 ("")。
length 可选参数;为 Variant (Long)。要返回的字符数。如果省略或 length 超过文本的字符数(包括 start 处的字符),将返回字符串中从 start 到尾端的所有字符。

  1. MidB

在一 Variant (String) 变量中以另一个字符串中的字符替换其中指定数量的字符。
语法
Mid(stringvar, start[, length]) = string
stringvar 必要参数。被更改的字符串变量名。
start 必要参数;Variant (Long)。stringvar 中被替换的字符开头位置。
length 可选参数;Variant (Long)。被替换的字符数。如果省略,string将全部用上。
string 必要参数。字符串表达式,替换部分 stringvar 的字符串。
注意 MidB 语句作用于包含在字符串中的字节数据。在 MidB 语句中,start 指定 stringvar 中被替换的字节开头位置,而 length 为替换的字节数。

  1. Min

返回一组值中的最小值。

  1. Min

返回或设置滚动条或微调控制项区域的最小值。滚动条或微调控制项的值不会小于指定的最小值。可读写 Long 类型。

  1. MinimumScale

返回或设置数值轴上的最小值。Double 类型,可读写。

  1. MinimumScaleIsAuto

如果 Microsoft Excel 为数值轴计算最小值,则该属性值为 True。Boolean 类型,可读写。

  1. MinorGridlines

返回 Gridlines 对象,该对象表示指定坐标轴的次要网格线。只有主要坐标轴组中的坐标轴才能有网格线。只读。

  1. MinorTickMark

返回或设置指定坐标轴的次要刻度线类型。XlTickMark 类型,可读写。

  1. MinorUnit

返回或设置数值轴上的次要单位。Double 类型,可读写。

  1. MinorUnitIsAuto

如果 Microsoft Excel 为数值轴计算次要单位,则该属性值为 True。Boolean 类型,可读写。

  1. MinorUnitScale

返回或设置当 CategoryType 属性设置为 xlTimeScale 时分类轴次要单位的刻度值。XlTimeUnit 类型,可读写。

  1. Minute

返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一小时中的某分钟。
语法
Minute(time)
必要的 time 参数,可以是任何能够表示时刻的 Variant、数值表达式、字符串表达式或它们的组合。如果 time 包含 Null,则返回 Null。

  1. MInverse

返回数组矩阵的逆距阵。

  1. MIRR

返回一个 Double,指定一系列修改过的周期性现金流(支出或收入)的内部利率。
语法
MIRR(values(), finance_rate, reinvest_rate)
values() 必要。Double 数组,指定现金流值。此数组至少要包含一个负值(支付)和一个正值(收入)。
finance_rate 必要。Double 指定财务成本上的支付利率。
reinvest_rate 必要。Double 指定由现金再投资所得利率。

  1. MIrr

返回某一连续期间内现金流的修正内部收益率。函数 MIRR 同时考虑了投资的成本和现金再投资的收益率。

  1. MissingItemsLimit

返回或设置每个数据透视表字段的唯一项的最大数量,即使在缓存记录中没有支持数据,唯一项也能保留。XlPivotTableMissingItems 类型,可读写。

  1. MkDir

建一个新的目录或文件夹。
语法
MkDir path
必要的 path 参数是用来指定所要创建的目录或文件夹的字符串表达式。path 可以包含驱动器。如果没有指定驱动器,则 MkDir 会在当前驱动器上创建新的目录或文件夹。

  1. MMult

返回两数组的矩阵乘积。结果矩阵的行数与 array1 的行数相同,矩阵的列数与 array2 的列数相同。

  1. Mode

返回在某一数组或数据区域中出现频率最多的数值。

  1. Modify

更改现有条件格式。

  1. Modify

修改指定区域的数据有效性验证。

  1. ModifyAppliesToRange

设置此格式规则所应用于的单元格区域。

  1. Month

返回一个 Variant (Integer),其值为 1 到 12 之间的整数,表示一年中的某月。
语法
Month(date)
必要的 date 参数,可以是任何能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null,则返回 Null。

  1. MonthName

返回一个表示指定月份的字符串。
语法
MonthName(month[, abbreviate])
month 必需的。月份的数值表示。例如一月是1,二月是2,等等。
abbreviate 可选的。Boolean值,表示月份名是否缩写。如果忽略,缺省值为False,表明月份名不能被缩写。

  1. MouseAvailable

如果鼠标可用,则该值为 True
本示例检查鼠标是否可用,如果不可用,则显示一条信息。
If Application.MouseAvailable = False Then
    MsgBox "Your system does not have a mouse"
End If

  1. MouseDown

当在图表上按下鼠标按钮时,产生此事件。
当在图表上按下鼠标按钮时,运行本示例。
Private Sub Chart_MouseDown(ByVal Button As Long, _
        ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
    MsgBox "Button = " & Button & chr$(13) & _
        "Shift = " & Shift & chr$(13) & _
        "X = " & X & " Y = " & Y
End Sub

  1. MouseMove

当鼠标指针在图表上的位置改变时产生此事件。
当在图表上移动鼠标指针时,运行本示例。
Private Sub Chart_MouseMove(ByVal Button As Long, ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
    MsgBox "X = " & X & " Y = " & Y
End Sub

  1. MouseTips

如果“Office 助手”提供有关有效使用鼠标的建议,则返回 True。可读/写。

  1. MouseUp

当在图表上释放鼠标按钮时产生此事件。
当在图表上释放鼠标按钮时,运行本示例。
Private Sub Chart_MouseUp(ByVal Button As Long, _
        ByVal Shift As Long, ByVal X As Long, ByVal Y As Long)
    MsgBox "Button = " & Button & chr$(13) & _
        "Shift = " & Shift & chr$(13) & _
        "X = " & X & " Y = " & Y
End Sub

  1. Move

将指定工作表移到工作簿的另一位置。
本示例将 Sheet1 移到当前活动工作簿的 Sheet3 之后。
Worksheets("Sheet1").Move _
    after:=Worksheets("Sheet3")

  1. Move

将指定工作表移到工作簿的另一位置
本示例将 Sheet1 移到当前活动工作簿的 Sheet3 之后。
Worksheets("Sheet1").Move _
    after:=Worksheets("Sheet3")

  1. Move

将“Office 助手”移动到指定位置。

  1. Move

将工作表移到工作簿中的其他位置。

  1. Move

将图表移到工作簿的另一位置。
语法
表达式.Move(Before, After)
表达式   一个代表 Charts 对象的变量。
参数
名称 必选/可选 数据类型 描述
Before 可选 Variant 将要在其之前放置所移动图表的工作表。如果指定了 After,则不能指定 Before。
After 可选 Variant 将要在其之后放置所移动图表的工作表。如果指定了 Before,则不能指定 After。

  1. MoveAfterReturn

如果按下 Enter (Return) 后活动单元格的位置改变,则该值为 True
本示例将 MoveAfterReturn 属性设为 True。
Application.MoveAfterReturn = True

  1. MoveAfterReturnDirection

返回或设置当用户按 Enter 时,活动单元格选定框的移动方向
本示例将用户按 Enter 时活动单元格选项框的移动方向定义为右移一单元格。
Application.MoveAfterReturn = True
Application.MoveAfterReturnDirection = xlToRight

  1. MoveWhenInTheWay

如果“Office 助手”窗口在挡住用户工作区时会自动移开,则为 True。可读/写。

  1. MRound

返回参数按指定基数舍入后的数值。

  1. MsgBox

在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮。
语法
MsgBox(prompt[, buttons] [, title] [, helpfile, context])
Prompt 必需的。字符串表达式,作为显示在对话框中的消息。prompt 的最大长度大约为 1024 个字符,由所用字符的宽度决定。如果 prompt 的内容超过一行,则可以在每一行之间用回车符 (Chr(13))、换行符 (Chr(10)) 或是回车与换行符的组合 (Chr(13) & Chr(10)) 将各行分隔开来。
Buttons 可选的。数值表达式是值的总和,指定显示按钮的数目及形式,使用的图标样式,缺省按钮是什么以及消息框的强制回应等。如果省略,则 buttons 的缺省值为 0。
Title 可选的。在对话框标题栏中显示的字符串表达式。如果省略 title,则将应用程序名放在标题栏中。
Helpfile 可选的。字符串表达式,识别用来向对话框提供上下文相关帮助的帮助文件。如果提供了 helpfile,则也必须提供 context。
Context 可选的。数值表达式,由帮助文件的作者指定给适当的帮助主题的帮助上下文编号。如果提供了 context,则也必须提供 helpfile。

  1. MultiLevel

设置轴是否为多级。可读/写 Boolean 类型。

  1. MultiNomial

返回参数和的阶乘与各参数阶乘乘积的比值。

  1. MultiSelect

返回或设置指定列表框的选择模式。可为以下常量之一:xlNone、xlSimple 或 xlExtended。Long 类型,可读写。

  1. MultiUserEditing

如果指定工作簿是以共享清单方式打开的,则该值为 True
本示例检查活动工作簿是否以独占模式打开。如果是则以共享清单方式保存该工作簿。
If Not ActiveWorkbook.MultiUserEditing Then
    ActiveWorkbook.SaveAs fileName:=ActiveWorkbook.FullName, _
        accessMode:=xlShared
End If

  1. Name

返回对象的名称
expression.Name
expression必需。该表达式返回上面的对象之一

  1. Name

Name 对象是 Names 集合的成员。代表单元格区域的定义名。可用 Names(index) 返回单个 Name 对象,其中 index 为名称的编号或定义名称
下例显示应用程序的名称集合中的第一个名称的单元格引用。
MsgBox Names(1).RefersTo
下例从当前活动工作簿中删除名称“mySortRange”。
ActiveWorkbook.Names("mySortRange").Delete
可用 Name 返回或设置名称本身的文字。下例更改当前活动工作簿中第一个 Name 对象的名称。
Names(1).Name = "stock_values"

  1. Name

返回对象的名称
以下示例显示活动工作簿的 Sheet1 中的默认 ListObject 对象的名称。
Sub Test 
 Dim wrksht As Worksheet
   Dim oListObj As ListObject
   Set wrksht = ActiveWorkbook.Worksheets("Sheet1")
   Set oListObj = wrksht.ListObjects(1)
   MsgBox oListObj.Name 
End Sub

  1. Name

返回或设置对象的名称
以下示例显示活动工作簿的 Sheet1 中的默认 ListObject 对象的名称。
Sub Test 
 Dim wrksht As Worksheet
   Dim oListObj As ListObject
   Set wrksht = ActiveWorkbook.Worksheets("Sheet1")
   Set oListObj = wrksht.ListObjects(1)
   MsgBox oListObj.Name 
End Sub

  1. Name

返回或设置对象的名称。Range 对象的名称为 Name 对象
expression.Name
expression必需。该表达式返回上面的对象之一。

  1. Name

返回或设置对象的名称
以下示例显示活动工作簿的 Sheet1 中的默认 ListObject 对象的名称。
Sub Test 
   Dim wrksht As Worksheet
   Dim oListObj As ListObject
   Set wrksht = ActiveWorkbook.Worksheets("Sheet1")
   Set oListObj = wrksht.ListObjects(1)
   MsgBox oListObj.Name 
End Sub

  1. Name

应用程序或工作簿中所有 Name 对象的集合。每个 Name 对象代表一个单元格区域上的定义名。

  1. Name

返回或设置对象的名称。
expression.Name
expression必需。该表达式返回上面的对象之一。

  1. Name

重新命名一个文件、目录、或文件夹。
语法
Name oldpathname As newpathname
oldpathname 必要参数。字符串表达式,指定已存在的文件名和位置,可以包含目录或文件夹、以及驱动器。
newpathname 必要参数。字符串表达式,指定新的文件名和位置,可以包含目录或文件夹、以及驱动器。而由 newpathname 所指定的文件名不能存在。

  1. Name

返回一个 String 值,它代表对象的名称。
语法
表达式.Name
表达式   一个代表 AddIn 对象的变量。

  1. Name

获取 Assistant object 的名称。只读。

  1. Name

获取内置的 CommandBar 对象的名称。只读。
语法
表达式.Name
表达式   一个代表 CommandBar 对象的变量。

  1. Name

它代表对象的名称。返回或设置一个 String 值
语法
表达式.Name
表达式   一个代表 Name 对象的变量。

  1. Name

返回一个 String 值,它代表对象的名称。

  1. Name

返回一个 String 值,它代表对象的名称。
语法
表达式.Name
表达式   一个代表 Style 对象的变量。

  1. Name

返回或设置一个 String 值,它代表对象的名称。
语法
表达式.Name
表达式   一个代表 Shape 对象的变量。

  1. Name

返回或设置一个 String 值,它代表对象的名称。

  1. Name

获取或设置文档属性的名称。可读写。

  1. Name

返回或设置一个 String 值,用于表示唯一标识工作簿中的映射的好记的名称。

  1. NameIsAuto

如果 Microsoft Excel 自动确定趋势线的名称,则该属性值为 True。Boolean 类型,可读写。

  1. NameLocal

获取以容器应用程序的语言版本显示的内置命令栏名称,或者返回或设置自定义命令栏的名称。可读写。
语法
表达式.NameLocal
表达式   一个代表 CommandBar 对象的变量。

  1. NameLocal

以用户语言返回或设置对象的名称。String 型,可读写。
语法
表达式.NameLocal
表达式   一个代表 Name 对象的变量。

  1. NameLocal

以用户语言返回或设置对象的名称。String 型,只读。
语法
表达式.NameLocal
表达式   一个代表 Style 对象的变量。

  1. NameLocal

以用户语言返回或设置对象的名称。String 型,只读。

  1. Names

对于 Application 对象,返回一个 Names集合,此集合代表当前工作簿中的所有名称
本示例是将 Sheet1 中的 A1 单元格的名称定义为“myName”。
ActiveWorkbook.Names.Add Name:="myName", RefersToR1C1:= _
    "=Sheet1!R1C1"

  1. Names

应用程序或工作簿中所有Name对象的集合
可用Names属性返回Names集合。下例创建当前活动工作簿中所有名称及其引用地址的列表。
Set nms = ActiveWorkbook.Names
Set wks = Worksheets(1)
For r = 1 To nms.Count
    wks.Cells(r, 2).Value = nms(r).Name
    wks.Cells(r, 3).Value = nms(r).RefersToRange.Address
Next

  1. Names

对于 Workbook 对象,返回一个 Names 集合,此集合代表指定工作簿中的所有名称(包括所有带工作表区分符的名称)。
本示例是将 Sheet1 中的 A1 单元格的名称定义为“myName”。
ActiveWorkbook.Names.Add Name:="myName", RefersToR1C1:= _
    "=Sheet1!R1C1"

  1. Names

应用程序或工作簿中所有 Name 对象的集合。每个 Name 对象代表一个单元格区域上的定义名。

  1. Native

返回一个提供程序指定的数值,该数值用于指定一个错误。而错号对应于最近一次 OLE DB 查询所产生的错误条件。Long 类型,只读。

  1. NavigateArrow

定位追踪箭头,此箭头指定引用单元格、从属单元格或错误源单元格
本示例将第一个追踪箭头从工作表 Sheet1 上的 A1 单元格引导到该单元格的引用单元格。本示例应在 A1 单元格包含公式的工作表中运行,该单元格包含对 D1、D2 和 D3 单元格的引用(例如,公式 “=D1*D2*D3”)。运行本示例之前,先显示“公式审核”工具栏,选定 A1 单元格,并单击“追踪引用单元格”按钮。
Worksheets("Sheet1").Activate
Range("A1").Select
ActiveCell.NavigateArrow True, 1

  1. NegBinomDist

返回负二项式分布。当成功概率为常量 probability_s 时,函数 NEGBINOMDIST 返回在到达 number_s 次成功之前,出现 number_f 次失败的概率。此函数与二项式分布相似,只是它的成功次数固定,试验总数为变量。与二项式分布类似的是,试验次数被假设为自变量。

  1. NetworkDays

返回参数 start-data 和 end-data 之间的全部工作日数值。工作日不包括周末和节假日。可以使用函数 NETWORKDAYS,根据某一特定时期内雇员的工作天数,计算其应计的报酬。

  1. NetworkTemplatesPath

返回保存模板的网络路径
本示例显示保存模板的网络路径。
Msgbox Application.NetworkTemplatesPath

  1. NewBalloon

创建一个“Office 助手”气球。只读。

  1. NewSeries

创建新系列。返回代表该新系列的 Series 对象。

  1. NewSheet

当在工作簿中新建工作表时产生此事件。
本示例将新建的工作表移到工作簿的末尾。
Private Sub Workbook_NewSheet(ByVal Sh as Object)
    Sh.Move After:= Sheets(Sheets.Count)
End Sub

  1. NewWindow

新建一个窗口或者创建指定窗口的副本
本示例为当前活动工作簿新建一个窗口。
ActiveWorkbook.NewWindow

  1. NewWindow

新建一个窗口或者创建指定窗口的副本。
本示例为当前活动工作簿新建一个窗口。
ActiveWorkbook.NewWindow

  1. NewWindow

新建一个窗口或者创建指定窗口的副本。
语法
表达式.NewWindow
表达式   一个代表 Window 对象的变量。
返回值
Window

  1. NewWorkbook

当新建一个工作簿时产生此事件
当新建一个工作簿时,本示例对所有打开的窗口进行排列。
Private Sub App_NewWorkbook(ByVal Wb As Workbook)
    Application.Windows.Arrange xlArrangeStyleTiled
End Sub

  1. NewWorkbook

返回 NewFile 对象
在本示例中,Microsoft Excel 将 wkbOne 变量设置为 NewFile 对象。
Sub SetStartWorking()
    Dim wkbOne As NewFile
    ' Create a reference to an instance of the NewFile object.
    Set wkbOne = Application.NewWorkbook
End Sub

  1. Next

返回一个 Chart、Range 或 Worksheet 对象,该对象代表下一个工作表或单元格
本示例选定 sheet1 中下一个未锁定单元格。如果 sheet1 未保护,选定的单元格将是紧靠活动单元格右边的单元格。
Worksheets("Sheet1").Activate
ActiveCell.Next.Select

  1. Next

返回一个 Comment 对象,该对象代表下一条批注。
语法
表达式.Next
表达式   一个返回 Comment 对象的表达式。
返回值
Comment

  1. Next

返回一个 Chart、Range 或 Worksheet 对象,该对象代表下一个工作表或单元格。
本示例选定 sheet1 中下一个未锁定单元格。如果 sheet1 未保护,选定的单元格将是紧靠活动单元格右边的单元格。
Worksheets("Sheet1").Activate
ActiveCell.Next.Select

  1. NextLetter

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. Nodes

返回一个 ShapeNodes 集合,它代表指定形状的几何描述。
语法
表达式.Nodes
表达式   一个代表 Shape 对象的变量。

  1. Nominal

基于给定的实际利率和年复利期数,返回名义年利率。

  1. NormalizedHeight

如果指定艺术字中所有字符(无论大小写)均为同一高度,则该属性值为 True。MsoTriState 类型,可读写。

  1. NormDist

返回指定平均值和标准偏差的正态分布。此函数在统计方面应用范围广泛(包括假设检验)。

  1. NormInv

返回指定平均值和标准偏差的正态累积分布函数的反函数。

  1. NormSDist

返回标准正态累积分布函数,该分布的平均值为 0(零),标准偏差为 1。可以使用此函数代替标准正态曲线面积表。

  1. NormSInv

返回标准正态累积分布函数的反函数。该分布的平均值为 0,标准偏差为 1。

  1. NoteText

返回或设置与区域左上角单元格相关联的单元格注释
本示例为工作表 Sheet1 上 A1 单元格设置单元格注释。
Worksheets("Sheet1").Range("A1").NoteText "This may change!"

  1. Now

返回一个 Variant (Date),根据计算机系统设置的日期和时间来指定日期和时间。
语法
Now

  1. Nper

返回一个 Double,指定定期定额支付且利率固定的总期数。
语法
NPer(rate, pmt, pv[, fv[, type]])
rate 必要。Double 指定每一期的利率。例如,如果有一笔贷款年百分率 (APR) 为百分之十并按月付款的汽车贷款,则每一期的利率为 0.1/12 或 0.0083。
pmt 必要。Double 指定每一期所付金额。付款金额通常包含本金和利息,且付款金额在年金的有效期间不变。
pv 必要。Double 指定未来一系列付款或收款的现值。例如,当贷款买一辆汽车时,向贷方所借贷的金额为将来每月偿付给贷方款项的现值。
fv 可选。Variant 指定在付清贷款后所希望的未来值或现金结存。例如,贷款的未来值在贷款付清后为 0 美元。但是,如果想要在 18 年间存下 50,000 美元作为子女教育基金,那么 50,000 美元为未来值。如果省略的话,缺省值为 0。
type 可选。Variant 指定贷款到期时间。如果贷款是在贷款周期结束时到期,请使用 0,如果贷款是在周期开始时到期,请使用 1。如果省略的话,缺省值为 0。

  1. NPer

基于固定利率及等额分期付款方式,返回某项投资的总期数。

  1. NPV

返回一个 Double,指定根据一系列定期的现金流(支付和收入)和贴现率而定的投资净现值。
语法
NPV(rate, values())
rate 必要。Double 指定在一期间内的贴现率,用十进制表示。
values() 必要。Double 数组 指定现金流值。此数组至少要包含一个负值(支付)和一个正值(收入)。

  1. Npv

通过使用贴现率以及一系列未来支出(负值)和收入(正值),计算一项投资的净现值。

  1. NullString

返回或设置当 DisplayNullString 为 True 时,在包含 null 值的单元格中显示的字符串。默认值为空字符串 ("")。String 类型,可读写。

  1. Number

返回用于指定错误号的数值。该错误号对应于某个唯一的陷阱,而该陷阱又对应于最近一次 OLE DB 查询所产生的错误条件。Long 类型,只读。

  1. NumberAsText

如果该值为 True(默认值),则 Microsoft Excel 将用“自动更正选项”按钮识别被选定的单元格,这些单元格包含文本格式的数字。如果该值为 False,则禁用对文本格式数字的错误检查。Boolean 类型,可读写。

  1. NumberFormat

返回或设置对象的格式代码
以下这些示例分别对 Sheet1 中的 A17 单元格、第一行和 C 列的数字格式进行设置。
Worksheets("Sheet1").Range("A17").NumberFormat = "General"
Worksheets("Sheet1").Rows(1).NumberFormat = "hh:mm:ss"
Worksheets("Sheet1").Columns("C"). _
    NumberFormat = "$#,##0.00_);[Red]($#,##0.00)"

  1. NumberFormat

返回或设置一个 Variant 值,它代表对象的格式代码。
语法

表达式.NumberFormat

表达式   一个代表 CellFormat 对象的变量。

  1. NumberFormat

返回或设置一个 String 值,它代表对象的格式代码。
语法
表达式.NumberFormat
表达式   一个代表 Style 对象的变量。

  1. NumberFormat

在条件格式规则的计算结果为 True 时返回或设置应用于单元格的数字格式。Variant 型,可读写。

  1. NumberFormat

返回或设置一个 String 值,它代表对象的格式代码。

  1. NumberFormatLinked

如果指定数字格式指向单元格(以便当单元格的格式更改时数据标签的格式也作相应的改动),则为 True。Boolean 类型,可读写。

  1. NumberFormatLocal

以用户语言字符串返回或设置对象的格式代码
本示例以用户语言显示 Sheet1 上的单元格 A1 中的数字格式。
MsgBox "The number format for cell A1 is " & _
Worksheets("Sheet1").Range("A1").NumberFormatLocal

  1. NumberFormatLocal

以采用用户语言字符串的形式返回或设置一个 Variant 值,它代表对象的格式代码。
语法

表达式.NumberFormatLocal

表达式   一个代表 CellFormat 对象的变量。

  1. NumberFormatLocal

以采用用户语言字符串的形式返回或设置一个 String 值,它代表对象的格式代码。
语法
表达式.NumberFormatLocal
表达式   一个代表 Style 对象的变量。

  1. NumberFormatLocal

以采用用户语言字符串的形式返回或设置一个 Variant 值,它代表对象的格式代码。

  1. NumberFormatLocal

以采用用户语言字符串的形式返回或设置一个 String 值,它代表对象的格式代码。

  1. Excel VBA属性、方法、事件大全——Part10(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. Object

获取或设置一个对象引用。可读/写。

  1. Object

返回与此 OLE 对象相联系的 OLE 自动化对象。Object 型,只读。

  1. Obscured

如果指定形状的阴影是填充的,并且阴影被形状所遮盖(即便该形状没有填充),那么该值为 True。如果阴影没有填充,并且当形状没有填充时,可透过形状看到阴影的轮廓,那么该值为 False。MsoTriState 类型,可读写。

  1. Oct

返回 Variant (String),代表一数值的八进制值。
语法
Oct(number)
必要的 number 参数为任何有效的数值表达式或字符串表达式。

  1. Oct2Bin

将八进制数转换为二进制数。

  1. Oct2Dec

将八进制数转换为十进制数。

  1. Oct2Hex

将八进制数转换为十六进制数。

  1. ODBCError

ODBCError 对象是 ODBCErrors 集合的成员。代表一个由最近的 ODBC 查询生成的 ODBC 错误。如果指定的 ODBC 查询运行时没有出现错误,则 ODBCErrors 集合为空。集合中错误的索引次序与 ODBC 数据源生成它们时的次序相同

  1. ODBCErrors

返回一个 ODBCErrors 集合,该集合包含由最近的查询表或数据透视表操作产生的所有 ODBC 错误

  1. ODBCErrors

每一个 ODBCError 对象都代表一个由最近的 ODBC 查询返回的错误。如果指定的 ODBC 查询运行时没有出现错误,则 ODBCErrors 集合为空。集合中错误的索引次序与 ODBC 数据源生成它们时的次序相同。您不能给该集合添加成员。

  1. ODBCTimeout

以秒为单位返回或设置 ODBC 查询的时间限制

  1. Odd

返回数字向上舍入到的最接近的奇数。

  1. OddAndEvenPagesHeaderFooter

如果指定的 PageSetup 对象的奇数页和偶数页具有不同的页眉和页脚,则为 True。可读/写 Boolean 类型。

  1. OddFPrice

返回首期付息日不固定(长期或短期)的面值 ¥100 的债券价格。

  1. OddFYield

返回首期付息日不固定(长期或短期)的债券的收益率。

  1. OddLPrice

返回末期付息日不固定(长期或短期)的面值 ¥100 的债券的价格。

  1. OddLYield

返回末期付息日不固定(长期或短期)的债券的收益率。

  1. Offset

返回一个 Range 对象,该对象代表某个指定区域以外的区域
本示例激活Sheet1上活动单元格向右偏移三列、向下偏移三行处的单元格。
Worksheets("Sheet1").Activate
ActiveCell.Offset(rowOffset:=3, columnOffset:=3).Activate

  1. Offset

返回或设置一个 Long 值,它代表各级别标签之间的距离以及第一级标签与坐标轴之间的距离。

  1. OffsetX

以磅为单位返回或设置指定形状的阴影的水平偏移量。正偏移值将阴影向右偏移,负偏移值将阴影向左偏移。可读写。Single 类型。

  1. OffsetY

以磅为单位返回或设置指定形状阴影的垂直偏移。正偏移值将阴影向下偏移,负偏移值将阴影向上偏移。可读写。Single 类型。

  1. OLAP

如果数据透视表缓存与联机分析处理 (OLAP) 服务器相连,则返回 True。只读 Boolean 类型。

  1. OLEDBErrors

返回 OLEDBErrors 集合,该集合代表最近一次 OLE DB 查询所返回的错误信息

  1. OLEDBErrors

每一个 OLEDBError 对象都代表最近的 OLE DB 查询返回的一个错误。如果指定的 OLE DB 查询运行时没有出现错误,则 OLEDBErrors 集合为空。集合中错误的索引次序与 OLE DB 提供程序生成它们时的次序相同。您不能给该集合添加成员。

  1. OLEFormat

返回一个 OLEFormat 对象,该对象包含 OLE 对象属性。只读。
语法
表达式.OLEFormat
表达式   一个代表 Shape 对象的变量。

  1. OLEObjects

返回代表图表或工作表上单个 OLE 对象(OLEObject)或所有 OLE 对象的集合(OLEObjects 集合)的对象
本示例创建工作表Sheet1上OLE对象的链接类型列表。该列表将出现在本示例新建的工作表中。
Set newSheet = Worksheets.Add
i = 2
newSheet.Range("A1").Value = "Name"
newSheet.Range("B1").Value = "Link Type"
For Each obj In Worksheets("Sheet1").OLEObjects
    newSheet.Cells(i, 1).Value = obj.Name
    If obj.OLEType = xlOLELink Then
        newSheet.Cells(i, 2) = "Linked"
    Else
        newSheet.Cells(i, 2) = "Embedded"
    End If
    i = i + 1
Next

  1. OLEObjects

返回代表图表或工作表上单个 OLE 对象或所有 OLE 对象的集合的对象。
本示例创建工作表 Sheet1 上 OLE 对象的链接类型列表。该列表将出现在本示例新建的工作表中
Set newSheet = Worksheets.Add
i = 2
newSheet.Range("A1").Value = "Name"
newSheet.Range("B1").Value = "Link Type"
For Each obj In Worksheets("Sheet1").OLEObjects
    newSheet.Cells(i, 1).Value = obj.Name
    If obj.OLEType = xlOLELink Then
        newSheet.Cells(i, 2) = "Linked"
    Else
        newSheet.Cells(i, 2) = "Embedded"
    End If
    i = i + 1
Next

  1. OLEType

返回 OLE 对象类型。可为以下 XlOLEType 常量之一:xlOLELink 或 xlOLEEmbed。如果对象是链接的(对象存储于文件之外),则本属性返回 xlOLELink,如果对象是内嵌的(对象完全包含于文件之内),则返回 xlOLEEmbed。Long 类型,只读。

  1. OmittedCells

如果该值为 True(默认值),则 Microsoft Excel 将用“自动更正选项”按钮识别包含公式的选定单元格,其中该公式引用的区域应包括相邻单元格,但这些单元格却被遗漏掉了。如果该值为 False,则禁用对被遗漏单元格的错误检查。Boolean 类型,可读写。

  1. On

如果启用了“Office 助手”,则为 True。可读/写。

  1. On

如果打开指定的筛选,则该属性值为 True。Boolean 类型,只读。

  1. On Error

启动一个错误处理程序并指定该子程序在一个过程中的位置;也可用来禁止一个错误处理程序。
语法
On Error GoTo line
On Error Resume Next
On Error GoTo 0
On Error GoTo line  启动错误处理程序,且该例程从必要的 line 参数中指定的 line 开始。line 参数可以是任何行标签或行号。如果发生一个运行时错误,则控件会跳到 line,激活错误处理程序。指定的 line 必须在一个过程中,这个过程与 On Error 语句相同; 否则会发生编译时间错误。
On Error Resume Next 说明当一个运行时错误发生时,控件转到紧接着发生错误的语句之后的语句,并在此继续运行。访问对象时要使用这种形式而不使用 On Error GoTo。
On Error GoTo 0 禁止当前过程中任何已启动的错误处理程序。

  1. On...GoSub、On...GoTo

根据表达式的值,转到特定行执行。
语法
On expression GoSub destinationlist
On expression GoTo destinationlist
expression 必要参数。数值表达式,其运算结果应该是一个界于 0 到 255 之间的整数,包含 0 和 255。如果 expression 的计算结果不是一个整数,则它会先四舍五入为一个整数。
destinationlist 必要参数。行号或行标签的列表,之间要以逗号隔开。

  1. OnAction

返回或设置单击指定对象时运行的宏的名称。String 类型,可读写。
语法
表达式.OnAction
表达式   一个代表 Shape 对象的变量。

  1. OneColorGradient

将指定填充设为单色渐变。

  1. OnKey

当按特定键或特定的组合键时运行指定的过程
本示例为 Ctrl+ 加号分配“InsertProc”过程,并为 Shift+Ctrl+ 向右键分配“SpecialPrintProc”过程。
Application.OnKey "^{+}", "InsertProc"
Application.OnKey "+^{RIGHT}", "SpecialPrintProc"

本示例将 Shift+Ctrl+ 向右键重新设为正常的含义。
Application.OnKey "+^{RIGHT}"

本示例将 Shift+Ctrl+ 向右键设为不发生任何操作。
Application.OnKey "+^{RIGHT}", ""

  1. OnRepeat

对“重复”菜单项和执行的过程名进行设置
本示例对重复和撤消过程进行设置。
Application.OnRepeat "Repeat VB Procedure", _
    "Book1.xls!My_Repeat_Sub"
Application.OnUndo "Undo VB Procedure", _
    "Book1.xls!My_Undo_Sub"

  1. OnTime

安排一个过程在将来的特定时间运行(既可以是具体指定的某个时间,也可以是指定的一段时间之后)。
本示例设置 15 秒后运行my_Procedure过程,从现在开始计时。
Application.OnTime Now + TimeValue("00:00:15"), "my_Procedure"
 
本示例设置 my_Procedure 在下午 5 点开始运行。
Application.OnTime TimeValue("17:00:00"), "my_Procedure"

  1. OnUndo

对“撤消”菜单项和执行的过程名进行设置
本示例对重复和撤消过程进行设置。
Application.OnRepeat "Repeat VB Procedure", _
    "Book1.xls!My_Repeat_Sub"
Application.OnUndo "Undo VB Procedure", _
    "Book1.xls!My_Undo_Sub"

  1. OnUpdate

该事件发生于命令栏改变时。
语法
表达式.OnUpdate
表达式   一个代表 CommandBars 对象的变量。

  1. OnWindow

返回或设置每当激活一个窗口时要运行的过程的名称
每当激活窗口一时,本示例就运行 WindowActivate 过程。
ThisWorkbook.Windows(1).OnWindow = "WindowActivate"

  1. OnWindow

返回或设置每当激活一个窗口时要运行的过程的名称。
每当激活窗口一时,本示例就运行 WindowActivate 过程。
ThisWorkbook.Windows(1).OnWindow = "WindowActivate"

  1. OnWindow

返回或设置每当激活一个窗口时要运行的过程的名称。String 型,可读写。
语法
表达式.OnWindow
表达式   一个代表 Window 对象的变量。

  1. Open

打开一个工作簿。
本示例打开 Analysis.xls 工作簿,然后运行 Auto_Open 宏。
Workbooks.Open "ANALYSIS.XLS"
ActiveWorkbook.RunAutoMacros xlAutoOpen

  1. Open

打开工作簿时,将产生本事件。
每次打开工作簿时,本示例都最大化 Microsoft Excel 窗口。
Private Sub Workbook_Open()
    Application.WindowState = xlMaximized
End Sub

  1. Open

能够对文件输入/输出 (I/O)。
语法
Open pathname For mode [Access access] [lock] As [#]filenumber [Len=reclength]
pathname 必要。字符串表达式,指定文件名,该文件名可能还包括目录、文件夹及驱动器。
mode 必要。关键字,指定文件方式,有 Append、Binary、Input、Output、或 Random 方式。如果未指定方式,则以 Random 访问方式打开文件。
access 可选。关键字,说明打开的文件可以进行的操作,有 Read、Write、或 Read Write 操作。
lock 可选。关键字,说明限定于其它进程打开的文件的操作,有 Shared、Lock Read、Lock Write、和 Lock Read Write 操作。
filenumber 必要。一个有效的文件号,范围在 1 到 511 之间。使用 FreeFile 函数可得到下一个可用的文件号。
reclength 可选。小于或等于 32,767(字节)的一个数。对于用随机访问方式打开的文件,该值就是记录长度。对于顺序文件,该值就是缓冲字符数。

  1. Open

打开一个最近使用的工作簿。

  1. OpenDatabase

返回一个 Workbook 对象,该对象代表一个数据库
本示例中,Microsoft Excel 打开了“northwind.mdb”文件。本示例假定“northwind.mdb file”存在于 C 盘上。
Sub UseOpenDatabase()
    ' Open the Northwind database.
    Workbooks.OpenDatabase _
        FileName:="C:\northwind.mdb"
End Sub

  1. OpenLinks

打开链接的支持文档。
本示例打开当前活动工作簿的所有 Microsoft Excel 支持文档。
Sub OpenAllLinks()
    Dim arLinks As Variant
    Dim intIndex As Integer
    arLinks = ActiveWorkbook.LinkSources(xlExcelLinks)
    If Not IsEmpty(arLinks) Then
        For intIndex = LBound(arLinks) To UBound(arLinks)
            ActiveWorkbook.OpenLinks arLinks(intIndex)
        Next intIndex
    Else
        MsgBox "The active workbook contains no external links."
    End If
End Sub

  1. OpenText

载入一个文本文件,并将其作为包含单个工作表的工作簿进行分列处理,然后在此工作表中放入经过分列处理的文本文件数据。
本示例打开 Data.txt 文件并将制表符作为分隔符对此文件进行分列处理,转换成为工作表。
Workbooks.OpenText filename:="DATA.TXT", _
   dataType:=xlDelimited, tab:=True

  1. OpenXML

打开 XML 数据文件。返回一个 Workbook 对象。
下面的代码打开了 XML 数据文件“customers.xml”并在 XML 列表中显示了此文件的内容。
Sub UseOpenXML()
    Application.Workbooks.OpenXML _
        Filename:="customers.xml", _
        LoadOption:=xlXmlLoadImportToList
End Sub

  1. OperatingSystem

返回当前操作系统的名称和版本号
本示例显示操作系统的名称。
MsgBox "Microsoft Excel is using " & Application.OperatingSystem

  1. Operator

返回一个 Long 值,它代表条件格式的操作符。

  1. Operator

返回一个 Long 值,它代表数据有效性的运算符。

  1. Operator

返回一个 XlAutoFilterOperator 值,它代表与指定筛选所应用的两个条件相关的操作符。

  1. OptimizeCache

如果构造数据透视表的高速缓存时,需要对其进行优化,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. Option Base

在模块级别中使用,用来声明数组下标的缺省下界。
语法
Option Base {0 | 1}
说明
由于下界的缺省设置是 0,因此无需使用 Option Base 语句。如果使用该语句,则必须写在模块的所有过程之前。一个模块中只能出现一次 Option Base,且必须位于带维数的数组声明之前。

  1. Option Compare

在模块级别中使用,用于声明字符串比较时所用的缺省比较方法。
语法
Option Compare {Binary | Text | Database}
说明
如果使用,则 Option Compare 语句必须写在模块的所有过程之前。

  1. Option Explicit

在模块级别中使用,强制显式声明模块中的所有变量。
语法
Option Explicit
说明
如果使用,Option Explicit 语句必须写在模块的所有过程之前。

  1. Option Private

在允许引用跨越多个工程的主机应用程序中使用 Option Private Module,可以防止在模块所属的工程外引用该模块的内容。在不允许这种引用的主机应用程序中,例如,Visual Basic 的独立方式版本,Option Private 就不起作用。
语法
Option Private Module
说明
如果使用 Option Private 语句,则必须是写在模块级别中的任何过程之前。

  1. Or

在其参数组中,如果任一参数的逻辑值为 TRUE,即返回 TRUE;如果所有参数的逻辑值为 FALSE,即返回 FALSE。

  1. Order

返回或设置一个 XlOrder 值,它代表 Microsoft Excel 打印一张大工作表时所使用的页编号的次序。

  1. Order

返回或设置一个 Long 值,它代表趋势线类型为 xlPolynomial 时趋势线的顺序号(大于 1 的整数)。

  1. OrganizationName

返回注册组织名称
本示例显示注册组织名称。
MsgBox "The registered organization is " & _
    Application.OrganizationName

  1. OrganizeInFolder

如果为 True,则在将指定的文档保存为网页时,所有的支持文件(如背景纹理和图形)将组织在一个单独的文件夹中;如果为 False,则支持文件和网页将保存在同一文件夹中。默认值是 True。Boolean 类型,可读写。

  1. Orientation

文本方向。可为 –90 到 90 度之间的整数值
expression.Orientation
expression必需。该表达式返回上面的对象之一。

  1. Orientation

返回或设置一个 Variant 值,它代表文本方向。
语法

表达式.Orientation

表达式   一个代表 CellFormat 对象的变量。

  1. Orientation

返回或设置一个 XlOrientation 值,它代表文本方向。
语法
表达式.Orientation
表达式   一个代表 Style 对象的变量。

  1. Orientation

返回或设置一个 Long 值,它代表文本框的方向。

  1. Orientation

返回或设置一个 XlPageOrientation 值,它代表纵向或横向打印模式。

  1. Orientation

返回或设置一个 XlPivotFieldOrientation 值,它代表字段在指定的数据透视表中的位置。

  1. Orientation

返回或设置一个 Variant 值,它代表文本方向。

  1. Orientation

返回或设置一个 Long 值,它代表文本方向。

  1. Orientation

返回或设置一个 XlOrientation 值,它代表文本方向。

  1. Outline

返回一个 Outline 对象,该对象代表指定工作表的分级显示
本示例将 Sheet1 的分级显示设置为使用自动样式。
Worksheets("Sheet1").Outline.AutomaticStyles = True

  1. OutlineFont

如果指定的字体是空心字体,则该值为 True
本示例对 Sheet1 的 A1 单元格的字体进行设置。
Worksheets("Sheet1").Range("A1").Font.OutlineFont = True

  1. OutlineLevel

返回或设置指定行或列的当前分级显示级别
本示例设置 sheet1 上第二行的分级显示级别。
Worksheets("Sheet1").Rows(2).OutlineLevel = 1

  1. Overlap

指定放置条形和柱形的方式。取值范围在 -100 到 100 之间。仅应用于二维条形图和二维柱形图。Long 类型,可读写。

  1. Excel VBA属性、方法、事件大全——Part11(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. PageBreak

返回或设置分页符的位置
本示例在 Sheet1 的第 24 行后设置一个手动分页符。
Worksheets("Sheet1").Rows(25).PageBreak = xlPageBreakManual
本示例在工作表 Sheet1 的 J 列左侧设置一个手动分页符。
Worksheets("Sheet1").Columns("J").PageBreak = xlPageBreakManual

  1. PageFieldOrder

返回或设置页字段在数据透视表布局上的顺序。可为以下 XlOrder 常量之一:xlDownThenOver 或 xlOverThenDown。默认常量是 xlDownThenOver。Long 类型,可读写。

  1. PageFields

返回一个对象,该对象表示单个数据透视表字段(PivotField 对象),或者当前显示为页字段的所有字段的一个集合(PivotFields 对象)。只读。

  1. PageFieldStyle

返回或设置用于边界页字段区域中的样式。默认值为 null 字符串(默认时无样式)。String 类型,可读写。

  1. PageFieldWrapCount

返回或设置数据透视表中每行或每列的页字段数目。Long 类型,可读写。

  1. PageRange

返回一个 Range 对象,该对象表示包含数据透视表中页区域的区域。只读。

  1. PageRangeCells

返回一个 Range 对象,该对象仅表示指定数据透视表中(包含页字段和项下拉列表)的单元格。

  1. Pages

返回或设置 Pages 集合中的页数。

  1. PageSetup

返回一个 PageSetup 对象,该对象包含指定对象的所有页面设置
本示例设置 Chart1 的中央页眉的文字。
Charts("Chart1").PageSetup.CenterHeader = "December Sales"

  1. PageSetup

返回一个 PageSetup 对象,该对象包含指定对象的所有页面设置。
本示例设置 Chart1 的中央页眉的文字。
Charts("Chart1").PageSetup.CenterHeader = "December Sales"

  1. Pane

代表窗口中的窗格。Pane 对象只对工作表和 Microsoft Excel 4.0 宏表有效。Pane 对象是 Panes 集合的成员。Panes 集合包含单个窗口中所有的窗格。

  1. Pane

代表窗口中的窗格。
说明
Pane 对象只对于工作表和 Microsoft Excel 4.0 宏表存在。Pane 对象是 Panes 集合的成员。Panes 集合包含在一个窗口中显示的所有窗格。

  1. Panes

返回一个 Panes 集合,该集合代表指定窗口中的所有窗格
本示例激活“Book1.xls”中当前窗口左上角的窗格。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.Panes(1).Activate

  1. Panes

指定窗口中显示的所有 Pane 对象的集合。Pane 对象只对工作表和 Microsoft Excel 4.0 宏表有效。

  1. Panes

指定的窗口中所有 Pane 对象的集合。
说明
Pane 对象只对于工作表和 Microsoft Excel 4.0 宏表存在。

  1. Panes

返回一个 Panes 集合,该集合表示指定窗口中的所有窗格。只读。
语法
表达式.Panes
表达式   一个代表 Window 对象的变量。

  1. PaperSize

返回或设置纸张的大小。XlPaperSize 类型,可读写。

  1. Parameters

返回或设置一个有序的常量数组,用于指定文本文件中相应列的数据类型,而该文本文件则是正要导入查询表中的文本文件。每一列的默认常量为 xlGeneral。Variant 类型,可读写。指定的查询表的 Parameter 对象的集合.

  1. Parameters

返回一个 Parameters 集合,该集合表示查询表参数。只读。

  1. Parent

返回指定对象的父对象
本示例显示包含 myAxis 的图表的名称。
Sub DisplayParentName()
    Set myAxis = Charts(1).Axes(xlValue)
    MsgBox myAxis.Parent.Name
End Sub

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Dialogs 对象的变量。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 WorksheetFunction 对象的变量。

  1. Parent

返回指定对象的父对象
本示例显示包含 myAxis 的图表的名称。
Sub DisplayParentName()
    Set myAxis = Charts(1).Axes(xlValue)
    MsgBox myAxis.Parent.Name

End Sub

  1. Parent

返回指定对象的父对象
本示例显示包含 ListDataFormat 对象的 ListColumn 对象的名称。该 ListDataFormat 对象是为活动工作簿的 Sheet1 中某个列表的第三列设置的属性。
Sub PrintParentName()
   Dim wrksht As Worksheet
   Dim objListCol As ListColumn
   Set wrksht = ActiveWorkbook.Worksheets("Sheet1")
   Set objListCol = wrksht.ListObjects(1).ListColumns(3)
   Debug.Print objListCol.ListDataFormat.Parent
End Sub

  1. Parent

返回指定对象的父对象。
本示例显示包含 myAxis 的图表的名称。
Sub DisplayParentName()
    Set myAxis = Charts(1).Axes(xlValue)
    MsgBox myAxis.Parent.Name
End Sub

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 AddIn 对象的变量。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 AutoCorrect 对象的变量。

  1. Parent

获取 Assistant 对象的 Parent 对象。只读。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 AutoRecover 对象的变量。

  1. Parent

返回指定对象的父对象。只读。
语法

表达式.Parent

表达式   一个代表 CellFormat 对象的变量。

  1. Parent

获取 COMAddIns 对象的 Parent 对象。只读。

  1. Parent

获取 COMAddIn 对象的 Parent 对象。只读。

  1. Parent

获取 CommandBars 对象的 Parent 对象。只读。
语法
表达式.Parent
表达式   一个代表 CommandBars 对象的变量。

  1. Parent

获取 CommandBar 对象的 Parent 对象。只读。
语法
表达式.Parent
表达式   一个代表 CommandBar 对象的变量。
返回值
Object

  1. Parent

返回指定对象的父对象。只读。

  1. Parent

获取 ODSOFilter 对象的 Parent 对象。只读。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Name 对象的变量

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Style 对象的变量。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Shapes 对象的变量。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Shape 对象的变量。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Comments 对象的变量。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Charts 对象的变量。

  1. Parent

获取 DocumentProperties 对象的 Parent 对象。只读。

  1. Parent

获取 DocumentProperty 对象的 Parent 对象。只读。

  1. Parent

返回指定对象的父对象。只读。
语法
表达式.Parent
表达式   一个代表 Window 对象的变量。

  1. ParentField

返回一个 PivotField 对象,该对象表示作为指定对象的组父级的数据透视表字段。只读。

  1. ParentGroup

返回 Shape 对象,它代表子形状或子形状区域的共同父形状。
语法
表达式.ParentGroup
表达式   一个代表 Shape 对象的变量。

  1. ParentItem

返回一个 PivotItem 对象,该对象表示父 PivotField 对象中的父数据透视表项(必须对该字段分组使其有一个父级)。只读。

  1. ParentItems

返回一个对象,该对象表示指定字段中的单个数据透视表项(PivotItem 对象),或者作为组父级的所有项的一个集合(PivotItems 对象)。指定字段必须是另一个字段的组父级。只读。

  1. ParentShowDetail

如果指定数据项是由于其某个父数据项正在显示明细数据而进行显示的,则该值为 True。如果由于其父数据项隐藏明细数据而使该数据项未显示,则该值为 False。本属性仅对已分组的数据项有效。Boolean 类型,只读。

  1. Parse

分析区域内的数据并将这些数据分散放置于若干单元格中
本示例将 206-555-1212 形式的电话号码分解到两列中。第一列仅包含地区代码,第二列包含七个数字的电话号码及内嵌的连字符
Worksheets("Sheet1").Columns("A").Parse _
    parseLine:="[xxx] [xxxxxxxx]", _
    destination:=Worksheets("Sheet1").Range("B1")

  1. Partition

返回一个 Variant (String),指定一个范围,在一系列计算的范围中指定的数字出现在这个范围内。
语法
Partition(number, start, stop, interval)
number 必要参数。整数,在所有范围中判断这个整数是否出现。
start 必要参数。整数,数值范围的开始值,这个数值不能小于 0。
stop 必要参数。整数,数值范围的结束值,这个数值不能等于或小于 start。

  1. Password

返回或设置密码,在打开指定的工作簿时必须提供该密码
在本示例中,Microsoft Excel 打开名为 Password.xls 的工作簿,设置它的密码,然后关闭该工作簿。本示例假定名为 Password.xls 的文件位于 C:\ 驱动器上。
Sub UsePassword()
    Dim wkbOne As Workbook
    Set wkbOne = Application.Workbooks.Open("C:\Password.xls")
    wkbOne.Password = InputBox ("Enter Password")
    wkbOne.Close
End Sub
注释  Password 属性可读取,且返回 ">>**"。

  1. PasswordEncryptionAlgorithm

返回 Microsoft Excel 对指定的工作簿编写密码时使用的算法。
本示例设置活动工作簿的密码加密选项。
Sub SetPasswordOptions()
    ActiveWorkbook.SetPasswordEncryptionOptions _
        PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
        PasswordEncryptionAlgorithm:="RC4", _
        PasswordEncryptionKeyLength:=56, _
        PasswordEncryptionFileProperties:=True
End Sub

  1. PasswordEncryptionFileProperties

如果 Microsoft Excel 对具有密码保护的指定工作簿的文件属性进行加密,则该值为 True
如果具有密码保护的工作簿的文件属性没有加密,那么本示例设置密码加密选项。
Sub SetPasswordOptions()
    With ActiveWorkbook
        If .PasswordEncryptionFileProperties = False Then
            .SetPasswordEncryptionOptions _
                PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
                PasswordEncryptionAlgorithm:="RC4", _
                PasswordEncryptionKeyLength:=56, _
                PasswordEncryptionFileProperties:=True
        End If
    End With
End Sub

  1. PasswordEncryptionKeyLength

返回在对指定的工作簿编写密码时,Microsoft Excel 使用的算法的关键字长度
如果密码加密的关键字长度小于 56,那么本示例设置指定工作簿的密码加密选项。
Sub SetPasswordOptions()
    With ActiveWorkbook
        If .PasswordEncryptionKeyLength < 56 Then
            .SetPasswordEncryptionOptions _
                PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
                PasswordEncryptionAlgorithm:="RC4", _
                PasswordEncryptionKeyLength:=56, _
                PasswordEncryptionFileProperties:=True
        End If
    End With
End Sub

  1. PasswordEncryptionProvider

返回在对指定的工作簿编写密码时,Microsoft Excel 使用的算法加密提供程序的名称
如果具有密码保护的工作簿的文件属性没有加密,则本示例设置指定工作簿的密码加密选项。
Sub SetPasswordOptions()
    With ActiveWorkbook
        If .PasswordEncryptionProvider <> "Microsoft RSA SChannel Cryptographic Provider" Then
            .SetPasswordEncryptionOptions _
                PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
                PasswordEncryptionAlgorithm:="RC4", _
                PasswordEncryptionKeyLength:=56, _
                PasswordEncryptionFileProperties:=True
        End If
    End With
End Sub

  1. Paste

将剪贴板中的内容粘贴到工作表上
本示例将 Sheet1 上单元格区域 C1:C5 中的数据复制到单元格区域 D1:D5 中。
Worksheets("Sheet1").Range("C1:C5").Copy
ActiveSheet.Paste Destination:=Worksheets("Sheet1").Range("D1:D5")

  1. Paste

将剪贴板中的图表数据粘贴到指定的图表中。
本示例将 Sheet1 上单元格区域 B1:B5 中的数据粘贴到 Chart1 中。
Worksheets("Sheet1").Range("B1:B5").Copy
Charts("Chart1").Paste

  1. Paste

将剪贴板中的图片粘贴到指定图表的基底上。

  1. Paste

将剪贴板中的图片粘贴到指定图表的背景墙上。

  1. Paste

将剪贴板中的数据粘贴到指定的系列集合中。

  1. Paste

从剪贴板中粘贴图片,将其作为所选系列的标志。

  1. Paste

从剪贴板中粘贴图片,将其作为所选数据点的标志。

  1. PasteSpecial

以指定格式将剪贴板中的内容粘贴到工作表上
本示例将剪贴板中的 Microsoft Word 文档对象粘贴到 Sheet1 上的单元格 D1 中。
Worksheets("Sheet1").Range("D1").Select
ActiveSheet.PasteSpecial format:= _
    "Microsoft Word 8.0 Document Object

  1. PasteSpecial

将剪贴板中的 Range 对象粘贴到指定区域中
本示例用 Sheet1 上单元格区域 C1:C5 和单元格区域 D1:D5 原有内容的和来取代单元格区域 D1:D5 中的数据。
With Worksheets("Sheet1")
    .Range("C1:C5").Copy
    .Range("D1:D5").PasteSpecial _
        Operation:=xlPasteSpecialOperationAdd
End With

  1. Path

设置或返回 Microsoft Excel 存储“自动恢复”临时文件的完整路径
本示例将“自动恢复”文件的路径设置为驱动器 C。
Sub SetPath()
    Application.AutoRecover.Path = "C:\"
End Sub

  1. Path

将完整路径返回给应用程序,不包括末尾的分隔符和应用程序名称
本示例显示 Microsoft Excel 的完整路径。
Sub TotalPath()
    MsgBox "The path is " & Application.Path
End Sub

  1. Path

返回一个 String 值,它代表应用程序的完整路径,不包括末尾的分隔符和应用程序名称。
语法
表达式.Path
表达式   一个代表 AddIn 对象的变量。

  1. Path

返回或设置一个 String 值,它代表 Microsoft Excel 将要存储“自动恢复”临时文件的位置的完整路径。
语法
表达式.Path
表达式   一个代表 AutoRecover 对象的变量。

  1. Path

返回一个 String 值,它代表应用程序的完整路径,不包括末尾的分隔符和应用程序名称。

  1. PathSeparator

返回路径分隔符 (“\”)。
本示例显示当前路径分隔符。
MsgBox "The path separator character is " & _
    Application.PathSeparator

  1. Pattern

返回或者设置内部图案
本示例为 Sheet1 中 A1 单元格的内部添加十字图案。
Worksheets("Sheet1").Range("A1"). _
    Interior.Pattern = xlPatternCrissCross

  1. Pattern

返回或设置一个代表填充图案的 MsoPatternType 值。

  1. PatternColor

以 RGB 值返回或设置内部图案的颜色
本示例对 Sheet1 中矩形一的内部图案的颜色进行设置。
With Worksheets("Sheet1").Rectangles(1).Interior
    .Pattern = xlGrid
    .PatternColor = RGB(255,0,0)
End With

  1. PatternColorIndex

返回或设置内部图案的颜色,表示为当前调色板中的颜色编号或以下 XlColorIndex 常量之一:
本示例对Sheet1中矩形一的内部图案的颜色进行设置。
With Worksheets("Sheet1").Rectangles(1).Interior
    .Pattern = xlChecker
    .PatternColorIndex = 5
End With

  1. Patterned

将指定填充设为一种图案。

  1. Pearson

返回 Pearson(皮尔生)乘积矩相关系数 r,这是一个范围在 -1.0 到 1.0 之间(包括 -1.0 和 1.0 在内)的无量纲指数,反映了两个数据集合之间的线性相关程度。

  1. Percentile

返回区域中数值的第 K 个百分点的值。可以使用此函数来建立接受阈值。例如,可以确定得分排名在第 90 个百分点之上的检测侯选人。

  1. PercentRank

返回特定数值在一个数据集中的百分比排位。此函数可用于查看特定数据在数据集中所处的位置。例如,可以使用函数 PERCENTRANK 计算某个特定的能力测试得分在所有的能力测试得分中的位置。

  1. Period

返回或设置移动平均趋势线的周期。可以是从 2 至 255 的值。可读/写 Long 类型。

  1. Permission

返回一个 Permission 对象,代表指定工作簿中的权限设置。
下例返回了对活动工作簿的权限设置。
Dim objPermission As Permission
Set objPermission = ActiveWorkbook.Permission

  1. Permut

返回从给定数目的对象集合中选取的若干对象的排列数。排列为有内部顺序的对象或事件的任意集合或子集。排列与组合不同,组合的内部顺序无意义。此函数可用于彩票抽奖的概率计算。

  1. PersonalViewListSettings

如果在共享工作簿的用户个人视图中有列表的筛选和排序设置,则该值为 True
本示例从工作簿二的用户个人视图中删除打印设置及筛选和排序设置。
With Workbooks(2)
    .PersonalViewListSettings = False
    .PersonalViewPrintSettings = False
End With

  1. PersonalViewPrintSettings

如果在共享工作簿的用户个人视图中有打印设置,则该值为 True。
本示例从工作簿二的用户个人视图中删除打印设置及筛选和排序设置。
With Workbooks(2)
    .PersonalViewListSettings = False
    .PersonalViewPrintSettings = False
End With

  1. Perspective

返回或设置三维图表视图的透视系数。必须为 0 到 100 之间的整数。
本示例设置 Chart1 的透视系数为 70。本示例应在三维图表上运行。
Charts("Chart1").RightAngleAxes = False
Charts("Chart1").Perspective = 70

  1. Phonetic

返回 Phonetic 对象,该对象包含了单元格中特定拼音文本串的相关信息
本示例将活动单元格中的第一个拼音文本字符串设置为“  ”。
ActiveCell.Phonetics(1).Text = "  "

  1. Phonetic

包含单元格中特定拼音文本串的有关信息

  1. Phonetic

提取文本字符串中的拼音 (furigana) 字符。

  1. PhoneticCharacters

返回或设置指定 Characters 对象中的拼音文本
本示例将活动单元格中从文本起始位置开始的第四个字符替换为“Furigana”字符。
ActiveCell.Characters(1,3).PhoneticCharacters = "  "

  1. Phonetics

返回区域的 Phonetics 集合
本示例显示活动单元格中的所有 Phonetic 对象。
Set objPhon = ActiveCell.Phonetics
With objPhon
    For Each objPhonItem in objPhon
        MsgBox "Phonetic object: " & .Text
    Next
End With

  1. Phonetics

指定区域中所有 Phonetic 对象的集合

  1. Pi

返回数字 3.14159265358979,即数学常量 pi,精确到 15 位数字。

  1. PickUp

复制指定形状的格式。使用 Apply 方法可将复制的格式应用到其他形状。
语法
表达式.PickUp
表达式   一个代表 Shape 对象的变量。

  1. PictureFormat

返回一个 PictureFormat 对象,它包含指定形状的图片格式属性。应用于代表图片或 OLE 对象的 Shape 对象。只读。
语法
表达式.PictureFormat
表达式   一个代表 Shape 对象的变量。

  1. PictureType

返回或设置一个 Variant 值,它代表图片在背景墙和三维图正面的显示方式。

  1. PictureType

返回或设置一个 XlChartPictureType 值,它代表在柱形或条形图上图片的显示方式。

  1. PictureType

返回或设置一个 XlChartPictureType 值,它代表图片在图例项标示上的显示方式。

  1. PictureUnit

如果 PictureType 属性设置为 xlStackScale,返回或设置图表上每张图片的单位(如果没有设置,则忽略该属性)。Long 型,可读写。

  1. PictureUnit2

如果 PictureType 属性设置为 xlStackScale,则返回或设置图表上每一个图片的单位。否则忽略此属性。可读/写 Double 类型。

  1. Pie3DGroup

返回一个 ChartGroup 对象,该对象代表三维图表上的饼图图表组。
本示例设置 Chart1 中的三维饼图组,使其中的每一数据标志都使用不同的颜色。
Charts("Chart1").Pie3DGroup.VaryByCategories = True

  1. PieGroups

返回代表二维图表上单个饼图图表组或饼图图表组集合的对象。
本示例设置 Chart1 中的第一个饼图组,使其中的每一数据标志使用不同的颜色。本示例应在二维图表上运行。
Charts("Chart1").PieGroups(1).VaryByCategories = True

  1. PivotCache

代表数据透视表的缓存。
说明
PivotCache 对象是 PivotCaches 集合的成员。

  1. PivotCache

返回一个 PivotCache 对象,该对象表示指定数据透视表的缓存。只读。

  1. PivotCaches

返回 PivotCaches 集合,该集合代表指定工作簿中所有的数据透视表高速缓存
本示例使工作簿每次打开时自动更新数据透视表高速缓存。
ActiveWorkbook.PivotCaches(1).RefreshOnFileOpen = True

  1. PivotCaches

工作簿中所有 PublishObject 对象的集合。每个 PublishObject 对象都代表保存为网页的工作簿中的某一项,并且还可以根据该对象中属性和方法所指定的值进行刷新

  1. PivotCell

返回一个 PivotCell 对象,该对象代表数据透视表中的一个单元格
本示例假定数据透视表位于活动工作表上,并且单元格 A3 位于数据透视表上。
Sub CheckPivotCell()
    'Determine the name of the PivotTable the PivotCell is located in.
    MsgBox "Cell A3 is located in PivotTable: " &
        _ Application.Range("A3").PivotCell.Parent
End Sub

  1. PivotColumnAxis

返回 PivotAxis 对象,该对象表示整个列轴。只读 PivotAxis 类型。

  1. PivotField

返回一个 PivotField 对象,该对象代表包含指定区域左上角的数据透视表字段
本示例显示包含活动单元格的数据透视表字段的名称
Worksheets("Sheet1").Activate
MsgBox "The active cell is in the field " & _
    ActiveCell.PivotField.Name

  1. PivotFields

返回一个对象,该对象表示数据透视表中单个字段(PivotField 对象)或可见及隐藏字段集合(PivotFields 对象)。只读。

  1. PivotFields

返回 PivotFields 集合。该集合包含所有数据透视表字段,包括当前在屏幕上看不到的字段。PivotFields 对象,只读。

  1. PivotFilters

返回或设置指定 PivotField 对象的 PivotFilters。只读。

  1. PivotFormulas

返回一个 PivotFormulas 对象,该对象表示指定数据透视表的公式集合。只读。此属性用于控制是否将成员属性标题用于透视字段的 PivotItem 标题。可读/写 Boolean 类型。

  1. PivotFormulas

返回一个 PivotFormulas 对象,该对象表示指定数据透视表的公式集合。只读。

  1. PivotItem

返回一个 PivotItem 对象,该对象代表包含指定区域左上角单元格的数据透视表数据项
本示例显示包含 Sheet1 中活动单元格的数据透视表数据项的名称。
Worksheets("Sheet1").Activate
MsgBox "The active cell is in the item " & _
    ActiveCell.PivotItem.Name

  1. PivotItems

返回一个对象,该对象表示指定字段中的单个数据透视表项(PivotItem 对象)或所有可见项和隐藏项的集合(PivotItems 对象)。只读。

  1. PivotLayout

返回一个 PivotLayout 对象,该对象代表数据透视表中字段的位置以及数据透视图报表中坐标轴的位置。
本示例为第一个数据透视图报表中所使用的所有数据透视表字段的名称创建一个列表。
Set objNewSheet = Worksheets.Add
objNewSheet.Activate
intRow = 1
For Each objPF In _
    Charts("Chart1").PivotLayout.PivotFields
    objNewSheet.Cells(intRow, 1).Value = objPF.Caption
    intRow = intRow + 1
Next objPF

  1. PivotRowAxis

返回 PivotAxis 对象,该对象表示整个行轴。只读 PivotAxis 类型。

  1. PivotSelect

选定数据透视表的一部分。

  1. PivotSelection

以标准数据透视表的选定区域格式返回或设置数据透视表的选定区域。String 类型,可读写。

  1. PivotSelectionStandard

返回或设置用英语(美国)设置的标准数据透视表格式的数据透视表选定内容的 String 类型的数值。可读写。

  1. PivotTable

返回一个PivotTable对象,该对象代表包含指定区域中左上角单元格的数据透视表,或是与数据透视图报表相关的数据透视表
本示例将Sheet1上的数据透视表的当前页设置为名为“Canada”的页。
Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
pvtTable.PivotFields("Country").CurrentPage = "Canada"

  1. PivotTable

代表工作表上的一张数据透视表。PivotTable 对象是 PivotTables 集合的成员

  1. PivotTable

返回一个 PivotTable 对象,它代表与数据透视图相关联的数据透视表。

  1. PivotTableCloseConnection

发生在数据透视表关闭与其数据源的连接之后。
本示例显示一则消息,说明数据透视表与其数据源的连接已经关闭。本示例假定您已在类模块中声明了带有事件的 Workbook 类型的对象。
Private Sub ConnectionApp_PivotTableCloseConnection(ByVal Target As PivotTable)
    MsgBox "The PivotTable connection has been closed."
End Sub

  1. PivotTableOpenConnection

发生在数据透视表打开与其数据源的连接之后。
本示例显示一则消息,说明数据透视表与其数据源的连接已经打开。本示例假定您已在类模块中声明了带有事件的 Workbook 类型的对象。
Private Sub ConnectionApp_PivotTableOpenConnection(ByVal Target As PivotTable)
    MsgBox "The PivotTable connection has been opened."
End Sub

  1. PivotTables

返回一个对象,该对象代表工作表上单个数据透视表报表(PivotTable 对象)或所有数据透视表报表的一个集合(PivotTables 对象)。
本示例对当前活动工作表中第一个数据透视表的“Sum of 1994”字段进行设置,使之使用“SUM”函数。
ActiveSheet.PivotTables("PivotTable1"). _
    PivotFields("Sum of 1994").Function = xlSum

  1. PivotTableSelection

如果数据透视表使用结构化选择,则该值为 True
本示例将激活结构化选择方式,然后对第一张工作表上的第一个数据透视表进行设置,使其只允许选择数据。
Application.PivotTableSelection = True
Worksheets(1).PivotTables(1).SelectionMode = xlDataOnly

  1. PivotTableUpdate

发生在工作簿中的数据透视表更新之后
本示例显示一则消息,说明数据透视表已经更新。本示例假定您已在类模块中声明了带有事件的 Worksheet 类型的对象。
Private Sub Worksheet_PivotTableUpdate(ByVal Target As PivotTable)
    MsgBox "The PivotTable connection has been updated."
End Sub

  1. PivotTableWizard

创建一个 PivotTable 对象
>本示例通过 Microsoft Excel 数据库(包含在单元格区域 A1:C100 中)创建数据透视表。
ActiveSheet.PivotTableWizard xlDatabase, Range("A1:C100")

  1. PivotTableWizard

创建并返回一个 PivotTable 对象。此方法不显示“数据透视表向导”,它不适用于 OLE DB 数据源。请使用 Add 方法添加数据透视表缓存,然后创建基于该缓存的数据透视表。

  1. PixelsPerInch

返回或设置网页中图形图像的密度(每英寸的像素数)及表格单元格的密度。密度设置范围通常为 19 到 480 之间,对于普通的屏幕大小,通常的设置一般为 72、96 和 120。默认设置是 96。Long 型,可读写。

  1. Placement

返回或设置一个 XlPlacement 值,它代表对象附加到对象下面的单元格的方式。
语法
表达式.Placement
表达式   一个代表 Shape 对象的变量。

  1. Placement

返回或设置一个包含 XlPlacement 常量的 Variant 值,它代表对象附加到它所在的单元格的方式。

  1. PlotArea

返回一个 PlotArea 对象,该对象代表图表的绘图区
本示例将 Chart1 绘图区的内部颜色设为淡蓝绿色。
Charts("Chart1").PlotArea.Interior.ColorIndex = 8

  1. PlotBy

返回或设置行和列在图表中作为数据系列使用的方式。
本示例使嵌入图表按列绘制数据。
Worksheets(1).ChartObjects(1).Chart.PlotBy = xlColumns

  1. PlotOrder

返回或设置图表组中选定数据系列的绘制顺序。Long 类型,可读写。

  1. PlotVisibleOnly

如果仅绘制可见单元格,则该值为 True。
本示例使 Microsoft Excel 在 Chart1 中仅绘制可见单元格。
Charts("Chart1").PlotVisibleOnly = True

  1. Pmt

返回一个 Double,指定根据定期定额支付且利率固定的年金支付额。
语法
Pmt(rate, nper, pv[, fv[, type]])
rate 必要。Double 指定每一期的利率。例如,如果有一笔贷款年百分比率 (APR) 为百分之十且按月付款的汽车贷款,则每一期的利率为 0.1/12 或 0.0083。
nper 必要。Integer 指定一笔年金的付款总期数。例如,如果对一笔为期四年的汽车贷款选择按月付款,则贷款共有 4 * 12(或 48)个付款期。
pv 必要。Double 指定未来一系列付款或收款的现值。例如,当贷款买一辆汽车时,向贷方所借贷的金额为将来每月偿付给贷方款项的现值。
fv 可选。Variant 指定在付清贷款后所希望的未来值或现金结存。例如,贷款的未来值在贷款付清后为 0 美元。但是,如果想要在 18 年间存下 50,000 美元作为子女教育基金,那么 50,000 美元为未来值。如果省略的话,缺省值为 0。
type 可选。Variant,指定贷款到期时间。如果贷款是在贷款周期结束时到期,请使用 0。如果贷款是在周期开始时到期,则请使用 1。如果省略的话,缺省值为 0。

  1. Pmt

基于固定利率及等额分期付款方式,计算贷款的每期付款额。

  1. Points

返回一个对象,该对象表示数据系列中单个数据点(Point 对象)或所有数据点的集合(Points 集合)。只读

  1. PointsToScreenPixelsX

将横向度量值由以点(文档坐标)为单位转换为以屏幕像素(屏幕坐标)为单位
本示例确定活动窗口中选定单元格的高度和宽度(单位:像素),并将值返回到变量 lWinWidth 和 lWinHeight 中。
With ActiveWindow
    lWinWidth = _
        .PointsToScreenPixelsX(.Selection.Width)
    lWinHeight = _
        .PointsToScreenPixelsY(.Selection.Height)
End With

  1. PointsToScreenPixelsX

将横向度量值由以点(文档坐标)为单位转换为以屏幕像素(屏幕坐标)为单位。返回转变后的度量值(Long 类型)。
语法
表达式.PointsToScreenPixelsX(Points)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
Points 必选 Long 从文档窗口的左侧开始沿其顶部水平排列的点数。
返回值
Long

  1. PointsToScreenPixelsX

返回或设置屏幕上的象素点。

  1. PointsToScreenPixelsY

将纵向度量值由以点(文档坐标)为单位转换为以屏幕像素(屏幕坐标)为单位
本示例确定活动窗口中选定单元格的高度和宽度(单位:像素),并将值返回到变量 lWinWidth 和 lWinHeight 中。
With ActiveWindow
    lWinWidth = _
        .PointsToScreenPixelsX(.Selection.Width)
    lWinHeight = _
        .PointsToScreenPixelsY(.Selection.Height)
End With

  1. PointsToScreenPixelsY

将纵向度量值由以点(文档坐标)为单位转换为以屏幕像素(屏幕坐标)为单位。返回转变后的度量值(Long 类型)。
语法
表达式.PointsToScreenPixelsY(Points)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
Points 必选 Long 从文档窗口的顶部开始沿其左边缘垂直排列的点数。
返回值
Long

  1. PointsToScreenPixelsY

返回或设置屏幕象素的位置。

  1. Poisson

返回泊松分布。泊松分布通常用于预测一段时间内事件发生的次数,例如一分钟内通过收费站的轿车的数量。

  1. Position

获取或设置一个代表命令栏位置的 MsoBarPosition 常量。可读写。
语法
表达式.Position
表达式   一个代表 CommandBar 对象的变量。

  1. Position

返回或设置一个 Long 值,它代表层次字段在从“well”字段中拖出后在数据透视表中的位置。

  1. Position

返回一个 Variant 值,他代表数据透视表上所有字段的位置,包括属于所有行、列、页以及数据方向上的字段(第一字段、第二字段、第三字段等等)。

  1. Position

返回或设置一个 Long 值,它代表当前正在显示数据项时,该数据项字段中数据项的位置。

  1. Position

返回或设置图表上绘制区域的位置。可读/写 XlChartElementPosition 类型。

  1. Position

返回或设置图表上图表标题的位置。可读/写 XlChartElementPosition 类型。

  1. Position

返回或设置图表上轴标题的位置。可读/写 XlChartElementPosition 类型。

  1. Position

返回或设置图表上单位标签的位置。可读/写 XlChartElementPosition 类型。

  1. Position

返回或设置一个 XlLegendPosition 值,它代表图表上图例的位置。

  1. Position

返回或设置一个 XlDataLabelPosition 值,它代表数据标签的位置。

  1. Post

将指定工作簿发送到一个公共文件夹
本示例发送当前活动工作簿。
ActiveWorkbook.Post

  1. PostText

返回或设置用于 post 方法的字符串,post 方法用于向 Web 服务器输入数据以从 Web 查询中返回数据。String 类型,可读写。

  1. Power

返回某数的乘幂结果。

  1. PPmt

返回一个 Double,指定在定期定额支付且利率固定的年金的指定期间内的本金偿付额。
语法
PPmt(rate, per, nper, pv[, fv[, type]])
rate 必要。Double 指定每一期的利率。例如,如果有一笔贷款年百分比率 (APR) 为百分之十且按月付款的汽车贷款,则每一期的利率为 0.1/12 或 0.0083。
per 必要。Integer 指定在 nper 间范围 1 中的付款周期。
nper 必要。Integer 指定一笔年金的付款总期数。例如,如果对一笔为期四年的汽车贷款选择按月付款,则贷款共有 4 * 12(或 48)个付款期。
pv 必要。Double 指定未来一系列付款或收款的现值。例如,当贷款买一辆汽车时,向贷方所借贷的金额为将来每月偿付给贷方款项的现值。
fv 可选。Variant 指定在付清贷款后所希望的未来值或现金结存值。例如,贷款的未来值在贷款付清后为 0 美元。但是,如果想要在 18 年间存下 50,000 美元作为子女教育基金,那么 50,000 美元为未来值。如果省略的话,缺省值为 0。
type 可选。Variant 指定贷款到期时间。如果贷款是在贷款周期结束时到期,则请使用 0。如果贷款是在周期开始时到期,则请使用 1。如果省略的话,缺省值为 0。

  1. Ppmt

基于固定利率及等额分期付款方式,返回投资在某一给定期间内的本金偿还额。

  1. Precedents

返回一个Range对象,该对象代表单元格的所有引用单元格
本示例选定 sheet1 中单元格 A1 的引用单元格。
Worksheets("Sheet1").Activate
Range("A1").Precedents.Select

  1. PrecisionAsDisplayed

如果指定工作簿中的计算是按照屏幕显示的数字精度完成,则该值为 True
本示例使活动工作簿中的计算仅使用显示的数字精度。
ActiveWorkbook.PrecisionAsDisplayed = True

  1. Prefix

返回一个 String 类型的数值,该数值表示指定的 XML 命名空间的前缀。只读。

  1. PrefixCharacter

返回单元格的前缀字符
本示例显示 sheet1 中单元格 A1 的前缀字符。
MsgBox "The prefix character is " & _
Worksheets("Sheet1").Range("A1").PrefixCharacter

  1. PresentInPane

返回一个 Boolean 类型的数值,该数值表示智能文档控件当前是否显示在“文档操作”任务窗格中。只读。

  1. PreserveColumnFilter

返回或设置在指定的 XML 映射被刷新时是否保留筛选。Boolean 类型,可读写。

  1. PreserveColumnInfo

如果每次刷新查询表时,列排序、筛选和布局信息都会保留,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. PreserveFormatting

如果将数据前五行的任何常用格式设置应用到查询表的新数据行,则为 True。对未使用的单元格不进行格式设置。如果将应用到查询表的最新一次自动套用格式应用于新数据行,则属性为 False。默认值是 True。

  1. PreserveFormatting

当使用数据透视、筛选或更改页字段项等操作刷新或重新计算报告时,如果格式处于被保护状态,则为 True。对于查询表,如果数据前五行的任何常规格式设置将应用于查询表数据的新行,则此属性为 True。对未使用的单元格不进行设置。如果将查询表应用的最近一次自动套用格式应用于新数据行,则此属性为 False。默认值是 True。

  1. PreserveNumberFormatting

刷新架构映射时,如果要保留映射到指定 XML 架构映射的单元格的数字格式,则设为 True。默认值为 False。Boolean 类型,可读写。

  1. PresetGradient

将指定填充设为一个预设的渐变。

  1. PresetGradientType

返回指定填充的预设渐变类型。MsoPresetGradientType,只读。

  1. PresetShape

返回或设置指定艺术字的形状样式。MsoPresetTextEffectShape 类型,可读写。

  1. PresetTextEffect

返回或设置指定艺术字的样式。MsoPresetTextEffect 类型,可读写。

  1. PresetTexture

返回指定填充的预设纹理。MsoPresetTexture,只读。

  1. PresetTextured

将指定填充格式设为预设纹理。

  1. Previous

返回一个 Chart、Range 或 Worksheet 对象,该对象代表上一工作表或单元格
本示例选定 sheet1 中上一个未锁定单元格。如果 sheet1 未保护,选定的单元格将是紧靠活动单元格左边的单元格。
Worksheets("Sheet1").Activate
ActiveCell.Previous.Select

  1. Previous

返回一个 Chart、Range 或 Worksheet 对象,该对象代表上一工作表或单元格
本示例选定sheet1中上一个未锁定单元格。如果sheet1未保护,选定的单元格将是紧靠活动单元格左边的单元格。
Worksheets("Sheet1").Activate
ActiveCell.Previous.Select

  1. Previous

返回一个 Comment 对象,该对象代表前一条批注。
语法
表达式.Previous
表达式   一个返回 Comment 对象的表达式。
返回值
Comment

  1. PreviousSelections

返回一个数组,数组中包括最近选定的4个区域或者名称
本示例显示前一次选定的数组中所有项的单元格地址。如果前一次没有选定任何内容,则LBound函数将返回一个出错标志。该错误将被捕获,并显示一个消息框。
On Error GoTo noSelections
For i = LBound(Application.PreviousSelections) To _
            UBound(Application.PreviousSelections)
    MsgBox Application.PreviousSelections(i).Address
Next i
Exit Sub
On Error GoTo 0
noSelections:
    MsgBox "There are no previous selections"

  1. Price

返回定期付息的面值 ¥100 的债券价格。

  1. PriceDisc

返回折价发行的面值 ¥100 的债券的价格。

  1. PriceMat

返回到期付息的面值 ¥100 的债券的价格。

  1. Print

在 Immediate 窗口中显示文本。
语法
object.Print [outputlist]
Print 方法的语法具有下列对象限定符和部分:
部分 描述
object 必需的。对象表达式,其值为“应用于”列表中的对象。
outputlist 可选的。要打印的表达式或表达式的列表。如果省略,则打印一空白行。

  1. Print #

将格式化显示的数据写入顺序文件中。
语法
Print #filenumber, [outputlist]
filenumber 必要。任何有效的文件号。
outputlist 可选。表达式或是要打印的表达式列表。

  1. PrintArea

以字符串返回或设置要打印的区域,该字符串使用宏语言的 A1 样式的引用。String 类型,可读写。

  1. PrintComments

返回或设置批注随工作表打印的方式。XlPrintLocation 类型,可读写。

  1. PrintDrillIndicators

指定是否随数据透视表打印深化指示符。可读写 Boolean 类型。

  1. PrintErrors

设置或返回一个 XlPrintErrors 常量,该常量指定显示的打印错误类型。该功能允许用户在打印工作表时取消错误显示。可读写。

  1. PrintGridlines

如果在页面上打印单元格网格线,则该值为 True。仅应用于工作表。Boolean 类型,可读写。

  1. PrintHeadings

如果打印本页时同时打印行标题和列标题,则该值为 True。仅应用于工作表。Boolean 类型,可读写。

  1. PrintNotes

如果打印工作表时单元格批注作为尾注一起打印,则该值为 True。仅应用于工作表。Boolean 类型,可读写。

  1. PrintObject

如果打印文档时也打印指定对象,则为 True。Boolean 类型,可读写。

  1. PrintOut

打印指定对象。
本示例打印当前活动工作表。
ActiveSheet.PrintOut

  1. PrintOut

打印指定对象
本示例打印当前活动工作表。
ActiveSheet.PrintOut

  1. PrintOut

打印对象。

  1. PrintOut

打印对象。
语法
表达式.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName, IgnorePrintAreas)
表达式   一个代表 Charts 对象的变量。
参数
名称 必选/可选 数据类型 描述
From 可选 Variant 打印的开始页号。如果省略此参数,则从起始位置开始打印。
To 可选 Variant 打印的终止页号。如果省略此参数,则打印至最后一页。
Copies 可选 Variant 打印份数。如果省略此参数,则只打印一份。
Preview 可选 Variant 如果为 True,Microsoft Excel 将在打印对象之前调用打印预览。如果为 False(或省略该参数),则立即打印对象。
ActivePrinter 可选 Variant 设置活动打印机的名称。
PrintToFile 可选 Variant 如果为 True,则打印到文件。如果没有指定 PrToFileName,Microsoft Excel 将提示用户输入要使用的输出文件的文件名。
Collate 可选 Variant 如果为 True,则逐份打印多个副本。
PrToFileName 可选 Variant 如果 PrintToFile 设为 True,则该参数指定要打印到的文件名。
IgnorePrintAreas 可选 Variant 如果为 True,则忽略打印区域并打印整个对象。
返回值
Variant

  1. PrintOut

打印对象。
语法
表达式.PrintOut(From, To, Copies, Preview, ActivePrinter, PrintToFile, Collate, PrToFileName)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
From 可选 Variant 打印的开始页号。如果省略此参数,则从起始位置开始打印。
To 可选 Variant 打印的终止页号。如果省略此参数,则打印至最后一页。
Copies 可选 Variant 打印份数。如果省略此参数,则只打印一份。
Preview 可选 Variant 如果为 True,Microsoft Excel 将在打印对象之前调用打印预览。如果为 False(或省略该参数),则立即打印对象。
ActivePrinter 可选 Variant 设置活动打印机的名称。
PrintToFile 可选 Variant 如果为 True,则打印到文件。如果没有指定 PrToFileName,Microsoft Excel 将提示用户输入要使用的输出文件的文件名。
Collate 可选 Variant 如果为 True,则逐份打印多个副本。
PrToFileName 可选 Variant 如果 PrintToFile 设为 True,则该参数指定要打印到的文件名。
返回值
Variant

  1. PrintPreview

以打印效果显示指定的对象
本示例显示工作表 Sheet1 的打印预览。
Worksheets("Sheet1").PrintPreview

  1. PrintPreview

按对象打印后的外观效果显示对象的预览。

  1. PrintPreview

按对象打印后的外观效果显示对象的预览。
语法
表达式.PrintPreview(EnableChanges)
表达式   一个代表 Charts 对象的变量。
参数
名称 必选/可选 数据类型 描述
EnableChanges 可选 Variant 传递 Boolean 值,以指定用户是否可更改边距和打印预览中可用的其他页面设置选项。

  1. PrintPreview

按对象打印后的外观效果显示对象的预览。
语法
表达式.PrintPreview(EnableChanges)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
EnableChanges 可选 Variant 传递 Boolean 值,以指定用户是否可更改边距和打印预览中可用的其他页面设置选项。
返回值
Variant

  1. PrintQuality

返回或设置打印质量。Variant 类型,可读写。

  1. PrintSettings

如果在自定义视图中包含打印设置,则该属性值为 True。Boolean 类型,只读。

  1. PrintTitleColumns

返回或设置包含在每一页的左边重复出现的单元格的列,用宏语言 A1-样式中的字符串表示。String 类型,可读写。

  1. PrintTitleRows

返回或设置那些包含在每一页顶部重复出现的单元格的行,用宏语言字符串以 A1 样式表示法表示。String 类型,可读写。

  1. PrintTitles

如果基于数据透视表设置工作表的打印标题,则该属性值为 True。如果使用工作表的打印标题,则该属性值为 False。默认值为 False。Boolean 类型,可读写。

  1. Priority

返回或设置条件格式规则的优先级值。当工作表中存在多个条件格式规则时,优先级确定求值的顺序。

  1. Private

在模块级别中使用,用于声明私有变量及分配存储空间。
语法
Private [WithEvents] varname[([subscripts])] [As [New] type] [,[WithEvents] varname[([subscripts])] [As [New] type]] . . .
WithEvents 可选的。关键字,说明 varname 是用来响应由 ActiveX 对象所触发的事件的对象变量。只有在类模块中才是合法的。使用 WithEvents,可以定义任意个所需的单变量,但不能用 WithEvents 创建数组。New 和 WithEvents 不能一起使用。
varname 必需的。变量的名称;遵循标准的变量命名约定。
subscripts 可选的。数组变量的维数;最多可以定义 60 维的多维数组。subscripts 参数的使用语法如下:
  [lower To] upper [,[lower To] upper] . . .
如果不显式指定 lower,则数组的下界由 Option Base 语句控制。如果没有 Option Base 语句则下界为 0。
New 可选的。使其可以隐式地创建对象的关键字。如果使用 New 声明对象变量,则在第一次引用该变量时创建该对象的新实例,因此不必使用 Set 语句来对该对象引用赋值。New 关键字不能声明任何内部数据类型的变量以及从属对象的实例,也不能与 WithEvents 一起使用。
type 可选的。变量的数据类型;可以是 Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(对可变长的字符串)、String * length(对定长的字符串)、Object、Variant、用户定义类型或对象类型。所声明的每个变量都要一个单独的 As type 子句。

  1. Prob

返回区域中的数值落在指定区间内的概率。如果没有给出上限 (upper_limit),则返回区间 x_range 内的值等于下限 lower_limit 的概率。

  1. Product

将所有以参数形式给出的数字相乘,并返回乘积值。

  1. ProductCode

返回 Microsoft Excel 的全球唯一标识符 (GUID)。
本示例显示 Microsoft Excel 的全球唯一标识符 (GUID)。
MsgBox Application.ProductCode

  1. progID

返回对象的程序标识符。String 型,只读。
语法
表达式.progID
表达式   一个代表 AddIn 对象的变量。

  1. ProgId

获取指定 COMAddIn 对象的编程标识符 (ProgID)。只读。

  1. progID

返回对象的程序标识符。String 型,只读。

  1. PromptForSummaryInfo

如果在保存文件时 Microsoft Excel 要求用户输入汇总信息,则该值为 True
本示例设置保存文件时显示提示,要求用户输入汇总信息。
Application.PromptForSummaryInfo = True

  1. PromptString

返回提示用户在参数查询输入参数值的短语。String 类型,只读。

  1. Proper

将文本字符串的首字母及任何非字母字符之后的首字母转换成大写。将其余的字母转换成小写。

  1. Properties

返回一个 CustomProperties 对象,该对象表示智能标记属性。只读。

  1. Property Get

声明Property过程的名称,参数以及构成其主体的代码,该过程获取一个属性的值。
语法
[Public | Private | Friend] [Static] Property Get name [(arglist)] [As type]
[statements]
[name = expression]
[Exit Property]
[statements]
[name = expression]
End Property
Public 可选的。表示所有模块的所有其它过程都可访问 Property Get 过程。如果在包含 Option Private 的模块中使用,则该过程在该工程外是不可使用的。
Private 可选的。表示只有包含其声明的模块的其它过程可以访问该 Property Get 过程。
Friend 可选的。只能在类模块中使用。表示该 Property Get 过程在整个工程中都是可见的,但对对象实例的控制者是不可见的
Static 可选的。表示在调用之间保留该 Property Get 过程的局部变量的值。Static 属性对在该 Property Get 过程外声明变量不会产生影响,即使过程中也使用了这些变量。
name 必需的。Property Get 过程的名称;遵循标准的变量命名约定,但不能与同一模块中的 Property Let 或 Property Set 过程同名。
arglist 可选的。代表在调用时要传递给 Property Get 过程的参数的变量列表。多个变量则用逗号隔开。Property Get 过程中的每个参数的名称和数据类型必须与相应 Property Let 过程(如果存在)中的参数一致。
type 可选的。该 Property Get 过程的返回值的数据类型;可以是 Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(除定长)、Object、Variant、用户定义类型和数组。
Property Get 过程的返回值类型必须与相应的 Property Let 过程(如果有)的最后一个(有时是仅有的)参数的数据类型相同,该 Property Let 过程将其右边表达式的值赋给属性。
statements 可选的。Property Get 过程体中所执行的任何语句组。
expression 可选的。Property Get 语句所定义的过程返回的属性值。

  1. Property Let

声明 Property Let 过程的名称,参数以及构成其主体的代码,该过程给一个属性赋值。
语法
[Public | Private | Friend] [Static] Property Let name ([arglist,] value)
[statements]
[Exit Property]
[statements]
End Property
Public 可选的。表示所有模块的所有其它过程都可访问该 Property Let 过程。如果在包含 Option Private 的模块中使用,则这个过程在该工程外是不可使用的。
Private 可选的。表示只有在包含其声明的模块的其它过程中可以访问该 Property Let 过程。
Friend 可选的。只能在类模块中使用。表示该 Property Let 过程在整个工程中都是可见的,但对于对象实例的控制者是不可见的。
Static 可选的。表示在调用之间将保留 Property Let 过程的局部变量的值。Static 属性对在该 Property Let 过程外声明的变量不会产生影响,即使过程中也使用了这些变量。
name 必需的。Property Let 过程的名称;遵循标准的变量命名约定,但不能与同一模块中的 Property Get 或 Property Set 过程同名。
arglist 可选的。代表在调用时要传递给 Property Let 过程的参数的变量列表。多个变量则用逗号隔开。Property Let 过程中的每个参数的名称和数据类型必须与 Property Get 过程中的相应参数一致。
value 必需的。指用于给属性赋值的变量。当调用该过程时,这个参数出现在调用表达式的右边。value 的数据类型必须和相应的 Property Get 过程的返回值类型一致。
statements 可选的。Property Let 过程中执行的任何语句组。

  1. Property Set

声明 Property 过程的名称,参数以及构成其主体的代码,该过程设置一个对象引用。
语法
[Public | Private | Friend] [Static] Property Set name ([arglist,] reference)
[statements]
[Exit Property]
[statements]
End Property
Optional 可选的。表示调用者可以提供或不提供该参数。
Public 可选的。表示所有模块的所有其它过程都可访问这个 Property Set 过程。如果在包含 Option Private 的模块中使用,则这个过程在该工程外是不可使用的。
Private 可选的。表示只有包含其声明的模块的其它过程可以访问该 Property Set 过程。
Friend 可选的。只能在类模块中使用。表示该 Property Set 过程在整个工程中都是可见的,但对对象实例的控制者是不可见的。
Static 可选的。表示在调用之间保留 Property Set 过程的局部变量的值。Static 属性对在该 Property Set 外声明的变量不会产生影响,即使过程中也使用了这些变量。
name 必需的。Property Set 过程的名称;遵循标准的变量命名约定,但不能与同一模块中的 Property Get 或 Property Let 过程同名。
arglist 可选的。代表在调用时要传递给 Property Set 过程的参数的变量列表。对于多个变量则用逗号隔开。
reference 必需的。对象引用赋值的右边所使用的包含对象引用的变量。
statements 可选的。Property 过程体中所执行的任何语句组。

  1. PropertyOrder

只对属于成员属性字段的数据透视表字段有效。返回一个 Long 类型的数值,该数值表示成员属性在其所属的多维数据集字段内的显示位置。可读写。

  1. PropertyParentField

返回一个 PivotField 对象,该对象表示字段中属性所从属的字段。

  1. Protect

保护工作簿使其不至被修改
本示例保护活动工作表。可以验证工作表是受保护的,方法是:在活动工作表的任意单元格中输入一个值。
Sub ProtectSheet()
    ActiveSheet.Protect Scenarios:=True, UserInterfaceOnly:=True
End Sub

  1. Protect

保护工作表使其不至被修改
本示例保护活动工作表。可以验证工作表是受保护的,方法是:在活动工作表的任意单元格中输入一个值。
Sub ProtectSheet()
    ActiveSheet.Protect Scenarios:=True, UserInterfaceOnly:=True
End Sub

  1. Protect

保护图表使其不至被修改
本示例保护活动图表。可以验证图表是受保护的,方法是:在活动工作表的任意单元格中输入一个值。本示例假定图表存在于应用程序中。
Sub ProtectChart()
    ActiveChart.Protect Scenarios:=True, UserInterfaceOnly:=True
End Sub

  1. ProtectChartObject

如果嵌入式图表框不能通过用户界面移动、调整大小或删除,则为 True。可读/写 Boolean 类型。

  1. ProtectChartObject

如果不能通过用户界面对嵌入图表框架执行移动、调整大小或删除操作,则该属性值为 True。Boolean 类型,可读写。

  1. ProtectContents

如果工作表的内容处于保护状态,则该值为 True
如果 sheet1 的内容处于保护状态,则本示例显示一个消息框。
If Worksheets("Sheet1").ProtectContents = True Then
    MsgBox "The contents of Sheet1 are protected."
End If

  1. ProtectData

如果用户不能更改系列公式,则该值为 True。
本示例保护第一张工作表上嵌入的第一个图表中的数据。
Worksheets(1).ChartObjects(1).Chart.ProtectData = True

  1. ProtectDrawingObjects

如果图形处于保护状态,则该值为 True
如果sheet1中的图形处于保护状态,则本示例显示一个消息框。
If Worksheets("Sheet1").ProtectDrawingObjects = True Then
    MsgBox "The shapes on Sheet1 are protected."
End If

  1. ProtectDrawingObjects

如果图形处于保护状态,则该值为 True。
如果 sheet1 中的图形处于保护状态,则本示例显示一个消息框
If Worksheets("Sheet1").ProtectDrawingObjects = True Then
    MsgBox "The shapes on Sheet1 are protected."
End If

  1. ProtectFormatting

如果用户不能更改格式,则该值为 True
本示例保护第一张工作表上嵌入的第一个图表的格式。
Worksheets(1).ChartObjects(1).Chart.ProtectFormatting = True

  1. ProtectGoalSeek

如果用户不能用鼠标操作更改图表数据点,则该值为 True
本示例保护第一张工作表上嵌入的第一个图表的数据点。
Worksheets(1).ChartObjects(1).Chart.ProtectGoalSeek = True

  1. Protection

返回一个 Protection 对象,该对象代表工作表的保护选项
本示例对活动工作表进行保护,并判断是否能在受保护的工作表中插入列,然后将此状态通知用户。
Sub CheckProtection()
    ActiveSheet.Protect
    ' Check the ability to insert columns on a protected sheet.
    ' Notify the user of this status.
    If ActiveSheet.Protection.AllowInsertingColumns = True Then
        MsgBox "The insertion of columns is allowed on this protected worksheet."
    Else
        MsgBox "The insertion of columns is not allowed on this protected worksheet."
    End If
End Sub

  1. Protection

获取或设置一个 MsoBarProtection 常量,代表防止用户对命令栏进行自定义的方式。可读写。
语法
表达式.Protection
表达式   一个代表 CommandBar 对象的变量。

  1. ProtectionMode

如果设置了仅限于用户界面保护选项,则该值为 True
本示例显示 ProtectionMode 属性的状态。
MsgBox ActiveSheet.ProtectionMode

  1. ProtectScenarios

如果工作表的方案处于保护状态,则该值为 True
如果sheet1中的方案处于保护状态,则本示例将显示消息框。
If Worksheets("Sheet1").ProtectScenarios Then _
    MsgBox "Scenarios are protected on this worksheet."

  1. ProtectSelection

如果不能选定图表元素,则该值为 True。
本示例使第一张工作表上嵌入的第一个图表中的图表元素不能被选定。
Worksheets(1).ChartObjects(1).Chart.ProtectSelection = True

  1. ProtectSharing

保存工作簿并设置共享保护
本示例保存工作簿一并设置共享保护。
Sub ProtectWorkbook()
    Dim wksOne As Worksheet
    Dim strPwd As String
    Dim strSharePwd As String
    Set wksOne = Application.ActiveSheet
    strPwd = InputBox("Enter password for the file")
    strSharePwd = InputBox("Enter password for sharing")
    wksOne.ProtectSharing Password:=strPwd, _
        SharingPassword:=strSharePwd
End Sub

  1. ProtectStructure

如果工作簿中工作表结构受保护,则该值为 True
本示例检查活动工作簿中工作表结构是否受保护,如果是则显示一条消息。
If ActiveWorkbook.ProtectStructure = True Then
    MsgBox "Remember, you cannot delete, add, or change " & _
       Chr(13) & _
       "the location of any sheets in this workbook."
End If

  1. ProtectWindows

如果工作簿窗口受保护,则该值为 True
本示例检查活动工作簿窗口是否受保护,如果是则显示一条信息。
If ActiveWorkbook.ProtectWindows = True Then
    MsgBox "Remember, you cannot rearrange any" & _
        " window in this workbook."
End If

  1. PTCondition

返回一个 Boolean 值,指明是否将条件格式应用于数据透视表图表。只读。

  1. Public

在模块级别中使用,用于声明公用变量和分配存储空间。
语法
Public [WithEvents] varname[([subscripts])] [As [New] type] [,[WithEvents] varname[([subscripts])] [As [New] type]] . . .
WithEvents 可选的。关键字,说明 varname 是用来响应由 ActiveX 对象触发的事件的对象变量。只有在类模块中才是合法的。使用 WithEvents,可以定义任意个所需的单个变量,但不能用 WithEvents 创建数组。New 和 WithEvents 不能一起使用。
varname 必需的。变量的名称;遵循标准的变量命名约定。
subscripts 可选的。数组变量的维数;最多可以定义 60 维的多维数组。subscripts 参数使用下面的语法:
  [lower To] upper [,[lower To] upper] . . .
如果不显式指定 lower,则数组的下界由 Option Base 语句控制。如果没有 Option Base 语句则下界为 0。
New 可选的。用它可以隐式地创建对象的关键字。如果使用 New 声明对象变量,则在第一次引用该变量时创建该对象的新实例,因此不必使用 Set 语句来对该对象引用赋值。New 关键字不能用来声明任何内部数据类型的变量以及从属对象的实例,也不能与 WithEvents 一起使用。
type 可选的。变量的数据类型;可以是 Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(对变长的字符串)、String * length(对定长的字符串)、Object或 Variant,用户定义类型,或对象类型。所声明的每个变量都要有一个单独的 As type 子句。

  1. Publish

将文档中的项或项的集合保存到网页中。

  1. PublishObject

代表保存为网页的工作簿中的项,并可以根据 PublishObject 对象中属性和方法所指定的值进行刷新。
说明
PublishObject 对象是 PublishObjects 集合的成员

  1. PublishObjects

返回 PublishObjects 集合。只读。
本示例将活动工作簿中的所有静态 PublishObject 对象发布到网页上。
Set objPObjs = ActiveWorkbook.PublishObjects
For Each objPO in objPObjs
    If objPO.HtmlType = xlHTMLStatic Then
        objPO.Publish
    End If
Next objPO

  1. PublishObjects

工作簿中所有 PublishObject 对象的集合。每个 PublishObject 对象都代表保存为网页的工作簿中的某一项,并且还可以根据该对象中属性和方法所指定的值进行刷新

  1. PurgeChangeHistoryNow

从修订日志中删除指定工作簿的条目
本示例从当前活动工作簿的修订日志中删除一天以前所做的所有修订记录。
ActiveWorkbook.PurgeChangeHistoryNow Days:=1

  1. Put

将一个变量的数据写入磁盘文件中。
语法
Put [#]filenumber, [recnumber], varname
filenumber 必要。任何有效的文件号。
recnumber 可选。Variant (Long)。记录号(Random 方式的文件)或字节数(Binary 方式的文件),指明在此处开始写入。
varname 必要。包含要写入磁盘的数据的变量名。

  1. PV

返回一个 Double 指定在未来定期、定额支付且利率固定的年金现值。
语法
PV(rate, nper, pmt[, fv[, type]])
rate 必要。Double 指定每一期的利率。例如,如果有一笔贷款年百分比率 (APR) 为百分之十且按月付款的汽车贷款,则每一期的利率为 0.1/12 或 0.0083。
nper 必要。Integer 指定一笔年金的付款总期数。例如,如果对一笔为期四年的汽车贷款选择按月付款,则贷款共有 4 * 12(或 48)个付款期。
pmt 必要。Double 指定每一期的付款金额。付款金额通常包含本金和利息,且此付款金额在年金的有效期间不变。
fv 可选。Variant,指定在付清贷款后所希望的未来值或现金结存。例如,贷款的未来值在贷款付清后为 0 美元。但是,如果想要在 18 年间存下 50,000 美元作为子女教育基金,那么 50,000 美元为未来值。如果省略的话,缺省值为 0。
type 可选。Variant 指定贷款到期时间。如果贷款是在贷款周期结束时到期,则请使用 0。如果贷款是在周期开始时到期,则请使用 1。如果省略的话,缺省值为 0。

  1. Pv

返回投资的现值。现值为一系列未来付款的当前值的累积和。例如,借入方的借入款即为贷出方贷款的现值。

  1. Excel VBA属性、方法、事件大全——Part12(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. QBColor

返回一个 Long,用来表示所对应颜色值的 RGB 颜色码。
语法
QBColor(color)
必要的 color 参数是一个界于 0 到 15 的整型。

  1. Quartile

返回数据集的四分位数。四分位数通常用于在销售额和测量数据中对总体进行分组。例如,可以使用函数 QUARTILE 求得总体中前 25% 的收入值。

  1. QueryTable

返回一个 QueryTable 对象,该对象代表与指定 Range 对象相交的查询表
本示例刷新与第一张工作表上的 A10 单元格相交的 QueryTable 对象。
Worksheets(1).Range("a10").QueryTable.Refresh

  1. QueryTables

返回 QueryTables 集合,该集合代表指定工作表中的所有查询表
本示例刷新第一张工作表上的所有查询表。
For Each qt in Worksheets(1).QueryTables
    qt.Refresh
Next
本示例对查询表一进行设置,每当查询表刷新时就自动更新右侧的公式。
Sheets("sheet1").QueryTables(1).FillAdjacentFormulas = True

  1. QueryType

可表示 Microsoft Excel 生成查询表时所使用的查询类型。XlQueryType 类型,只读。

  1. QueryType

可表示 Microsoft Excel 在生成数据透视表缓存时所使用的查询类型。XlQueryType 类型,只读。

  1. Quit

退出 Microsoft Excel
本示例保存所有打开的工作簿,然后退出 Microsoft Excel。
For Each w In Application.Workbooks
    w.Save
Next w
Application.Quit

  1. Quotient

返回商的整数部分,该函数可用于舍掉商的小数部分。

  1. RadarAxisLabels

返回一个 TickLabels 对象,该对象表示指定图表组的雷达图坐标轴标签。只读。

  1. RadarGroups

返回代表二维图表上单个雷达图图表组或雷达图图表组集合的对象
本示例设置 Chart1 中的第一个雷达图组,使其中的每一数据标志都使用不同的颜色。本示例应在二维图表上运行。
Charts("Chart1").RadarGroups(1).VaryByCategories = True

  1. Radians

将度转换为弧度。

  1. RadioGroupSelection

设置或返回一个 Long,代表在智能文档的一组单选按钮控件中选定的项目的索引号。可读写。

  1. RaiseEvent

引发在一个类、窗体、或者文档中的模块级中声明的一个事件。
语法
RaiseEvent eventname [(argumentlist)]
必需的 eventname 是在模块 中声明的,并且符合 Basic 变量命名约定的一个事件的名称。
Eventname 必需的。所引发的事件的名称。
Argumentlist 可选的。用逗号分隔的变量、数组,或者表达式的列表。argumentlist 必须用圆括号括起来。如果没有参数,则圆括号必须被忽略。

  1. RandBetween

返回介于指定的两个数字之间的一个随机整数。每次计算工作表时都将返回一个新的随机整数。

  1. Randomize

初始化随机数生成器。
语法
Randomize [number]
可选的 number 参数是 Variant 或任何有效的数值表达式。

  1. Range

返回一个Range对象,该对象代表一个单元格或单元格区域
本示例在 Sheet1 的 A1 单元格中创建一个公式。
Worksheets("Sheet1").Range("A1").Formula = "=10*RAND()"
本示例在 Sheet1 的单元格区域 A1:D10 上进行循环。如果某个单元格的值小于 0.001,则此代码将用 0(零)来取代该值。
For Each c in Worksheets("Sheet1").Range("A1:D10")
    If c.Value < .001 Then
        c.Value = 0
    End If
Next c

  1. Range

代表某一单元格、某一行、某一列、某一选定区域(该区域可包含一个或若干连续单元格区域),或者某一三维区域。

  1. Range

返回一个 Range 对象,该对象代表一个单元格或单元格区域
本示例在 Sheet1 的单元格区域 A1:D10 上进行循环。如果某个单元格的值小于 0.001,则此代码将用 0(零)来取代该值。
For Each c in Worksheets("Sheet1").Range("A1:D10")
    If c.Value < .001 Then
        c.Value = 0
    End If
Next c

  1. Range

代表某一单元格、某一行、某一列、某一选定区域(该区域可包含一个或若干连续单元格区域),或者某一三维区域
Range 集合用法
本部分将说明下列返回 Range 对象的属性和方法:
Range 属性
Cells 属性
Range 和 Cells
Offset 属性
Union 方法

  1. Range

返回一个 Range 对象,该对象代表一个单元格或单元格区域
本示例将 Sheet1 上 A1 单元格的值设置为 3.14159。
Worksheets("Sheet1").Range("A1").Value = 3.14159
本示例在 Sheet1 的 A1 单元格中创建一个公式。
Worksheets("Sheet1").Range("A1").Formula = "=10*RAND()"

  1. Range

返回一个 Range 对象,它代表附加的指定超链接的区域。

  1. Range

返回一个 ShapeRange 对象,它代表 Shapes 集合中形状的子集。
语法
表达式.Range(Index)
表达式   一个代表 Shapes 对象的变量。
参数
名称 必选/可选 数据类型 描述
Index 必选 Variant 包含在该区域中的各单个形状。可以是指定形状索引号的整数、指定形状名称的字符串,也可以是包含整数或字符串的数组。

  1. Range

返回一个 Range 对象,它代表指定智能标记的应用区域。

  1. Range

返回一个 Range 代表,它代表在受保护工作表上可编辑的区域的子集。

  1. Range

返回一个 Range 对象,它代表应用指定的“自动筛选”的区域。

  1. RangeFromPoint

返回位于屏幕上指定坐标位置的 Shape 或 Range 对象
如果图形为图表、线条或图片,则本示例立即在鼠标指针下方返回该图形的可选文字。
Private Function AltText(ByVal intMouseX As Integer, _
        ByVal intMouseY as Integer) As String
    Set objShape = ActiveWindow.RangeFromPoint _
        (x:=intMouseX, y:=intMouseY)
    If Not objShape Is Nothing Then
        With objShape
            Select Case .Type
                Case msoChart, msoLine, msoPicture:
                    AltText = .AlternativeText
                Case Else:
                    AltText = ""
            End Select
        End With
    Else
        AltText = ""
    End If
End Function

  1. RangeFromPoint

返回位于屏幕上指定坐标位置的 Shape 或 Range 对象。如果指定坐标位置上没有任何形状,则此方法将返回 Nothing。
语法
表达式.RangeFromPoint(x, y)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
x 必选 Long 表示从顶部开始到屏幕左边缘的水平距离的值(以像素为单位)。
y 必选 Long 表示从左侧开始到屏幕顶部的垂直距离的值(以像素为单位)。
返回值
Object

  1. RangeSelection

返回一个 Range 对象,该对象代表指定窗口的工作表中的选定单元格(即使指定工作表中有图形对象处于活动状态,或者已选定图形对象)。
本示例显示在当前窗口的工作表中选定的单元格区域的地址。
MsgBox ActiveWindow.RangeSelection.Address

  1. RangeSelection

返回一个 Range 对象,该对象表示指定窗口中工作表上的选定单元格,即使工作表上一个图形对象是活动或选定的。只读。
语法
表达式.RangeSelection
表达式   一个代表 Window 对象的变量。

  1. Rank

返回一个数字在数字列表中的排位。数字的排位是其大小与列表中其他值的比值(如果列表已排过序,则数字的排位就是它当前的位置)。

  1. Rate

返回一个 Double,指定每一期的年金利率。
语法
Rate(nper, pmt, pv[, fv[, type[, guess]]])
nper 必要。Double 指定一笔年金的付款总期数。例如,如果对一笔为期四年的汽车贷款选择按月付款,则贷款共有 4 * 12(或 48)个付款期。
pmt 必要。Double,指定每一期的付款金额。付款金额通常包含本金和利息,且此付款金额在年金的有效期间不变。
pv 必要。Double 指定未来一系列付款或收款的现值。例如,当贷款买一辆汽车时,向贷方所借贷的金额为将来每月偿付给贷方款项的现值。
fv 可选。Variant 指定在付清贷款后所希望的未来值或现金结存。例如,贷款的未来值在贷款付清后为 0 美元。但是,如果想要在 18 年间存下 50,000 美元作为子女教育基金,那么 50,000 美元为未来值。如果省略的话,缺省值为 0。
type 可选。Variant,指定贷款到期时间,如果贷款是在贷款周期结束时到期,则请使用 0。如果贷款是在周期开始时到期,则请使用 1。如果省略的话,缺省值为 0。
guess 可选。Variant 指定 Rate 返回的估算值。如果省略,则 guess 为 0.1 (10%)。

  1. Rate

返回年金的各期利率。函数 RATE 通过迭代法计算得出,并且可能无解或有多个解。如果在进行 20 次迭代计算后,函数 RATE 的相邻两次结果没有收敛于 0.0000001,则函数 RATE 将返回错误值 #NUM!。

  1. rea3DGroup

返回 ChartGroup 对象,该对象代表三维图表上的面积图组。
本示例打开三维面积图图表组的垂直线。
Charts(1).Area3DGroup.HasDropLines = True

  1. ReadingOrder

返回或设置指定对象的阅读次序
本示例将 Chart1 的图表标题阅读顺序设置为从右到左。
Charts("Chart1").ChartTitle.ReadingOrder = xlRTL

  1. ReadingOrder

返回或设置指定对象的阅读次序。可为以下常量之一:xlRTL(从右到左)、xlLTR(从左到右)或 xlContext。Long 类型,可读写。
语法
表达式.ReadingOrder
表达式   一个代表 Style 对象的变量。

  1. ReadingOrder

返回或设置指定对象的阅读次序。可为以下常量之一:xlRTL(从右到左)、xlLTR(从左到右)或 xlContext。Long 类型,可读写。

  1. ReadOnly

如果对象以只读方式打开,则返回 True
如果当前工作簿是只读的,则本示例将此工作簿另存为 Newfile.xls。
If ActiveWorkbook.ReadOnly Then
    ActiveWorkbook.SaveAs fileName:="NEWFILE.XLS"
End If

  1. ReadOnlyRecommended

如果指定工作簿是以建议只读方式保存,则该值为 True
本示例检查当前工作簿是否含有建议只读信息,如果有,则显示一条信息。
If ActiveWorkbook.ReadOnlyRecommended = True Then
    MsgBox "This workbook is saved as read-only recommended"
End If

  1. Ready

当 Microsoft Excel应用程序就绪时,返回 True,未就绪时,返回 False
在本示例中,Microsoft Excel 检查 Ready 属性是否设置为 True,如果是,就显示“应用程序就绪”的消息。否则,Excel 显示“应用程序未就绪”的消息。
Sub UseReady()
    If Application.Ready = True Then
        MsgBox "Application is ready."
    Else
        MsgBox "Application is not ready."
    End If
End Sub

  1. Received

返回完全投资型债券到期收回的金额。

  1. Received

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. RecentFiles

返回一个 RecentFiles 集合,该集合代表最近使用的文件清单
本示例将最近使用的文件清单中的最多文件数设为 6。
Application.RecentFiles.Maximum = 6

  1. RecentFiles

代表最近使用文件的列表
可用 RecentFiles 属性返回 RecentFiles 集合。下例设置了最近使用过的文件(位于列表中)的最大数目。
Application.RecentFiles.Maximum = 6

  1. RecheckSmartTags

使得前景智能标记检查自动出现,对以前没有注释过的数据进行注释。
本示例重新检查前景中活动工作簿上的智能标记。
Sub UseRecheckSmartTags()
    ActiveWorkbook.RecheckSmartTags
End Sub

  1. Recipients

返回或设置传送名单上的收件人。

  1. Recognize

如果数据可识别为智能标记,则返回 True。Boolean 类型,可读写。

  1. RecordCount

返回数据透视表缓存中的记录数目或包含指定内容的缓存记录数目。Long 型,只读。

  1. RecordMacro

如果宏记录程序正在运行,则记录下相应代码
本示例录制 Visual Basic 代码。
Application.RecordMacro BasicCode:="Application.Run ""MySub"" "

  1. RecordRelative

如果以相对引用录制宏,则该值为 True; 如果以绝对引用录制宏,则该值为 False
本示例检查 RecordRelative 的值,如果该值为 False,则以A1样式显示 Sheet1 的活动单元格地 址;如果该值为 True,则以 R1C1 样式显示。
Worksheets("Sheet1").Activate
If Application.RecordRelative = False Then
    MsgBox ActiveCell.Address(ReferenceStyle:=xlA1)
Else
    MsgBox ActiveCell.Address(ReferenceStyle:=xlR1C1)
End If

  1. Recordset

返回或设置一个 Recordset 对象,该对象用作指定查询表的数据源。

  1. Recordset

返回或设置一个 Recordset 对象,该对象作为指定查询表的数据源。可读写。

  1. ReDim

在过程级别中使用,用于为动态数组变量重新分配存储空间。
语法
ReDim [Preserve] varname(subscripts) [As type] [, varname(subscripts) [As type]] . . .
Preserve 可选的。关键字,当改变原有数组最末维的大小时,使用此关键字可以保持数组中原来的数据。
varname 必需的。变量的名称;遵循标准的变量命名约定。
subscripts 必需的。数组变量的维数;最多可以定义 60 维的多维数组。subscripts 参数使用下面的语法:
  [lower To] upper [,[lower To] upper] . . .
如果不显式指定 lower,则数组的下界由 Option Base 语句控制。如果没有 Option Base 语句则下界为 0。
type 可选的。变量的数据类型;可以是 Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(对变长的字符串)、String * length(对定长的字符串)、Object、Variant、用户定义类型或对象类型。所声明的每个变量都要有一个单独的 As type 子句。对于包含数组的 Variant 而言,type 描述的是该数组的每个元素的类型,不能将此 Variant 改为其它类型。

  1. Reduced

如果“Office 助手”窗口以较小的大小出现,则为 True。可读/写。

  1. ReferenceStyle

返回或设置 Microsoft Excel 是以 A1 引用样式还是以 R1C1 引用样式显示单元格引用和行、列标题
本示例显示当前引用样式。
If Application.ReferenceStyle = xlR1C1 Then
    MsgBox ("Microsoft Excel is using R1C1 references")
Else
    MsgBox ("Microsoft Excel is using A1 references")
End If

  1. RefersTo

用宏语言以 A1 样式表示法返回或设置名称所引用的公式(以等号开头)。String 类型,可读写。
语法
表达式.RefersTo
表达式   一个代表 Name 对象的变量

  1. RefersToLocal

返回或设置指定名称所引用的公式。公式以等号开头,由用户语言和 A1-样式引用组成。String 类型,可读写。
语法
表达式.RefersToLocal
表达式   一个代表 Name 对象的变量。

  1. RefersToR1C1

返回或设置指定名称所引用的公式。公式以等号开头,由宏语言和 R1C1-样式引用组成。String 类型,可读写。
语法
表达式.RefersToR1C1
表达式   一个代表 Name 对象的变量。

  1. RefersToR1C1Local

返回或设置指定名称所引用的公式。公式以等号开头,由用户语言和 R1C1-样式引用组成。可读/写 String 类型。
语法
表达式.RefersToR1C1Local
表达式   一个代表 Name 对象的变量。

  1. RefersToRange

返回由 Name 对象引用的 Range 对象。只读。
语法
表达式.RefersToRange
表达式   一个代表 Name 对象的变量。

  1. Reflection

返回指定形状的 ReflectionFormat 对象,该对象包含形状的映像格式属性。只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.Reflection
表达式   一个代表 Shape 对象的变量。

  1. Refresh

更新 Chart 对象的高速缓存
本示例刷新工作簿中第一个工作表上的第一个数据透视表的数据透视表高速缓存。
Worksheets(1).PivotTables(1).PivotCache.Refresh

  1. Refresh

更新外部数据区域 (QueryTable)。

  1. Refresh

立即重新绘制指定的图表。

  1. RefreshAll

刷新指定工作簿中的所有外部数据区域和数据透视表
本示例刷新第三个工作簿中的所有外部数据区域和数据透视表。
Workbooks(3).RefreshAll

  1. RefreshDate

返回数据透视表或缓存最近一次刷新的日期。Date 型,只读。

  1. RefreshDate

返回缓存最近一次刷新的日期。Date 型,只读。

  1. Refreshing

如果指定的查询表正在进行后台查询,则为 True。可读/写 Boolean 类型。

  1. RefreshName

返回最近一次刷新数据透视表的人员的名字。String 型,只读。

  1. RefreshName

返回最近一次刷新数据透视表缓存的人员的名字。String 型,只读。

  1. RefreshOnChange

如果每次更改参数查询的参数值时都要刷新指定的查询表,则该属性值为 True。Boolean 类型,可读写。

  1. RefreshOnFileOpen

如果每次打开工作簿时,数据透视表高速缓存或查询表自动更新,则为 True。默认值为 False。Boolean 类型,可读写。

  1. RefreshOnFileOpen

如果每次打开工作簿时,数据透视表缓存都自动进行更新,则为 True。默认值为 False。Boolean 类型,可读写。

  1. RefreshPeriod

返回或设置两次刷新之间的时间间隔。Long 型,可读写。

  1. RefreshStyle

返回或设置在指定工作表中插入或删除行的方式,以适应查询返回的记录集的行数。XlCellInsertionMode 类型,可读写。

  1. RefreshTable

用源数据刷新数据透视表。如果成功,则该值为 True。

  1. RegisteredFunctions

返回在动态链接库或代码资源中的用 REGISTER 或 REGISTER.ID 宏函数登记的函数信息

  1. RegisterXLL

载入XLL代码源,并自动注册该代码源中包含的函数和命令
本示例载入一个 XLL 文件并注册该文件中的函数和命令。
Application.RegisterXLL "XLMAPI.XLL"

  1. RejectAllChanges

取消指定的共享工作簿中的所有更改。
本示例取消活动工作簿中的所有更改。
ActiveWorkbook.RejectAllChanges

  1. ReleaseFocus

释放所有命令栏的用户界面焦点。
语法
表达式.ReleaseFocus
表达式   一个代表 CommandBars 对象的变量。

  1. ReloadAs

使用指定的文档编码方式,重新装入一个基于 HTML 文档的工作簿
本示例使用 Western 文档编码方式重新装入第一个工作簿。
Workbooks(1).ReloadAs Encoding:=msoEncodingWestern

  1. RelyOnCSS

如果在 Web 浏览器中查看保存的文档时,字体格式使用的是级联样式表 (CSS),则为 True。Microsoft Excel 会创建一个级联样式表文件,然后依据 OrganizeInFolder 属性的值,将该文件保存到指定文件夹或与网页相同的文件夹中。如果使用了 HTML <FONT> 标记和级联样式表,则为 False。默认值是 True。Boolean 类型,可读写。

  1. RelyOnVML

如果为 True,将文档保存为网页时,图形对象不能生成图像文件。如果为 False,则可生成图像文件。默认值是 False。Boolean 类型,可读写。

  1. Rem

用来在程序中包含注释。
语法
Rem comment
也可以使用如下语法:
' comment
comment 参数是可选的,指要包括的任何注释文本。在 Rem 关键字与 comment 之间要加一个空格。

  1. RemoveAllItems

删除 Microsoft Excel 列表框或组合框中的所有数据项。

  1. RemoveItem

从列表框或组合框中删除一个或多个数据项。

  1. RemovePersonalInformation

如果能从指定的工作簿中删除个人信息,则该值为 True
在本示例中,Microsoft Excel 判断是否能从指定的工作簿中删除个人信息,并通知用户。
Sub UsePersonalInformation()
    Dim wkbOne As Workbook
    Set wkbOne = Application.ActiveWorkbook
    ' Determine settings and notify user.
    If wkbOne.RemovePersonalInformation = True Then
        MsgBox "Personal information can be removed."
    Else
        MsgBox "Personal information cannot be removed."
    End If
End Sub

  1. RemoveSubtotal

删除数据清单中的分类汇总
本示例删除工作表 Sheet1 上单元格区域 A1:G37 的分类汇总。本示例应在包含分类汇总的数据清单上运行。
Worksheets("Sheet1").Range("A1:G37").RemoveSubtotal

  1. RemoveUser

断开指定用户与共享工作簿的连接
本示例断开第二个用户与共享工作簿的连接
Workbooks(2).RemoveUser 2

  1. Repeat

重复最后一次用户界面操作
本示例重复最近用户界面命令。本示例必须放在宏的第一行。
Application.Repeat

  1. RepeatItemsOnEachPrintedPage

当打印指定的数据透视表时,如果每页第一行上都显示行、列和项标志,则该值为 True。如果仅在第一页上打印这些标志,则该值为 False。默认值为 True。Boolean 类型,可读写。

  1. Replace

返回 Boolean 类型,指示指定区域内单元格中的字符
本示例将每个“SIN”三角函数都替换为“COS”函数。替换所进行的区域为工作表 Sheet1 中的 A 列。
Worksheets("Sheet1").Columns("A").Replace _
    What:="SIN", Replacement:="COS", _
    SearchOrder:=xlByColumns, MatchCase:=True

  1. Replace

返回一个字符串,该字符串中指定的子字符串已被替换成另一子字符串,并且替换发生的次数也是指定的。
语法
Replace(expression, find, replace[, start[, count[, compare]]])
expression 必需的。字符串表达式,包含要替换的子字符串。
find 必需的。要搜索到的子字符串。
replace 必需的。用来替换的子字符串。
start 可选的。在表达式中子字符串搜索的开始位置。如果忽略,假定从1开始。
count 可选的。子字符串进行替换的次数。如果忽略,缺省值是 –1,它表明进行所有可能的替换。
compare 可选的。数字值,表示判别子字符串时所用的比较方式。关于其值,请参阅“设置值”部分。

  1. Replace

根据指定的字符数,将文本字符串的部分用其他文本字符串替换。

  1. ReplaceB

REPLACEB 根据指定的字节数用一个文本字符串替换另一个文本字符串中的部分字符。

  1. ReplaceFormat

设置替换条件以用于替换单元格格式
在下例中,设置了搜索条件以查找文字为 Arial、常规和 10 号字体的单元格,然后调用 Replace 方法,并将 SearchFormat 和 ReplaceFormat 的可选参数设置为 True 以便进行更改。
Sub MakeBold()
    ' Establish search criteria.
    With Application.FindFormat.Font
        .Name = "Arial"
        .FontStyle = "Regular"
        .Size = 10
    End With
    ' Establish replacement criteria.
    With Application.ReplaceFormat.Font
        .Name = "Arial"
        .FontStyle = "Bold"
        .Size = 8
    End With
    ' Notify user.
    With Application.ReplaceFormat.Font
        MsgBox .Name & "-" & .FontStyle & "-" & .Size & _
            " font is what the search criteria will replace cell formats with."
    End With
    ' Make the replacements in the worksheet.
    Cells.Replace What:="", Replacement:="", _
        SearchFormat:=True, ReplaceFormat:=True
End Sub

  1. ReplacementList

返回“自动更正”替换内容的数组。
语法
表达式.ReplacementList(Index)
表达式   一个代表 AutoCorrect 对象的变量。

  1. ReplaceText

如果“自动更正”替换内容将被自动替换,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.ReplaceText
表达式   一个代表 AutoCorrect 对象的变量。

  1. Reply

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. ReplyAll

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. ReplyWithChanges

向已发送候审的工作簿的作者发送电子邮件消息,通知审阅者已经完成工作簿的审阅。
本示例自动向审阅工作簿的作者发送一个通知,告知审阅者已完成对该工作簿的审阅,而不是先显示给审阅者的电子邮件消息。本示例假定活动工作簿是协作审阅循环的一部分。
Sub ReplyMsg()
    ActiveWorkbook.ReplyWithChanges ShowMessage:=False
End Sub

  1. Rept

按照给定的次数重复显示文本。可以通过函数 REPT 来不断地重复显示某一文本字符串,对单元格进行填充。

  1. RerouteConnections

此方法将重排连接在指定形状上的所有连接符;如果指定的形状是连接符,就重排该连接符。
语法
表达式.RerouteConnections
表达式   一个代表 Shape 对象的变量。

  1. Reset

关闭所有用 Open 语句打开的磁盘文件。
语法
Reset
说明
Reset 语句关闭 Open 语句打开的所有活动文件,并将文件缓冲区的所有内容写入磁盘。

  1. Reset

将内置命令栏重置为其默认配置。
语法
表达式.Reset
表达式   一个代表 CommandBar 对象的变量。

  1. Reset

重新设置传送名单,从而可用同一名单初始化一个新的传送过程(使用同一收件人列表和收件人地址信息)。使用本方法之前,该传送过程必须已完成。否则本方法将导致错误。

  1. ResetAllPageBreaks

重新设置指定工作表上的所有分页符
本示例重新设置第一个工作表上的所有分页符。
Worksheets(1).ResetAllPageBreaks

  1. ResetColors

将调色板重新设为默认颜色。
本示例将当前活动工作簿的调色板重新设为默认颜色。
ActiveWorkbook.ResetColors

  1. ResetPositionsSideBySide

重置正在进行并排比较的两个工作表窗口的位置。
expression.ResetPositionsSideBySide()
expression必需。该表达式返回“应用于”列表中的对象之一

  1. ResetTimer

重新设置指定的查询表或数据透视表的刷新计时器,使其时间间隔等于上次使用 RefreshPeriod 属性设置的时间间隔。

  1. ResetTips

重新设置将显示在“Office 助手”气球中的应用程序提示。

  1. Resize

调整指定区域的大小
本示例调整 Sheet1 中选定区域的大小,使之增加一行和一列。
Worksheets("Sheet1").Activate
numRows = Selection.Rows.Count
numColumns = Selection.Columns.Count
Selection.Resize(numRows + 1, numColumns + 1).Select

  1. Resize

调整图表大小时,将产生本事件。
本示例使调整图表大小时,图表的左上角位置保持不变。
Private Sub myChartClass_Resize()
    With ActiveChart.Parent
        .Left = 100
        .Top = 150
    End With
End Sub

  1. ResultRange

返回一个 Range 对象,该对象代表指定查询表所覆盖的工作表区域。只读。

  1. Resume

在错误处理程序结束后,恢复原有的运行。
语法
Resume [0]
Resume Next
Resume line
Resume 如果错误和错误处理程序出现在同一个过程中,则从产生错误的语句恢复运行。如果错误出现在被调用的过程中,则从最近一次调用包含错误处理程序的过程的语句处恢复运行。
Resume Next 如果错误和错误处理程序出现在同一个程序中,则从紧随产生错误的语句的下个语句恢复运行。如果错误发生在被调用的过程中,则对最后一次调用包含错误处理程序的过程的语句(或 On Error Resume Next 语句),从紧随该语句之后的语句处恢复运行。
Resume line 在必要的 line 参数指定的 line 处恢复运行。line 参数是行标签或行号,必须和错误处理程序在同一个过程中。

  1. ReturnWhenDone

如果传送过程结束后,工作簿返回给发件人,则该属性值为 True。Boolean 类型,可读写。

  1. ReversePlotOrder

如果 Microsoft Excel 的绘图区数据点的顺序为从后往前,则该属性值为 True。Boolean 类型,可读写。

  1. RevisionNumber

返回指定工作簿以共享清单方式打开后已保存的次数
本示例使用修订号判断活动工作簿是否以独占模式打开。如果是则本示例以共享清单方式保存该工作簿。
If ActiveWorkbook.RevisionNumber = 0 Then
    ActiveWorkbook.SaveAs _
        filename:=ActiveWorkbook.FullName, _
        accessMode:=xlShared, _
        conflictResolution:= _
            xlOtherSessionChanges
End If

  1. RGB

返回一个 Long整数,用来表示一个 RGB 颜色值。
语法
RGB(red, green, blue)
red 必要参数;Variant (Integer)。数值范围从 0 到 255,表示颜色的红色成份。
green 必要参数;Variant (Integer)。数值范围从 0 到 255,表示颜色的绿色成份。
blue 必要参数;Variant (Integer)。数值范围从 0 到 255,表示颜色的兰色成份。

  1. Right

返回 Variant (String),其中包含从字符串右边取出的指定数量的字符。
语法
Right(string, length)
string 必要参数。字符串表达式,从中最右边的字符将被返回。如果 string 包含 Null,将返回 Null。
length 必要参数;为 Variant (Long)。为数值表达式,指出想返回多少字符。如果为 0,返回零长度字符串 ("")。如果大于或等于 string 的字符数,则返回整个字符串。

  1. RightAngleAxes

如果图表的坐标轴为直角,并与图表的转角或仰角无关,则该值为 True。
本示例设置 Chart1 中坐标轴夹角为直角。本示例应在三维图表上运行。
Charts("Chart1").RightAngleAxes = True

  1. RightFooter

返回或设置页面右边缘与页脚右边界之间的距离(以磅为单位)。可读/写 String 类型。

  1. RightFooterPicture

返回一个 Graphic 对象,该对象代表页脚右边的图片,用于设置图片的属性。

  1. RightHeader

返回或设置页眉的右边部分内容。可读/写 String 类型。

  1. RightHeaderPicture

指定右页眉中应显示的图形图像。只读。

  1. RightMargin

以磅为单位返回或设置右边距的大小。Double 类型,可读写。

  1. RmDir

删除一个存在的目录或文件夹。
语法
RmDir path
必要的 path 参数是一个字符串表达式,用来指定要删除的目录或文件夹。path 可以包含驱动器。如果没有指定驱动器,则 RmDir 会在当前驱动器上删除目录或文件夹。

  1. Rnd

返回一个包含随机数值的 Single。
语法
Rnd[(number)]
可选的 number 参数是 Single 或任何有效的数值表达式。

  1. RobustConnect

返回或设置数据透视表缓存与其数据源连接的方式。XlRobustConnect 类型,可读写。

  1. RollZoom

如果使用智能鼠标进行缩放而不是滚动,则该值为 True
本示例将智能鼠标的功能设置为缩放,不进行滚动。
Application.RollZoom = True

  1. Roman

将阿拉伯数字转换为文本形式的罗马数字。

  1. RootElementName

返回一个 String 类型的数值,该数值表示指定 XML 架构映射的根元素的名称。只读。

  1. RootElementNamespace

返回一个 XmlNamespace 对象,该对象表示指定的 XML 架构映射的根元素。只读。

  1. RotatedChars

如果指定艺术字对象中的字符相对于该对象旋转了 90 度,则该值为 True。如果指定艺术字对象中的字符相对于该对象保持原有方向,则该值为 False。MsoTriState 类型,可读/写。

  1. RotateWithObject

返回或设置是否随对象旋转。可读/写 MsoTriState 类型。

  1. RotateWithShape

返回或设置一个 MsoTriState 类型的值,该值表示是否在旋转形状时旋转阴影。可读/写。

  1. Rotation

Chart 对象:以度为单位返回或设置三维图表视图的转角(图形区绕 Z 轴的转角)。
本示例将第一张图表的转角设置为 30 度。本示例应在三维图表中运行。
Charts("Chart1").Rotation = 30

  1. Rotation

返回或设形状的旋转角度(以度为单位)。Single 型,可读写。
语法
表达式.Rotation
表达式   一个代表 Shape 对象的变量。

  1. Round

返回一个数值,该数值是按照指定的小数位数进行四舍五入运算的结果。
语法
Round(expression [,numdecimalplaces])
expression 必需的。要进行四舍五入运算的数值表达式。
numdecimalplaces 可选的。数字值,表示进行四舍五入运算时,小数点右边应保留的位数。如果忽略,则Round函数返回整数。

  1. Round

将数字舍入到指定位数。

  1. RoundDown

将数字向零的方向向下舍入。

  1. RoundedCorners

如果嵌入式图表使用圆角,则为 True。Boolean 类型,可读写。

  1. RoundUp

将数字向远离 0(零)的方向向上舍入。

  1. Route

使用工作簿的当前传送名单传送工作簿
本示例为“Book1.xls”创建一个传送名单,然后将该工作簿逐个传送给三个收信人。
Workbooks("BOOK1.XLS").HasRoutingSlip = True
With Workbooks("BOOK1.XLS").RoutingSlip
    .Delivery = xlOneAfterAnother
    .Recipients = Array("Adam Bendel", _
        "Jean Selva", "Bernard Gabor")
    .Subject = "Here is BOOK1.XLS"
    .Message = "Here is the workbook. What do you think?"
End With
Workbooks("BOOK1.XLS").Route

  1. Routed

如果指定工作簿已经传送给下一个收件人,则该值为 True
本示例将指定工作簿传送给下一个收件人。
If ActiveWorkbook.HasRoutingSlip And _
    Not ActiveWorkbook.Routed Then
        ActiveWorkbook.Route
End If

  1. RoutingSlip

返回一个 RoutingSlip 对象,该对象代表指定工作簿的传送名单
本示例为“Book1.xls”创建一个传递名单,然后将该工作簿逐个传送给三个收件人。
Workbooks("BOOK1.XLS").HasRoutingSlip = True
With Workbooks("BOOK1.XLS").RoutingSlip
    .Delivery = xlOneAfterAnother
    .Recipients = Array("Adam Bendel", _
        "Jean Selva", "Bernard Gabor")
    .Subject = "Here is BOOK1.XLS"
    .Message = "Here is the workbook. What do you think?"
End With
Workbooks("BOOK1.XLS").Route

  1. RoutingSlip

代表工作簿的传送名单。传送名单用于在电子邮件系统中发送工作簿。

  1. Row

返回区域中第一个子区域的第一行的行号
本示例将工作表 sheet1 中每隔一行的行高设置为 4 磅。
For Each rw In Worksheets("Sheet1").Rows
    If rw.Row Mod 2 = 0 Then
        rw.RowHeight = 4
    End If
Next rw

  1. RowAxisLayout

此方法用于同时为所有现有的透视字段设置版式选项。

  1. RowColSettings

如果自定义视图包括对隐藏行和隐藏列(包括筛选信息)的设置,则该属性值为 True。Boolean 类型,只读。

  1. RowDifferences

返回Range对象,该对象代表每行中所有与比较单元格内容不同的单元格
本示例选定工作表 Sheet1 上第一行中与单元格 D1 内容不同的单元格。
Worksheets("Sheet1").Activate
Set c1 = ActiveSheet.Rows(1).RowDifferences( _
    comparison:=ActiveSheet.Range("D1"))
c1.Select

  1. RowFields

返回一个对象,该对象表示数据透视表中的单个字段(PivotField 对象),或者当前未显示为行字段的所有字段的一个集合(PivotFields 对象)。只读。

  1. RowGrand

如果数据透视表显示行的总数,则该属性值为 True。Boolean 类型,可读写。

  1. RowHeight

以磅为单位返回或设置指定区域中所有行的行宽
本示例使工作表 sheet1 上第一行的行高加倍。
With Worksheets("Sheet1").Rows(1)
    .RowHeight = .RowHeight * 2
End With

  1. RowIndex

获取或设置一个命令栏相对于同一停靠区域中其他命令栏的停靠顺序。该属性值可以是大于零的整数,也可以是以下 MsoBarRow 常量之一:msoBarRowFirst 或 msoBarRowLast。可读写。
语法
表达式.RowIndex
表达式   一个代表 CommandBar 对象的变量。

  1. RowNumbers

如果行号作为第一列添加到指定查询表,则该属性值为 True。Boolean 类型,可读写。

  1. RowRange

返回一个 Range 对象,该对象表示包括数据透视表上行区域的区域。只读。

  1. Rows

对于Application对象,返回代表活动工作表所有行的 Range 对象
本示例删除 Sheet1 的第三行。
Worksheets("Sheet1").Rows(3).Delete

  1. Rows

对于 Worksheet 对象,返回代表指定工作表所有行的 Range 对象
本示例删除 Sheet1 的第三行。
Worksheets("Sheet1").Rows(3).Delete

  1. Rows

对于 Application 对象,返回代表活动工作表所有行的 Range 对象
本示例删除 Sheet1 的第三行。
Worksheets("Sheet1").Rows(3).Delete

  1. Rset

在一字符串变量中将一字符串往右对齐。
语法
RSet stringvar = string
stringvar 必要参数。为字符串变量名。
String 必要参数。在 stringvar 内想往右对齐的字符串表达式。

  1. RSq

返回根据 known_y's 和 known_x's 中数据点计算得出的 Pearson 乘积矩相关系数的平方。有关详细信息,请参阅函数 PEARSON。R 平方值可以解释为 y 方差与 x 方差的比例。

  1. RTD

返回一个 RTD 对象。
expression.RTD
expression必需。该表达式返回一个 Application 对象。

  1. RTD

本方法与源连接以接收实时数据。

  1. Run

运行一个宏或者调用一个函数
本示例示范如何调用宏表“Mycustom.xlm”(必须先打开此宏表〕中定义的宏函数 My_Func_Sum。此函数带两个数值型参数(此例中为 1 和 5)。
mySum = Application.Run("MYCUSTOM.XLM!My_Func_Sum", 1, 5)
MsgBox "Macro result: " & mySum

  1. Run

在该处运行 Microsoft Excel 宏
本示例示范如何调用宏表“Mycustom.xlm”(必须先打开此宏表〕中定义的宏函数 My_Func_Sum。此函数带两个数值型参数(此例中为 1 和 5)。
mySum = Application.Run("MYCUSTOM.XLM!My_Func_Sum", 1, 5)
MsgBox "Macro result: " & mySum

  1. RunAutoMacros

运行附属于指定工作簿的 Auto_Open、Auto_Close、Auto_Activate 或 Auto_Deactivate 宏。保留本方法是为了保持向后兼容性
本示例打开 Analysis.xls 工作簿,然后运行 Auto_Open 宏。
Workbooks.Open "ANALYSIS.XLS"
ActiveWorkbook.RunAutoMacros xlAutoOpen
本示例对活动工作簿运行 Auto_Close 宏,然后关闭该工作簿。
With ActiveWorkbook
    .RunAutoMacros xlAutoClose
    .Close
End With

  1. Excel VBA属性、方法、事件大全——Part13(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. Save

保存指定工作簿所做的更改
本示例保存当前活动工作簿。
ActiveWorkbook.Save
本示例保存所有打开的工作簿,然后关闭 Microsoft Excel。
For Each w In Application.Workbooks
    w.Save
Next w
Application.Quit

  1. SaveAs

保存对不同文件中的工作表的更改。
本示例新建一个工作簿,提示用户输入文件名,然后保存该工作簿。
Set NewBook = Workbooks.Add
Do
    fName = Application.GetSaveAsFilename
Loop Until fName <> False
NewBook.SaveAs Filename:=fName

  1. SaveAs

保存对不同的文件中的图表或工作表的更改
本示例新建一个工作簿,提示用户输入文件名,然后保存该工作簿。
Set NewBook = Workbooks.Add
Do
    fName = Application.GetSaveAsFilename
Loop Until fName <> False
NewBook.SaveAs Filename:=fName

  1. SaveAs

保存对不同的文件中的图表或工作表的更改。
expression.SaveAs(FileName, FileFormat, Password, WriteResPassword, ReadOnlyRecommended, CreateBackup, AddToMru, TextCodepage, TextVisualLayout, Local)
expression必需。该表达式返回上述对象之一。

  1. SaveAsODC

将查询表缓存的源保存为“Microsoft Office 数据连接”文件。

  1. SaveAsODC

将数据透视表缓存的源保存为“Microsoft Office 数据连接”文件。

  1. SaveAsXMLData

将已映射到指定 XML 架构映射的数据导出到 XML 数据文件中
下例证实了 Excel 能够使用架构映射“Customer”导出数据,然后将映射到“Customer”架构映射的数据导出到名为“Customer Data.xml”的文件中。
Sub ExportAsXMLData()
    Dim objMapToExport As XmlMap
    Set objMapToExport = ActiveWorkbook.XmlMaps("Customer")
    If objMapToExport.IsExportable Then
        ActiveWorkbook.SaveAsXMLData "Customer Data.xml", objMapToExport
    Else
        MsgBox "Cannot use " & objMapToExport.Name & _
               "to export the contents of the worksheet to XML data."
    End If
End Sub

  1. SaveCopyAs

将指定工作簿的副本保存到文件,但不更改内存中的打开工作簿。
本示例保存当前活动工作簿的副本。
ActiveWorkbook.SaveCopyAs "C:\TEMP\XXXX.XLS"

  1. Saved

如果指定工作簿从上次保存至今未发生过更改,则该值为 True
本示例检查活动工作簿是否有未保存的更改,如果有,则显示一条信息。
If Not ActiveWorkbook.Saved Then
    MsgBox "This workbook contains unsaved changes."
End If
本示例通过将 Saved 属性设为 True 来关闭包含本段代码的工作簿,并放弃对该工作簿的任何更改。
ThisWorkbook.Saved = True
ThisWorkbook.Close

  1. SaveData

如果将数据透视表的数据随工作簿一起保存,则为 True。如果仅保存数据透视表的定义,则为 False。Boolean 类型,可读写。

  1. SaveData

如果数据透视表的数据随工作簿一起保存,则为 True。如果仅保存数据透视表的定义,则为 False。Boolean 类型,可读写。

  1. SaveDataSourceDefinition

如果要在保存工作簿的同时保存指定 XML 架构映射的数据源定义,则设为 True。默认值为 True。Boolean 类型,可读写。

  1. SaveHiddenData

当以网页保存文档时,如果也保存指定区域之外的数据,则该值为 True。此数据对于维护公式是很有必要的。如果指定区域之外的数据并不与网页一起保存,则该值为 False。默认值为 True。Boolean 类型,可读写。

  1. SaveLinkValues

如果 Microsoft Excel 保存指定工作簿的外部链接值,则该值为 True
本示例设置 Microsoft Excel 保存活动工作簿的外部链接值。
ActiveWorkbook.SaveLinkValues = True

  1. SaveNewWebPagesAsWebArchives

如果新的网页能够保存为 Web 档案,则该属性值为 True。Boolean 类型,可读写。

  1. SavePassword

如果将 ODBC 连接字符串中的密码信息与指定查询一起保存,则为 True。如果不保存密码信息,则该值为 False。Boolean 类型,可读写。

  1. SaveSetting

在 Windows 注册表中 或 (Macintosh中)应用程序初始化文件中的信息保存或建立应用程序项目。
语法
SaveSetting appname, section, key, setting
appname 必要。字符串表达式,包含应用程序或工程的名称,对这些应用程序或工程使用设置 在Macintosh中,这是System文件夹中Preferences文件夹中初始化文件的文件名。
section 必要。字符串表达式,包含区域名称,在该区域保存注册表项设置。
key 必要。字符串表达式,包含将要保存的注册表项设置的名称。
setting 必要。表达式,包含 key 的设置值。

  1. SaveWorkspace

保存当前工作区。
本示例将当前工作区保存为“saved workspace.xlw”。
Application.SaveWorkspace "saved workspace"

  1. ScaleHeight

按指定的比例调整形状的高度。对于图片和 OLE 对象,可以指定是相对于原有尺寸还是相对于当前尺寸来调整该形状。对于不是图片和 OLE 对象的形状,总是相对于其当前大小来调整高度。
语法
表达式.ScaleHeight(Factor, RelativeToOriginalSize, Scale)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
Factor 必选 Single 指定形状调整后的高度与当前或原始高度的比例。例如,若要将一个矩形放大百分之五十,请将此参数设为 1.5。
RelativeToOriginalSize 必选 MsoTriState 如果为 msoTrue,则相对于形状的原有尺寸来调整高度。如果该值为 msoFalse,则相对于形状的当前尺寸来调整高度。仅当指定的形状是图片或 OLE 对象时,才能将此参数指定为 msoTrue。
Scale 可选 Variant MsoScaleFrom 的常量之一,它指定调整形状大小时,该形状哪一部分的位置将保持不变。

  1. ScaleType

返回或设置数值轴的刻度类型。XlScaleType 类型,可读写。

  1. ScaleWidth

按指定的比例调整形状的宽度。对于图片和 OLE 对象,可以指定是相对于原有尺寸还是相对于当前尺寸来调整该形状。对于不是图片和 OLE 对象的形状,总是相对于其当前大小来调整宽度。
语法
表达式.ScaleWidth(Factor, RelativeToOriginalSize, Scale)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
Factor 必选 Single 指定形状调整后的宽度与当前或原始宽度的比例。例如,若要将一个矩形放大百分之五十,请将此参数设为 1.5。
RelativeToOriginalSize 必选 MsoTriState 如果为 False,则相对于形状的原有尺寸来调整宽度。仅当指定的形状是图片或 OLE 对象时,才能将此参数指定为 True。
Scale 可选 Variant MsoScaleFrom 的常量之一,它指定调整形状大小时,该形状哪一部分的位置将保持不变。

  1. ScaleWithDocHeaderFooter

返回或设置页眉和页脚是否在文档大小更改时随文档缩放。可读/写 Boolean 类型。

  1. Scenarios

返回一个对象,该对象既可代表工作表的单个方案(Scenario 对象)也可代表工作表的一个方案集合(Scenarios 对象)。
本示例设置工作表 Sheet1 的第一个方案的批注。
Worksheets("Sheet1").Scenarios(1).Comment = _
    "Worst-case July 1993 sales"

  1. Schemas

返回一个 XmlSchemas 集合,该集合表示指定的 XmlMap 对象所包含的架构。只读。

  1. ScopeType

返回或设置 XlPivotConditionScope 枚举的常量之一,该常量确定条件格式在应用于数据透视表图表时的范围。

  1. ScreenSize

返回或设置在 Web 浏览器中查看已保存文档时应使用的理想的最小屏幕大小(以像素为单位,宽度乘以高度)。可以是 MsoScreenSize 常量之一。默认常量是 msoScreenSize800x600。MsoScreenSize 类型,可读写。

  1. ScreenTip

返回或设置指定超链接的屏幕提示文字。String 类型,可读写。

  1. ScreenUpdating

如果屏幕更新功能是打开的,则该值为 True
本示例演示将屏幕更新关闭以后,系统如何加快代码的执行速度。本示例隔列隐藏 Sheet1 上的列,并保存其执行时间。第一次,示例隐藏列时,屏幕更新是打开的;第二次执行时,屏幕更新是关闭的。运行本示例时,可比较信息框中显示的两次执行时间
Dim elapsedTime(2)
Application.ScreenUpdating = True
For i = 1 To 2
    If i = 2 Then Application.ScreenUpdating = False
    startTime = Time
    Worksheets("Sheet1").Activate
    For Each c In ActiveSheet.Columns
        If c.Column Mod 2 = 0 Then
            c.Hidden = True
        End If
    Next c
    stopTime = Time
    elapsedTime(i) = (stopTime - startTime) * 24 * 60 * 60
Next i
Application.ScreenUpdating = True
MsgBox "Elapsed time, screen updating on: " & elapsedTime(1) & _
        " sec." & Chr(13) & _
        "Elapsed time, screen updating off: " & elapsedTime(2) & _
        " sec."

  1. Script

返回 Script 对象,该对象代表指定网页上的一段脚本或代码。如果该网页中不包含任何脚本,则没有返回内容。
语法
表达式.Script
表达式   一个代表 Shape 对象的变量。

  1. Scripts

返回 Scripts 集合,该集合中包含许多 Script 对象,这些对象代表保存为网页的指定文档中的脚本或代码段
本示例向活动工作表的 Scripts 集合中添加一个新的 VBScript 块。
Set objScrs = ActiveSheet.Scripts
Set objNewScr = objScrs.Add
objNewScr.Language = msoScriptLanguageVisualBasic

  1. Scripts

返回 Scripts 集合,该集合中包含许多 Script 对象,这些对象代表保存为网页的指定文档中的脚本或代码段。
本示例向活动工作表的 Scripts 集合中添加一个新的 VBScript 块。
Set objScrs = ActiveSheet.Scripts
Set objNewScr = objScrs.Add
objNewScr.Language = msoScriptLanguageVisualBasic

  1. ScrollArea

以 A1 样式的区域引用形式返回或设置允许滚动的区域
本示例设置第一张工作表的滚动区域。
Worksheets(1).ScrollArea = "a1:f10"

  1. ScrollColumn

返回或设置指定窗格或窗口最左边的列号
本示例将第三列移到窗口的最左侧。
Worksheets("Sheet1").Activate
ActiveWindow.ScrollColumn = 3

  1. ScrollColumn

返回或设置指定窗格或窗口最左边的列号。Long 型,可读写。
语法
表达式.ScrollColumn
表达式   一个代表 Window 对象的变量。

  1. ScrollColumn

返回或设置指定窗格或窗口最左边的列号。Long 型,可读写。

  1. ScrollIntoView

滚动文档窗口,以使指定矩形区域中的内容显示在文档窗口或窗格的左上角或右下角(取决于参数 Start 的值)。
本示例在当前活动文档窗口中定义一个 100x200 像素的矩形,其位置为距窗口顶部 20 像素,距窗口左边缘 50 像素。然后将文档向左、向上滚动,以使矩形的左上角与窗口的左上角对齐。
ActiveWindow.ScrollIntoView _
    Left:=50, Top:=20, _
    Width:=100, Height:=200

  1. ScrollIntoView

滚动文档窗口,使指定矩形区域中的内容显示在文档窗口或窗格的左上角或右下角(取决于 Start 参数值)。
语法
表达式.ScrollIntoView(Left, Top, Width, Height, Start)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
Left 必选 Long 矩形距离文档窗口或窗格左边的水平位置(以磅为单位)。
Top 必选 Long 矩形距离文档窗口或窗格上边的垂直位置(以磅为单位)。
Width 必选 Long 矩形的宽度(以磅为单位)。
Height 必选 Long 矩形的高度(以磅为单位)。
Start 可选 Variant 如果为 True,则使矩形的左上角位于文档窗口或窗格的左上角。如果为 False,则使矩形的右下角位于文档窗口或窗格的右下角。默认值是 True。
说明

当矩形比文档窗口或窗格大时,Start 参数对调整屏幕显示很有用处。

  1. ScrollIntoView

滚动文档窗口,使指定矩形区域中的内容显示在文档窗口或窗格的左上角或右下角(取决于 Start 参数值)。

  1. ScrollRow

返回或设置指定窗格或窗口最上面的行号
本示例将第十行移到窗口的最上面。
Worksheets("Sheet1").Activate
ActiveWindow.ScrollRow = 10

  1. ScrollRow

返回或设置指定窗格或窗口最上面显示的行号。Long 型,可读写。
语法
表达式.ScrollRow
表达式   一个代表 Window 对象的变量。

  1. ScrollRow

返回或设置指定窗格或窗口最上面显示的行号。Long 型,可读写。

  1. ScrollWorkbookTabs

滚动工作簿窗口下方的工作表标签。
本示例将工作表标签滚动到工作簿的最后一张工作表。
ActiveWindow.ScrollWorkbookTabs position:=xlLast

  1. ScrollWorkbookTabs

滚动工作簿窗口下方的工作表标签。本方法不改变该工作簿中的活动工作表。
语法
表达式.ScrollWorkbookTabs(Sheets, Position)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
Sheets 可选 Variant 要滚动的工作表的数目。如果为正数则向前滚动,为负数则向后滚动,为 0(零)则不滚动。如果未指定 Position 参数,则必须指定 Sheets。
Position 可选 Variant 使用 xlFirst 可滚动到第一张工作表,使用 xlLast 可滚动到最后一张工作表。如果未指定 Sheets,则必须指定 Position。
返回值
Variant

  1. Search

SEARCH 和 SEARCHB 查找一个文本字符串内的另一个文本字符串,并返回一个数字,表示从文本字符串(从中查找另一个文本字符串)的第一个字符起开始查找的第一个文本字符串的起始位置。

  1. SearchB

SEARCH 和 SEARCHB 查找一个文本字符串内的另一个文本字符串,并返回一个数字,表示从文本字符串(从中查找另一个文本字符串)的第一个字符起开始查找的第一个文本字符串的起始位置。

  1. SearchWhenProgramming

如果在用户使用 Visual Basic 时,“Office 助手”窗口同时显示应用程序帮助和编程帮助,则为 True。可读/写。

  1. Second

返回一个 Variant (Integer),其值为 0 到 59 之间的整数,表示一分钟之中的某个秒。
语法
Second(time)
必要的 time 参数,可以是任何能够表示时刻的 Variant、数值表达式、字符串表达式或它们的组合。如果 time 包含 Null,则返回 Null。

  1. SecondaryPlot

如果数据点位于复合饼图或复合条饼图中的第二个饼图或条形图上,则该值为 True。仅适用于复合饼图或复合条饼图中的数据点。Boolean 类型,可读写。

  1. SecondPlotSize

以主饼图大小的百分比形式返回或设置复合饼图或复合条饼图中第二部分的大小。可为 5 到 200 之间的值。Long 类型,可读写。

  1. Seek

在 Open 语句打开的文件中,设置下一个读/写操作的位置。
语法
Seek [#]filenumber, position
filenumber 必要。任何有效的文件号。
position 必要。介于 1 – 2,147,483,647 之间的数字,指出下一个读写操作将要发生的位置。

  1. Seek

返回一个 Long,在 Open 语句打开的文件中指定当前的读/写位置。
语法
Seek(filenumber)
必要的 filenumber 参数是一个包含有效文件号的 Integer。

  1. Select

选定对象
本示例选定 Sheet1 中的 A1:B3 单元格区域。
Worksheets("Sheet1").Activate
Range("A1:B3").Select

  1. Select

选定图表元素时,将产生本事件。
如果用户选定了图表标题,本示例将显示消息框。
Private Sub Chart_Select(ByVal ElementID As Long, _
        ByVal Arg1 As Long, ByVal Arg2 As Long)
    If ElementId = xlChartTitle Then
        MsgBox "please don't change the chart title"
    End If
End Sub

  1. Select

选定对象。
expression.Select(Replace)
expression      必需。该表达式返回上面的对象之一。
Replace      Variant类型,可选。要替换的对象。

  1. Select

选定对象。
本示例选定 Sheet1 中的 A1:B3 单元格区域。
Worksheets("Sheet1").Activate
Range("A1:B3").Select

  1. Select

选择对象。

  1. Select

选择对象。
语法
表达式.Select(Replace)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
Replace 可选 Variant (仅用于工作表)。如果为 True,则用指定的对象替换当前所选内容。如果为 False,则扩展当前所选内容以包括以前选择的对象和指定的对象。

  1. Select

选择对象。
语法
表达式.Select(Replace)
表达式   一个代表 Charts 对象的变量。
参数
名称 必选/可选 数据类型 描述
Replace 可选 Variant (仅用于工作表)。如果为 True,则用指定的对象替换当前所选内容。如果为 False,则扩展当前所选内容以包括以前选择的对象和指定的对象。

  1. Select Case

根据表达式的值,来决定执行几组语句中的其中之一。
语法
Select Case testexpression
[Case expressionlist-n
[statements-n]] ...
[Case Else
[elsestatements]]
End Select
testexpression 必要参数。任何数值表达式或字符串表达式。
expressionlist-n 如果有 Case 出现,则为必要参数。其形式为 expression,expression To expression,Is comparisonoperator expression的一个或多个组成的分界列表。To 关键字可用来指定一个数值范围。如果使用 To 关键字,则较小的数值要出现在 To 之前。使用 Is 关键字时,则可以配合比较运算符(除 Is 和 Like 之外)来指定一个数值范围。如果没有提供,则 Is 关键字会被自动插入。
statements-n 可选参数。一条或多条语句,当 testexpression 匹配expressionlist-n中的任何部分时执行。
elsestatements 可选参数。一条或多条语句,当 testexpression 不匹配 Case 子句的任何部分时执行。

  1. SelectAll

选择指定的 Shapes 集合中的所有形状。
版本信息
 已添加版本:  Excel 2007
语法
表达式.SelectAll
表达式   一个代表 Shapes 对象的变量。

  1. SelectedSheets

返回一个 Sheets 集合,该集合代表指定窗口中的所有选定工作表。
本示例当 Book1.xls 中的 Sheet1 被选取时,显示一则信息。
For Each sh In Workbooks("BOOK1.XLS").Windows(1).SelectedSheets
    If sh.Name = "Sheet1" Then
        MsgBox "Sheet1 is selected"
        Exit For
    End If
Next

  1. SelectedSheets

返回一个 Sheets 集合,该集合表示指定窗口中所有选定工作表。只读。
语法
表达式.SelectedSheets
表达式   一个代表 Window 对象的变量。

  1. Selection

对于 Application 对象,在活动窗口中返回选 定对象,对于 Windows 对象,返回指定窗口。
本示例清空 Sheet1 的选定对象(假定选定对象为单元格区域)。
Worksheets("Sheet1").Activate
Selection.Clear
 
本示例显示选定对象的 Visual Basic 对象类型。
Worksheets("Sheet1").Activate
MsgBox "The selection object type is " & TypeName(Selection)

  1. Selection

对于 Windows 对象,返回指定窗口
本示例清空 Sheet1 的选定对象(假定选定对象为单元格区域)。
Worksheets("Sheet1").Activate
Selection.Clear
本示例显示选定对象的 Visual Basic 对象类型。
Worksheets("Sheet1").Activate
MsgBox "The selection object type is " & TypeName(Selection)

  1. Selection

对于 Windows 对象,返回一个指定的窗口。
语法
表达式.Selection
表达式   一个代表 Window 对象的变量。

  1. SelectionChange

当工作表上的选定区域发生改变时,将产生本事件
本示例滚动工作簿窗口,直至选定区域位于窗口的左上角。
Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    With ActiveWindow
        .ScrollRow = Target.Row
        .ScrollColumn = Target.Column
    End With
End Sub

  1. SelectionMode

返回或设置数据透视表的结构化选择模式。XlPTSelectionMode 类型,可读写。

  1. SendDateTime

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. Sender

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. SendFaxOverInternet

将工作表作为传真发送给指定的收件人
下例首先将传真发送给传真服务提供商,然后再由提供商将邮件发送给收件人。
ActiveWorkbook.SendFaxOverInternet _
"14255550101@consolidatedmessenger.com", _
    "For your review", True

  1. SendForReview

在电子邮件中将供审阅的工作簿发送到指定的收件人。
本示例自动将活动工作簿作为电子邮件的附件发送到指定的收件人。
Sub WebReview()
    ActiveWorkbook.SendForReview _
    Recipients:="someone@microsoft.com; amy jones; lewjudy", _
        Subject:="Please review this document.", _
        ShowMessage:=False, _
        IncludeAttachment:=True
End Sub

  1. SendKeys

将击键发送给活动应用程序
本示例使用 SendKeys 方法退出 Microsoft Excel。
Application.SendKeys("%fx")

  1. SendKeys

将一个或多个按键消息发送到活动窗口,就如同在键盘上进行输入一样。
语法
SendKeys string[, wait]
string 必需的。字符串表达式,指定要发送的按键消息。
Wait 可选的。指定等待方式的 BooleandefBooleanDataType@veendf98.chm 值。如果为 False(缺省值),则控件在按键发送出去之后立刻返回到过程。如果为 True,则按键消息必须在控件返回到过程之前加以处理。

  1. SendMail

使用已安装的邮件系统发送工作簿。
本示例将当前活动工作簿传送给一个收件人。
ActiveWorkbook.SendMail recipients:="Jean Selva"

  1. SendMailer

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. SendToBack

将对象放到 z-次序的后面。

  1. Separator

设置或返回一个 Variant 值,它代表用于图表中数据标签的分隔符。可读/写。

  1. SeriesChange

当用户更改图表数据点的值时,产生此事件。
当用户更改绘制点的值时,本示例对绘制点边框的颜色进行设置。
Private Sub Chart_SeriesChange(ByVal SeriesIndex As Long, _
        ByVal PointIndex As Long)
    Set p = Me.SeriesCollection(SeriesIndex).Points(PointIndex)
    p.Border.ColorIndex = 3
End Sub

  1. SeriesCollection

返回代表图表或图表组中单个数据系列或所有数据系列的集合的对象。
本示例显示 Chart1 中第一个数据系列的数据标签。
Charts("Chart1").SeriesCollection(1).HasDataLabels = True

  1. SeriesCollection

返回一个对象,它代表图表或图表组中的一个系列(Series 对象)或所有系列的集合(SeriesCollection 集合)。

  1. SeriesLines

返回一个 SeriesLines 对象,该对象表示二维堆积条形图、二维堆积柱形图、复合饼图、复合条饼图的系列线。只读。

  1. SeriesSum

返回基于以下公式的幂级数之和:

  1. ServerBased

如果指定数据透视表的数据源为外部数据源,并且只检索与选定页字段相匹配的数据项,则该属性值为 True。Boolean 类型,可读写。

  1. Set

将对象引用赋给变量或属性。
语法
Set objectvar = {[New] objectexpression | Nothing}
objectvar 必需的。变量或属性的名称,遵循标准变量命名约定。
New 可选的。通常在声明时使用 New,以便可以隐式创建对象。如果 New 与 Set 一起使用,则将创建该类的一个新实例。如果 objectvar 包含了一个对象引用,则在赋新值时释放该引用。不能使用 New 关键字来创建任何内部数据类型的新实例,也不能创建从属对象。
objectexpression 必需的。由对象名,所声明的相同对象类型的其它变量,或者返回相同对象类型的函数或方法所组成的表达式。
Nothing 可选的。断绝 objectvar 与任何指定对象的关联。若没有其它变量指向 objectvar 原来所引用的对象,将其赋为 Nothing 会释放该对象所关联的所有系统及内存资源

  1. SetAttr

为一个文件设置属性信息。
语法
SetAttr pathname, attributes
pathname 必要参数。用来指定一个文件名的字符串表达式,可能包含目录或文件夹、以及驱动器。
Attributes 必要参数。常数或数值表达式,其总和用来表示文件的属性。

  1. SetBackgroundPicture

为指定工作表或者图表设置背景图形
本示例为第一张工作表设置背景图形。
Worksheets(1).SetBackgroundPicture "c:\graphics\watermark.gif"

  1. SetBackgroundPicture

为指定工作表或者图表设置背景图形。
本示例为第一张工作表设置背景图形。
Worksheets(1).SetBackgroundPicture "c:\graphics\watermark.gif"

  1. SetDefaultChart

指定 Microsoft Excel 新建图表时使用的图表模板的名称
本示例将默认图表模板设置为自定义自动套用格式,并命名为“Monthly Sales”。
Application.SetDefaultChart FormatName:="Monthly Sales"

  1. SetFirstPriority

将此条件格式规则的优先级值设置为“1”,以便在工作表上的所有其他规则之前计算此规则。

  1. SetLastPriority

为此条件格式规则设置求值顺序,以便在工作表上的所有其他规则之后计算此规则。

  1. SetLinkOnData

设置每当更新 DDE 链接时所运行过程的名称。
本示例设置每当更新 DDE 链接时所运行过程的名称。
ActiveWorkbook.SetLinkOnData _
    "WinWord|'C:\MSGFILE.DOC'!DDE_LINK1", _
    "my_Link_Update_Macro"

  1. SetParam

定义指定查询表的参数。

  1. SetPasswordEncryptionOptions

使用密码来设置对工作簿进行加密的选项。
本示例设置活动工作簿的密码加密选项。
Sub SetPasswordOptions()
ActiveWorkbook.SetPasswordEncryptionOptions _
        PasswordEncryptionProvider:="Microsoft RSA SChannel Cryptographic Provider", _
        PasswordEncryptionAlgorithm:="RC4", _
        PasswordEncryptionKeyLength:=56, _
        PasswordEncryptionFileProperties:=True
End Sub

  1. SetPhonetic

为指定区域中的所有单元格创建一个 Phonetic 对象
本示例为当前活动工作表区域 A1:A10 中的每个单元格创建一个 Phonetic 对象。
ActiveSheet.Range("A1:A10").SetPhonetic

  1. SetShapesDefaultProperties

将指定形状的格式设置为形状的默认格式。
语法
表达式.SetShapesDefaultProperties
表达式   一个代表 Shape 对象的变量。

  1. SetSourceData

为指定图表设置源数据区域
本示例为第一个图表设置源数据区域。
Charts(1).SetSourceData Source:=Sheets(1).Range("a1:a10"), _
    PlotBy:=xlColumns

  1. Sgn

返回一个 Variant (Integer),指出参数的正负号。
语法
Sgn(number)
必要的 number 参数是任何有效的数值表达式。

  1. Shadow

如果字体为带阴影字体或者对象有阴影,则该值为 True
本示例为 myChart 的标题添加阴影。
Charts("Chart1").ChartTitle.Shadow = True

  1. Shadow

返回一个只读的 ShadowFormat 对象,它包含指定形状的阴影格式属性。
语法
表达式.Shadow
表达式   一个代表 Shape 对象的变量。

  1. Shadow

返回或设置一个 Boolean 值,它确定对象是否有阴影。

  1. Shadow

返回或设置 Boolean 值,它确定字体是否是阴影字体或对象是否带有阴影。

  1. Shape

说明
Shape 对象是 Shapes 集合的成员。Shapes 集合包含某个工作簿中的所有形状。Shape代表绘图层中的对象,例如自选图形、任意多边形、OLE 对象或图片

  1. Shape

返回一个 Shape 对象,该对象代表附加在指定批注、图表节点或超链接上的图形
本示例选定活动工作表上的第二条批注。
ActiveSheet.Comments(2).Shape.Select

  1. Shape

返回一个 Shape 对象,它代表附加到指定超链接的形状。

  1. ShapeRange

返回一个 ShapeRange 对象,它代表指定的一个或多个对象。只读。

  1. Shapes

返回 Shapes 对象,该对象代表工作表或图形工作表上的所有图形
本示例向第一张工作表中添加兰色的虚线。
With Worksheets(1).Shapes.AddLine(10, 10, 250, 250).Line
    .DashStyle = msoLineDashDotDot
    .ForeColor.RGB = RGB(50, 0, 128)
End With

  1. Shapes

指定的工作表上的所有 Shape 对象的集合。
说明
每个 Shape 对象都代表绘图层中的一个对象,如自选图形、任意多边形、OLE 对象或图片。

  1. Shapes

返回 Shapes 对象,该对象代表工作表或图形工作表上的所有图形。
本示例向第一张工作表中添加兰色的虚线。
With Worksheets(1).Shapes.AddLine(10, 10, 250, 250).Line
    .DashStyle = msoLineDashDotDot
    .ForeColor.RGB = RGB(50, 0, 128)
End With

  1. ShapeStyle

返回或设置 MsoShapeStyleIndex 类型的值,该值代表形状区域的形状样式。可读/写。
版本信息
 已添加版本:  Excel 2007
语法
表达式.ShapeStyle
表达式   一个代表 Shape 对象的变量。

  1. SharedWorkspace

返回一个 SharedWorkspace 对象,代表指定文档所在的“文档工作区”。只读。
expression.SharedWorkspace
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. Sheet

返回指定的 PublishObject 对象的工作表名称。只读 String 类型。

  1. SheetActivate

当激活任何一张表时产生此事件
本示例显示每一张激活的表的名称。
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    MsgBox Sh.Name
End Sub

  1. SheetActivate

当激活任何一张表时产生此事件。
本示例显示每一张激活的表的名称。
Private Sub Workbook_SheetActivate(ByVal Sh As Object)
    MsgBox Sh.Name
End Sub

  1. SheetBeforeDoubleClick

当双击任何工作表时产生此事件,此事件先于默认的双击操作发生
本示例关闭默认的双击操作。
Private Sub Workbook_SheetBeforeDoubleClick(ByVal Sh As Object, _
        ByVal Target As Range, ByVal Cancel As Boolean)
    Cancel = True
End Sub

  1. SheetBeforeRightClick

当用鼠标右键单击任一工作表时产生此事件
本示例关闭默认的右键单击操作。有关其他示例的详细信息。请参阅 BeforeRightClick 事件示例。
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, _
        ByVal Target As Range, ByVal Cancel As Boolean)
    Cancel = True
End Sub

  1. SheetBeforeRightClick

当用鼠标右键单击任一工作表时产生此事件,此事件先于默认的右键单击操作
本示例关闭默认的右键单击操作。有关其他示例的详细信息。请参阅 BeforeRightClick 事件示例。
Private Sub Workbook_SheetBeforeRightClick(ByVal Sh As Object, _
        ByVal Target As Range, ByVal Cancel As Boolean)
    Cancel = True
End Sub

  1. SheetCalculate

当对工作表重新计算或者在图表上重新绘制发生更改的数据点时产生此事件。
当计算工作簿中的任何工作表时,本示例对第一张工作表的 A1:A100 区域进行排序。
Private Sub Workbook_SheetCalculate(ByVal Sh As Object)
    With Worksheets(1)
        .Range("a1:a100").Sort Key1:=.Range("a1")
    End With
End Sub

  1. SheetChange

当用户更改工作表中的单元格或者外部链接引起单元格的更改时,产生此事件。
当任一工作表发生更改时,运行本示例。
Private Sub Workbook_SheetChange(ByVal Sh As Object, _
        ByVal Source As Range)
    ' runs when a sheet is changed
End Sub

  1. SheetDeactivate

当任一工作表由活动状态转为非活动状态时产生此事件
本示例显示每一非活动工作表的名称。
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    MsgBox Sh.Name
End Sub

  1. SheetDeactivate

当任一工作表由活动状态转为非活动状态时产生此事件。
本示例显示每一非活动工作表的名称。
Private Sub Workbook_SheetDeactivate(ByVal Sh As Object)
    MsgBox Sh.Name
End Sub

  1. SheetFollowHyperlink

单击 Microsoft Excel 中的任意超链接时发生此事件
本示例对当前工作簿中所有已单击过的超链接保留一个列表或历史记录,其中也包括含有这些超链接的工作表名称。
Private Sub Workbook_SheetFollowHyperlink(ByVal Sh as Object, _
    ByVal Target As Hyperlink)
    UserForm1.ListBox1.AddItem Sh.Name & ":" & Target.Address
    UserForm1.Show
End Sub

  1. SheetPivotTableUpdate

发生在数据透视表的工作表更新之后
本示例显示一则消息,说明数据透视表已经更新。本示例假定您已在类模块中声明了带有事件的 Application 类型或 Workbook 类型的对象。
Private Sub ConnectionApp_SheetPivotTableUpdate(ByVal shOne As Object, Target As PivotTable)
    MsgBox "The SheetPivotTable connection has been updated."
End Sub

  1. SheetPivotTableUpdate

发生在数据透视表的工作表更新之后。
本示例显示一则消息,说明数据透视表已经更新。本示例假定您已在类模块中声明了带有事件的 Application 类型或 Workbook 类型的对象。
Private Sub ConnectionApp_SheetPivotTableUpdate(ByVal shOne As Object, Target As PivotTable)

    MsgBox "The SheetPivotTable connection has been updated."
End Sub

  1. Sheets

对于 Application 对象,返回代表活动工作 簿中所有工作表的 Sheets 集合
本示例新建一张工作表,然后在第一列中列出活动工作簿中的所有工作表的名称。
Set newSheet = Sheets.Add(Type:=xlWorksheet)
For i = 1 To Sheets.Count
    newSheet.Cells(i, 1).Value = Sheets(i).Name
Next

  1. Sheets

指定工作簿或当前活动工作簿中所有工作表的集合。Sheets 集合可包含 Chart 对象或 Worksheet 对象。

  1. Sheets

对于 Workbook 对象,返回代表指定工作簿中所有工作表的 Sheets 集合
本示例新建一张工作表,然后在第一列中列出活动工作簿中的所有工作表的名称。
Set newSheet = Sheets.Add(Type:=xlWorksheet)
For i = 1 To Sheets.Count
    newSheet.Cells(i, 1).Value = Sheets(i).Name
Next i

  1. SheetSelectionChange

任一工作表上的选定区域发生更改时,将产生本事件
本示例在状态栏上显示选定区域所在的工作表名称及选定区域的地址。
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
        ByVal Target As Excel.Range)
    Application.StatusBar = Sh.Name & ":" & Target.Address
End Sub

  1. SheetSelectionChange

任一工作表上的选定区域发生更改时,将产生本事件。
本示例在状态栏上显示选定区域所在的工作表名称及选定区域的地址。
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, _
        ByVal Target As Excel.Range)
    Application.StatusBar = Sh.Name & ":" & Target.Address
End Sub

  1. SheetsInNewWorkbook

返回或设置 Microsoft Excel 自动插入到新工作簿中的工作表数目
本示例显示自动插入到新工作簿中的工作表数目。
MsgBox "Microsoft Excel inserts " & _
    Application.SheetsInNewWorkbook & _
    " sheet(s) in each new workbook"

  1. SheetViews

返回指定窗口的 SheetViews 对象。只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.SheetViews
表达式   一个代表 Window 对象的变量。

  1. Shell

执行一个可执行文件,返回一个 Variant (Double),如果成功的话,代表这个程序的任务 ID,若不成功,则会返回 0。
语法
Shell(pathname[,windowstyle])
pathname 必要参数。Variant (String),要执行的程序名,以及任何必需的参数或命令行变量,可能还包括目录或文件夹,以及驱动器。在Macintosh中,可以使用MacID函数来指定一个应用程序的署名而不是名称。下面的例子使用了Microsoft Word的署名:
Shell MacID("MSWD")
Windowstyle 可选参数。Variant (Integer),表示在程序运行时窗口的样式。如果 windowstyle 省略,则程序是以具有焦点的最小化窗口来执行的。在Macintosh(系统7.0或更高)中,windowstyle仅决定当应用程序运行时是否获得焦点。

  1. ShortcutKey

返回或设置定义为自定义 Microsoft Excel 4.0 宏命令的名称的快捷键。String 类型,可读写。
语法
表达式.ShortcutKey
表达式   一个代表 Name 对象的变量。

  1. Show

显示内置的对话框,等待用户输入数据,然后返回一个代表用户响应的 Boolean 值。
语法
表达式.Show(Arg1, Arg2, Arg3, Arg4, Arg5, Arg6, Arg7, Arg8, Arg9, Arg10, Arg11, Arg12, Arg13, Arg14, Arg15, Arg16, Arg17, Arg18, Arg19, Arg20, Arg21, Arg22, Arg23, Arg24, Arg25, Arg26, Arg27, Arg28, Arg29, Arg30)
表达式   一个代表 Dialog 对象的变量。
参数
名称  必选/可选  数据类型  描述
Arg1-Arg30  可选  Variant  仅应用于内置对话框,是命令的初始参数。有关详细信息,请参阅“注解”部分。
例: Application.Dialogs(xlDialogOpen).Show

  1. Show

对于 Range 对象,滚动当前活动窗口中的内容以将指定区域移到视图中
expression.Show
expression必需。该表达式返回上述对象之一。

  1. Show

通过在工作表中插入方案的值来显示方案。受影响的单元格为方案的更改单元格。

  1. Show

 

  1. ShowAllData

使当前筛选列表的所有行均可见
本示例使工作表 Sheet1 上所有的数据可见。本示例应在包含用“自动筛选”命令筛选出的列表的工作表上运行。
Worksheets("Sheet1").ShowAllData

  1. ShowAllData

显示 AutoFilter 对象返回的所有数据。

  1. ShowAllItems

如果显示数据透视表中的所有项目(即使这些项目中不包含汇总数据),则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. ShowBubbleSize

如果为 True,则在图表中显示数据标签的气泡的大小。如果为 False,则隐藏气泡的大小。Boolean 类型,可读写。

  1. ShowCategoryName

如果为 True,则在图表中显示数据标签的分类名称。如果为 False,则隐藏该分类的名称。Boolean 类型,可读写。

  1. ShowChartTipNames

如果图表显示图表提示名称,则该值为 True
本示例关闭图表提示的名称以及值。
With Application
    .ShowChartTipNames = False
    .ShowChartTipValue = False
End With

  1. ShowChartTipValues

如果图表显示图表提示值,则该值为 True
本示例关闭图表提示的名称以及值。
With Application
    .ShowChartTipNames = False
    .ShowChartTipValue = False
End With

  1. ShowConflictHistory

如果在以共享清单模式打开的工作簿中显示冲突日志工作表,则该值为 True
本示例检查活动工作簿是否以共享清单模式打开,如果是,则本示例显示冲突日志工作表。
If ActiveWorkbook.MultiUserEditing Then
    ActiveWorkbook.ShowConflictHistory = True
End If

  1. ShowDataForm

显示与指定工作表相关联的数据表单
本示例显示工作表 Sheet1 的数据表单。
Worksheets(1).ShowDataForm

  1. ShowDependents

绘制从指定区域指向直接从属单元格的追踪箭头
本示例绘制工作表Sheet1上从活动单元格指向其从属单元格的追踪箭头。
Worksheets("Sheet1").Activate
ActiveCell.ShowDependents
本示例去掉工作表Sheet1上活动单元格的一个级别的的追踪箭头。
Worksheets("Sheet1").Activate
ActiveCell.ShowDependents Remove:=True

  1. ShowDetail

如果扩展了指定区域的分级显示,则该值为 True
本示例显示工作表 Sheet1 上分级显示的汇总行的明细数据。运行本示例之前,应先创建包含单个汇总行的简单分级显示,然后折叠该分级显示,使之仅显示汇总行。选定汇总行中的某一单元格,再运行本示例。
Worksheets("Sheet1").Activate
Set myRange = ActiveCell.CurrentRegion
lastRow = myRange.Rows.Count
myRange.Rows(lastRow).ShowDetail = True

  1. ShowDetail

如果扩展了指定区域的分级显示(从而行或列的明细数据可见),则为 True。指定区域必须为分级显示中的单个汇总列或汇总行。Variant 型,可读写。对于 PivotItem 对象(如果该区域在数据透视表中,则为 Range 对象),当数据项显示明细数据时,此属性设为 True。

  1. ShowDrillIndicators

ShowDrillIndicators 属性用于切换数据透视表中深化指示符的显示。可读/写 Boolean 类型。

  1. ShowError

如果用户输入无效数据时显示数据有效性检查错误消息,则该属性值为 True。Boolean 类型,可读写。

  1. ShowErrors

绘制通过从属单元格树而指向错误源单元格的追踪箭头,并返回包含该单元格的区域
如果工作表 Sheet1 上的活动单元格中有错误,则本示例将显示红色追踪箭头。
Worksheets("Sheet1").Activate
If IsError(ActiveCell.Value) Then
    ActiveCell.ShowErrors
End If

  1. ShowImportExportValidationErrors

当数据通过指定的 XML 架构映射导入或导出时,返回或设置是否显示详细说明架构有效性验证错误的对话框。默认值为 False。Boolean 类型,可读写。

  1. ShowInFieldList

如果设置为 True(默认),则字段列表中将显示一个 CubeField 对象。Boolean 类型,可读写。

  1. ShowingInAxis

指明透视字段当前在数据透视表中是否可见。只读。

  1. ShowInput

如果用户在数据有效性检查区域内选定了某一单元格时,显示数据有效性检查输入消息,则该属性值为 True。Boolean 类型,可读写。

  1. ShowLegendKey

如果数据标签图例项标示可见,则为 True。Boolean 类型,可读写。

  1. ShowLevels

显示指定行号和/或列号在分级显示中的层次。

  1. ShowNegativeBubbles

如果在图表组中显示表示负值的气泡,则该值为 True。仅对气泡图有效。Boolean 类型,可读写。

  1. ShowPageMultipleItemLabel

如果为 True(默认),那么只要隐藏了项,并且在数据透视表视图中显示非隐藏项的总计,“( 多个项目 )”将显示在工作表的数据透视表单元格中。Boolean 类型,可读写。

  1. ShowPages

为页字段中的每个数据项创建新的数据透视表。每个新报表都创建在新的工作表上。

  1. ShowPercentage

如果为 True,则在图表中显示数据标签的百分比数值。如果为 False,则隐藏该百分比数值。Boolean 类型,可读写。

  1. ShowPivotTableFieldList

如果能显示数据透视表字段列表,则为 True(默认)。
在本示例中,Microsoft Excel 判断是否能显示数据透视表字段列表,并通知用户。
Sub UseShowPivotTableFieldList()
    Dim wkbOne As Workbook
    Set wkbOne = Application.ActiveWorkbook
    'Determine PivotTable field list setting.
    If wkbOne.ShowPivotTableFieldList = True Then
        MsgBox "The PivotTable field list can be viewed."
    Else
        MsgBox "The PivotTable field list cannot be viewed."
    End If
End Sub

  1. ShowPopup

将指定的命令栏作为快捷菜单,在指定坐标或当前光标位置显示。
语法
表达式.ShowPopup(x, y)
表达式   一个代表 CommandBar 对象的变量。
参数
名称 必选/可选 数据类型 描述
x 可选 Variant 快捷菜单所在位置的 x 坐标。如果省略此参数,那么将取当前光标位置的 x 坐标。
y 可选 Variant 快捷菜单所在位置的 y 坐标。如果省略此参数,那么将取当前光标位置的 y 坐标。

  1. ShowPrecedents

绘制从指定区域指向直接引用单元格的追踪箭头
本示例绘制工作表Sheet1中从活动单元格指向其引用单元格的追踪箭头。
Worksheets("Sheet1").Activate
ActiveCell.ShowPrecedents
本示例去掉工作表Sheet1上活动单元格的一个级别的的追踪箭头。
Worksheets("Sheet1").Activate
ActiveCell.ShowPrecedents remove:=True

  1. ShowSeriesName

返回或设置一个 Boolean 值,它指明图表上数据标签的系列名称显示方式。如果为 True,则显示系列名称。如果为 False,则隐藏系列名称。可读写。

  1. ShowStartupDialog

如果显示 Microsoft Excel 应用程序的“新建工 作簿”任务窗格,则返回 True(默认)。
在本示例中,Microsoft Excel 判断是否显示了“新建工作簿”任务窗格,并通知用户。
Sub CheckStartupDialog()
    ' Determine if the New Workbook task pane is enabled.
    If Application.ShowStartupDialog = False Then
        MsgBox "ShowStartupDialog is set to False."
    Else
        MsgBox "ShowStartupDialog is set to True."
    End If
End Sub

  1. ShowTableStyleColumnHeaders

如果列标题应显示在数据透视表中,则将 ShowTableStyleColumnHeaders 属性设置为 True。可读/写 Boolean 类型。

  1. ShowTableStyleColumnStripes

ShowTableStyleColumnStripes 属性显示镶边列,这些列中的偶数列和奇数列的格式互不相同。这样使数据透视表更易于阅读。可读/写 Boolean 类型。

  1. ShowTableStyleRowHeaders

如果行标题应显示在数据透视表中,则将 ShowTableStyleRowHeaders 属性设置为 True。可读/写 Boolean 类型。

  1. ShowTableStyleRowStripes

ShowTableStyleRowStripes 属性显示镶边行,这些行中的偶数行和奇数行的格式互不相同。这样使数据透视表更易于阅读。可读/写 Boolean 类型。

  1. ShowToolTips

如果打开工具提示,则该值为 True
本示例使 Microsoft Excel 显示工具提示。
Application.ShowToolTips = True

  1. ShowValue

返回或设置一个 Boolean 值,该值对应所指定图表的数据标签值显示方式。如果为 True,则显示数据标签值。如果为 False,则隐藏数据标签值。可读写。

  1. ShowWindow

如果嵌入的图表显示在独立的窗口中,则该值为 True
本示例使嵌入的图表显示在独立的窗口中。
Worksheets(1).ChartObjects(1).Chart.ShowWindow = True

  1. ShowWindowsInTaskbar

如果每个打开的工作簿都有一个单独的 Windows 任务栏按钮,则该值为 True
本示例指定每个打开的工作簿都不会有单独的 Windows 任务栏按钮。
Application.ShowWindowsInTaskbar = False

  1. ShrinkToFit

如果文本自动收缩以适应可用列宽,则该值为 True
本示例使第一行中的文本自动收缩为适当尺寸以适应可用列宽。
Rows(1).ShrinkToFit = True

  1. ShrinkToFit

返回或设置一个 Variant 值。
语法

表达式.ShrinkToFit

表达式   一个代表 CellFormat 对象的变量。

  1. ShrinkToFit

返回或设置一个 Boolean 值,它指明文本是否可以自动收缩为适当尺寸以适应可用列宽。
语法
表达式.ShrinkToFit
表达式   一个代表 Style 对象的变量。

  1. ShrinkToFit

返回或设置一个 Boolean 值,它指明文本是否可以自动收缩为适当尺寸以适应可用列宽。

  1. Sin

返回一 Double,指定参数的 sine(正弦)值。
语法
Sin(number)
必要的 number 参数是 Double 或任何有效的数值表达式,表示一个以弧度为单位的角。

  1. Sinh

返回某一数字的双曲正弦值。

  1. Size

返回或设置字体的大小
本示例将 Sheet1 的 A1:D10 单元格的字体大小设为 12 磅。
With Worksheets("Sheet1").Range("A1:D10")
    .Value = "Test"
    .Font.Size = 12
End With

  1. Size

返回或设置指定底纹的大小。可读/写 Single 类型。

  1. SizeRepresents

返回或设置气泡图中气泡的大小所表示的含义。可为以下 XlSizeRepresents 常量之一:xlSizeIsArea 或 xlSizeIsWidth。Long 类型,可读写。

  1. SizeWithWindow

如果 Microsoft Excel 调整图表大小以匹配图表工作表窗口的大小,则该值为 True
本示例使 Chart1 的大小随其窗口大小的改变而改变。
Charts("Chart1").SizeWithWindow = True

  1. Skew

返回分布的不对称度。不对称度反映以其平均值为中心的分布的不对称程度。不对称度为正表示不对称部分的分布更趋向正值。不对称度为负表示不对称部分的分布更趋向负值。

  1. SLN

返回一个 Double,在一期里指定一项资产的直线折旧。
语法
SLN(cost, salvage, life)
cost 必要。Double 指定资产的初始成本。
salvage 必要。Double 指定资产在可用年限结束后的价值。
life 必要。Double 指定资产的可用年限。

  1. Sln

返回某项资产一个周期的直线折旧值。

  1. Slope

返回根据 known_y's 和 known_x's 中的数据点拟合的线性回归直线的斜率。斜率为直线上任意两点的垂直距离与水平距离的比值,也就是回归直线的变化率。

  1. Small

返回数据集中第 k 个最小值。使用此函数可以返回数据集中特定位置上的数值。

  1. SmallChange

返回或设置滚动条或微调框在滚动一行(当用户单击箭头)时的增量或减量。Long 类型,可读写。

  1. SmallGrid

如果 Microsoft Excel 为新建的数据透视表使用一个具有两个单元格宽度和两个单元格高度的网格,则该值为 True。如果 Excel 使用一个空白模板边框,则该值为 False。Boolean 类型,可读写。

  1. SmallScroll

按行或列滚动窗口内容。
本示例将工作表 Sheet1 的活动窗口内容向下滚动三行。
Worksheets("Sheet1").Activate
ActiveWindow.SmallScroll down:=3

  1. SmallScroll

按行或按列滚动窗口内容。
语法
表达式.SmallScroll(Down, Up, ToRight, ToLeft)
表达式   一个代表 Window 对象的变量。
参数
名称 必选/可选 数据类型 描述
Down 可选 Variant 将内容向下滚动的行数。
Up 可选 Variant 将内容向上滚动的行数。
ToRight 可选 Variant 将内容向右滚动的列数。
ToLeft 可选 Variant 将内容向左滚动的列数。
返回值
Variant

  1. SmallScroll

按行或按列滚动窗口内容。

  1. SmartDocument

返回一个代表智能文档解决方案设置的 SmartDocument 对象
expression.SmartDocument
expression必需。该表达式返回一个 Workbook 对象。

  1. SmartTagActions

返回一个 SmartTagActions 对象,该对象表示选定的智能标记的操作类型。

  1. SmartTagOptions

返回一个 SmartTagOptions 对象,该对象代表能与智能标记一起进行操作的选项。
在本示例中,Microsoft Excel 将智能标记选项的显示设置通知给用户。
Sub CheckSmartTagOptions()
    ' Check the display options for smart tags.
    Select Case ActiveWorkbook.SmartTagOptions.DisplaySmartTags
        Case xlButtonOnly
            MsgBox "The button for smart tags will only be displayed."
        Case xlDisplayNone
            MsgBox "Nothing will be displayed for smart tags."
        Case xlIndicatorAndButton
            MsgBox "The button and indicator will be displayed for smart tags."
    End Select
End Sub

  1. SmartTagOptions

代表用智能标记可执行的选项

  1. SmartTagRecognizers

返回一个应用程序的 SmartTagRecognizers 集合

  1. SmartTagRecognizers

该集合代表在 Microsoft Excel 中进行操作时,用信息类型标记数据的识别引擎
可用 Application 对象的 SmartTagRecognizers 属性返回一个 SmartTagRecognizers 集合

  1. SmartTags

返回一个 SmartTags 对象,该对象代表指定单元格的标识符
本示例将一个名为“MSFT”的智能标记放置在单元格A1中,然后将单元格A1的标识符的父标识符通知给用户。本示例假定主机系统与 Internet 相连。
Sub ReturnSmartTag()
    Dim strLink As String
    Dim strType As String
    ' Define SmartTag variables.
    strLink = "urn:schemas-microsoft-com:smarttags#StockTickerSymbol"
    strType = "stockview"
    ' Enable smart tags to be embedded and recognized.
    ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True
    Application.SmartTagRecognizers.Recognize = True
    Range("A1").Formula = "MSFT"
    MsgBox Range("A1").SmartTags.Parent
End Sub

  1. SmartTags

返回一个 SmartTags 对象,该对象代表指定单元格的标识符
本示例将一个名为“MSFT”的智能标记放置在单元格A1中,然后将单元格 A1的标识符的父标识符通知给用户。本示例假定主机系统与 Internet 相连。
Sub ReturnSmartTag()
    Dim strLink As String
    Dim strType As String
    ' Define SmartTag variables.
    strLink = "urn:schemas-microsoft-com:smarttags#StockTickerSymbol"
    strType = "stockview"
    ' Enable smart tags to be embedded and recognized.
    ActiveWorkbook.SmartTagOptions.EmbedSmartTags = True
    Application.SmartTagRecognizers.Recognize = True
    Range("A1").Formula = "MSFT"
    MsgBox Range("A1").SmartTags.Parent
End Sub

  1. SmartTags

SmartTag 对象的集合,该集合代表分配给每个单元格的标识符

  1. Smooth

如果折线图或散点图有平滑线,则为 True。仅适用于折线图和散点图。可读写。

  1. Smooth

如果图例项标示有平滑线,则为 True。可读写。

  1. SoftEdge

返回指定形状的 SoftEdgeFormat 对象,该对象包含形状的柔化边缘格式属性。只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.SoftEdge
表达式   一个代表 Shape 对象的变量。

  1. Solid

将指定填充设为统一的颜色。使用此方法可将渐变、纹理、图案或背景填充转换为纯色填充。

  1. SolveOrder

返回一个 Long 类型的值,该值计算成员求解次序的 MDX(多维表达式)参数的值。默认值为零。只读。

  1. Sort

对数据透视表、单元格区域或活动区域进行排序
本示例对工作表 Sheet1 上的单元格区域 A1:C20 进行排序,用单元格 A1 作为第一排序关键字,用单元格 B1 作为第二排序关键字。排序是按行以升序进行的,没有标题。本示例假定单元格区域 A1:C20 有数据存在。
Sub SortRange1()
   Worksheets("Sheet1").Range("A1:C20").Sort _
        Key1:=Worksheets("Sheet1").Range("A1"), _
        Key2:=Worksheets("Sheet1").Range("B1")
End Sub

  1. Sort

返回查询表范围的排序条件。只读。

  1. Sort

获取 AutoFilter 集合的排序列和排序次序。

  1. SortSpecial

使用东亚排序方法对区域或数据透视表进行排序;或者如果区域中只包含一个单元格,则对活动区域使用本方法
本示例对单元格区域 A1:A5 按拼音(字符的汉语拼音排序顺序)顺序进行排序。为对中文字符进行排序,本示例假定用户有对 Microsoft Excel 的汉语支持。即使没有汉语支持,Excel 会对该示例位于指定区域中的任意数字以默认方式进行排序。本示例假定单元格区域 A1:A5 中有数据存在。
Sub SpecialSort()
    Application.Range("A1:A5").SortSpecial SortMethod:=xlPinYin
End Sub

  1. SortUsingCustomLists

SortUsingCustomLists 属性控制最初在初始化透视字段并按 PivotItems 标题对 PivotItems 进行排列时,以及稍后在用户应用排序时,是否将自定义列表用于对字段项进行排序。可读/写 Boolean 类型。

  1. SoundNote

本属性不应再被使用。声音注释已从 Microsoft Excel 中删除

  1. Sounds

如果“Office 助手”发出对应于与动画的声音,则为 True。可读/写。

  1. Source

返回一个代表唯一名称的 Variant 值,该名称用于标识其 SourceType 属性值为 xlSourceRange、xlSourceChart、xlSourcePrintArea、xlSourceAutoFilter、xlSourcePivotTable 或 xlSourceQuery 的项。

  1. SourceCaption

SourceCaption 属性只适用于 OLAP 数据透视表,并从 OLAP 服务器中返回透视字段的原始标题。只读。

  1. SourceConnectionFile

返回或设置一个 String,它指明用于创建数据透视表的 Microsoft Office 数据连接文件或类似的文件。可读写。

  1. SourceData

返回数据透视表的数据源,如下表所示。Variant 型,可读写。

  1. SourceDataFile

返回或设置一个 String 值,它指明查询表的源数据文件。型。

  1. SourceDataFile

返回一个 String 值,它指明数据透视表缓存的源数据文件。

  1. SourceName

返回或设置一个 String 值,它代表指定对象的链接源名称。

  1. SourceName

返回一个 String 值,它代表指定的对象出现在指定的数据透视表的原始源数据中时的名称。

  1. SourceName

返回一个 Variant 值,它代表指定的对象出现在指定的数据透视表的原始源数据中时的名称。

  1. SourceNameStandard

返回一个 String 类型的数值,该数值表示以标准英文(美国)格式设置的数据透视表项目的源名称。只读。

  1. SourceRange

返回一个 Range 对象,该对象表示包含指定查询参数值的单元格。只读。

  1. SourceType

返回 XlPivotTableSourceType 值,它代表所发布项目的类型。

  1. SourceType

返回 XlSourceType 值,它代表所发布项目的类型。

  1. Space

返回特定数目空格的 Variant (String)。
语法
Space(number)
必要的 number 参数为字符串中想要的空格数。

  1. Spc

与 Print # 语句或 Print 方法一起使用,对输出进行定位。
语法
Spc(n)
必要的 n 参数是在显示或打印列表中的下一个表达式之前插入的空白数。

  1. Speak

按行或列的顺序朗读单元格区域
本示例中,Microsoft Excel 将朗读“Hello”。
Sub UseSpeech()
    Application.Speech.Speak "Hello"
End Sub

  1. Speak

Microsoft Excel 回放作为参数传递的文本字符串。

  1. SpeakCellOnEnter

当按下 Enter 或完成了对活动单元格的编辑时,Microsoft Excel 支持朗读活动单元格的模式。如果 SpeakCellOnEnter 属性为 True,则打开此模式。如果为 False,则关闭此模式。Boolean 类型,可读写。

  1. SpecialCells

返回一个 Range 对象,该对象代表与指定类型及值相匹配的所有单元格
本示例选定工作表 Sheet1 中已用区域的最后一个单元格。
Worksheets("Sheet1").Activate
ActiveSheet.Cells.SpecialCells(xlCellTypeLastCell).Activate

  1. Speech

返回一个 Speech 对象
在本示例中,Microsoft Excel 播放“Hello”。本示例假定已在主机系统上安装了语音功能。
Sub UseSpeech()
    Application.Speech.Speak "Hello"
End Sub

  1. SpellingOptions

返回一个 SpellingOptions 对象,该对象代表应用程序的拼写选项。

  1. Split

如果指定窗口被拆分,则该值为 True
本示例取消指定的窗口拆分。在取消窗口拆分之前,需先将 FreezePanes 属性设为 False,以便取消冻结窗格。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
With ActiveWindow
    .FreezePanes = False
    .Split = False
End With

  1. Split

返回一个下标从零开始的一维数组,它包含指定数目的子字符串。
语法
Split(expression[, delimiter[, limit[, compare]]])
expression 必需的。包含子字符串和分隔符的字符串表达式 。如果expression是一个长度为零的字符串(""),Split则返回一个空数组,即没有元素和数据的数组。
delimiter 可选的。用于标识子字符串边界的字符串字符。如果忽略,则使用空格字符(" ")作为分隔符。如果delimiter是一个长度为零的字符串,则返回的数组仅包含一个元素,即完整的 expression字符串。
limit 可选的。要返回的子字符串数,–1表示返回所有的子字符串。
compare 可选的。数字值,表示判别子字符串时使用的比较方式。关于其值,请参阅“设置值”部分。

  1. Split

如果指定窗口被拆分,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.Split
表达式   一个代表 Window 对象的变量。

  1. SplitColumn

返回或设置将指定窗口拆分成窗格处的列号(拆分线左侧的列数)。
本示例对指定窗口进行拆分,拆分线左侧留有 1.5 个列宽。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.SplitColumn = 1.5

  1. SplitColumn

返回或设置将指定窗口拆分成窗格处的列号(拆分线左侧的列数)。Long 类型,可读写。
语法
表达式.SplitColumn
表达式   一个代表 Window 对象的变量。

  1. SplitHorizontal

以磅为单位返回或设置窗口水平拆分线的位置
本示例设置活动窗口的水平拆分线位置为 216 磅(3 英寸)。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.SplitHorizontal = 216

  1. SplitHorizontal

以磅 (磅:指打印的字符的高度的度量单位。1 磅等于 1/72 英寸,或大约等于 1 厘米的 1/28。)为单位返回或设置窗口水平拆分线的位置。Double 类型,可读写。
语法
表达式.SplitHorizontal
表达式   一个代表 Window 对象的变量。

  1. SplitRow

返回或设置将指定窗口拆分成窗格处的行号(拆分线以上的行数)。
本示例拆分活动窗口,并使拆分线以上有 10 行。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.SplitRow = 10

  1. SplitRow

返回或设置将指定窗口拆分成窗格处的行号(拆分线以上的行数)。Long 类型,可读写。
语法
表达式.SplitRow
表达式   一个代表 Window 对象的变量。

  1. SplitType

返回或设置在复合饼图或复合条饼图中拆分两部分的方式。XlChartSplitType 类型,可读写。

  1. SplitValue

返回或设置复合饼图或复合条饼图中分隔两部分的阈值。可读/写 Variant 类型。

  1. SplitVertical

以磅为单位返回或设置窗口垂直拆分线的位置
本示例设置活动窗口的垂直拆分线位置为 216 磅(3 英寸)。
Workbooks("BOOK1.XLS").Worksheets("Sheet1").Activate
ActiveWindow.SplitVertical = 216

  1. SplitVertical

以磅 (磅:指打印的字符的高度的度量单位。1 磅等于 1/72 英寸,或大约等于 1 厘米的 1/28。)为单位返回或设置窗口垂直拆分线的位置。Double 类型,可读写。
语法
表达式.SplitVertical
表达式   一个代表 Window 对象的变量。

  1. SqlState

返回 SQL 状态错误。String 型,只读。

  1. Sqr

返回一个 Double,指定参数的平方根。
语法
Sqr(number)
必要的 number 参数 number 是 Double 或任何有效的大于或等于 0 的数值表达式。

  1. SqrtPi

返回某数与 pi 的乘积的平方根。

  1. Stage

返回一个数字值,此值指定最近一次 OLE DB 查询所产生的错误的阶段。Long 类型,只读。

  1. StandardFont

返回或设置标准字体的名称
本示例检查操作系统的类型,如果为 Macintosh,则将标准字体设为 Geneva,如果为 Windows,则将标准字体设为 Arial。
If Application.OperatingSystem Like "*Macintosh*" Then
    Application.StandardFont = "Geneva"
Else
    Application.StandardFont = "Arial"
End If

  1. StandardFontSize

以磅为单位返回或设置标准字体大小
本示例将标准字体大小设为 12 磅。
Application.StandardFontSize = 12

  1. StandardFormula

返回或设置一个 String 值,该值指定使用标准英语(美国)格式的公式。可读写。

  1. StandardHeight

以磅为单位返回工作表中所有行的标准高度(默认值)。
本示例将工作表 sheet1 中的行一的行高设置为标准行高。
Worksheets("Sheet1").Rows(1).RowHeight = _
    Worksheets("Sheet1").StandardHeight

  1. Standardize

返回以 mean 和 standard_dev 表示的分布的正态化数值。

  1. StandardWidth

返回或设置工作表中所有列的标准列宽(默认值)。
本示例将以标准列宽设置 Sheet1 中首列的列宽。
Worksheets("Sheet1").Columns(1).ColumnWidth = _
    Worksheets("Sheet1").StandardWidth

  1. Start

返回一个位置,此位置表示指定单元格中拼音形式的文本字符串的第一个字符。Long 类型,只读。

  1. StartupPath

返回启动文件夹的完整路径,不包括尾部分隔符
本示例显示 Microsoft Excel 启动文件夹的完整路径。
MsgBox Application.StartupPath

  1. StartWizard

启动“Office 助手”,并返回一个标识该会话的 Long 值。

  1. Static

在过程级别中使用,用于声明变量并分配存储空间。在整个代码运行期间都能保留使用 Static 语句声明的变量的值。
语法
Static varname[([subscripts])] [As [New] type] [, varname[([subscripts])] [As [New] type]] . . .
varname 必需的。变量的名称;遵循标准变量命名约定。
subscripts 可选的。数组变量的维数;最多可以定义 60 维的多维数组。subscripts 参数使用下面的语法:
  [lower To] upper [,[lower To] upper] . . .
如果不显式指定 lower,则数组的下界由 Option Base 语句控制。如果没有 Option Base 语句则下界为 0。
New 可选的。用它可以隐式地创建对象的关键字。如果使用 New 声明对象变量,则在第一次引用该变量时将新建该对象的实例,因此不必使用 Set 语句来对该对象引用赋值。New 关键字不能用来声明任何内部数据类型的变量,也不能用来声明从属对象的实例。
type 可选的。变量的数据类型;可以是 Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(对变长的字符串)、String * length(对定长的字符串)、Object、Variant、用户定义类型或对象类型。所声明的每个变量都要有一个单独的 As type 子句。

  1. Status

指示传送名单的状态。XlRoutingSlipStatus 类型,只读。

  1. StatusBar

返回或设置状态栏中的文字
本示例在打开 Large.xls 工作簿之前将状态栏文 字设为“Please be patient...”,然后将状态栏 恢复为默认文字。
oldStatusBar = Application.DisplayStatusBar
Application.DisplayStatusBar = True
Application.StatusBar = "Please be patient..."
Workbooks.Open filename:="LARGE.XLS"
Application.StatusBar = False
Application.DisplayStatusBar = oldStatusBar

  1. StDev

基于样本估算标准偏差。标准偏差反映数值相对于平均值 (mean) 的离散程度。

  1. StDevP

基于以参数形式给出的整个样本总体计算标准偏差。标准偏差反映数值相对于平均值 (mean) 的离散程度。

  1. StEyx

返回通过线性回归法计算每个 x 的 y 预测值时所产生的标准误差。标准误差用来度量根据单个 x 变量计算出的 y 预测值的误差量。

  1. Stop

暂停执行。
语法
Stop
说明
可以在过程中的任何地方放置 Stop 语句,使用 Stop 语句,就相当于在程序代码中设置断点。

  1. StopIfTrue

返回或设置一个 Boolean 值,该值确定在当前规则的计算结果为 True 时是否应计算单元格上的其他格式规则。

  1. Str

返回代表一数值的 Variant (String)。
语法
Str(number)
必要的 number 参数为一 Long,其中可包含任何有效的数值表达式。

  1. StrComp

返回 Variant (Integer),为字符串比较的结果。
语法
StrComp(string1, string2[, compare])
string1 必要参数。任何有效的字符串表达式。
string2 必要参数。任何有效的字符串表达式。
Compare 可选参数。指定字符串比较的类型。如果 compare 参数是 Null,将发生错误。如果省略 compare,Option Compare 的设置将决定比较的类型。

  1. StrConv

返回按指定类型转换的 Variant (String)。
语法
StrConv(string, conversion, LCID)
string 必要参数。要转换的字符串表达式。
conversion 必要参数。Integer。其值的和决定转换的类型。
LCID 可选的。如果与系统LocaleID不同,则为LocaleID(系统LocaleID为缺省值。)

  1. Strikethrough

如果文字中间有一条水平删除线,则该值为 True
本示例将 Sheet1 中活动单元格的字体设置为加删除线。
Worksheets("Sheet1").Activate
ActiveCell.Font.Strikethrough = True

  1. String

返回 Variant (String),其中包含指定长度重复字符的字符串。
语法
String(number, character)
number 必要参数;Long。返回的字符串长度。如果 number 包含 Null,将返回 Null。
character 必要参数;Variant。为指定字符的字符码或字符串表达式,其第一个字符将用于建立返回的字符串。如果 character 包含 Null,就会返回 Null。

  1. StrReverse

返回一个字符串,其中一个指定子字符串的字符顺序是反向的。
语法
StrReverse(expression)
参数expression 是一个字符串,它的字符顺序要被反向。如果expression 是一个长度为零的字符串(""),则返回一个长度为零的字符串。如果expression为Null,则产生一个错误。

  1. Style

返回 Style 对象,该对象代表指定区域的样式
本示例对工作表 sheet1 中的单元格 A1 应用“常规”样式。
Worksheets("Sheet1").Range("A1").Style.Name = "Normal"

  1. Style

代表区域的样式说明。
说明
Style 对象包含样式的所有属性(字体、数字格式、对齐方式,等等)。有几种内置样式,包括“常规”、“货币”和“百分比”。同时对多个单元格修改单元格格式属性时,使用 Style 对象是快捷高效的方法。

  1. Style

返回或设置一个 MsoLineStyle 值,它代表线条的样式。

  1. Style

返回或设置指定底纹的样式。可读/写 MsoShadowStyle 类型。

  1. Styles

返回一个 Styles 集合,此集合代表指定工作簿中的所有样式
本示例从活动工作簿中删除用户自定义的“Stock Quote Style”样式。
ActiveWorkbook.Styles("Stock Quote Style").Delete

  1. Styles

指定工作簿或活动工作簿上所有 Style 对象的集合。每个 Style 对象代表某一区域的样式说明

  1. Sub

声明子过程的名称,参数,以及构成其主体的代码。
语法
[Private | Public | Friend] [Static] Sub name [(arglist)]
[statements]
[Exit Sub]
[statements]
End Sub
Public 可选的。表示所有模块的所有其它过程都可访问这个 Sub 过程。 如果在包含 Option Private 的模块中使用,则这个过程在该工程外是不可使用的。
Private 可选的。表示只有在包含其声明的模块中的其它过程可以访问该 Sub 过程。
Friend 可选的。只能在类模块中使用。表示该 Sub 过程在整个工程中都是可见的,但对对象实例的控制者是不可见的。
Static 可选的。表示在调用之间保留 Sub 过程的局部变量的值。Static 属性对在 Sub 外声明的变量不会产生影响,即使过程中也使用了这些变量。
name 必需的。Sub 的名称;遵循标准的变量命名约定。 
arglist 可选的。代表在调用时要传递给 Sub 过程的参数的变量列表。多个变量则用逗号隔开。
statements 可选的。Sub 过程中所执行的任何语句组。

  1. SubAddress

返回或设置文档中与指定超链接相关联的位置。String 类型,可读写。

  1. Subject

返回或设置邮件或传送名单的主题。String 型,可读写。

  1. SubscribeTo

您已经请求了仅用于 Macintosh 上的 Visual Basic 关键字的“帮助”信息。有关该关键字的详细信息,请参阅 Microsoft Office Macintosh 版本所附带的语言引用帮助。

  1. Subscript

如果字体格式设为加下标,则该值为 True,默认值为 False
本示例将 A1 单元格的第二个字符设为下标字符。
Worksheets("Sheet1").Range("A1") _
    .Characters(2, 1).Font.Subscript = True

  1. Substitute

在文本字符串中用 new_text 替代 old_text。如果需要在某一文本字符串中替换指定的文本,请使用函数 SUBSTITUTE;如果需要在某一文本字符串中替换指定位置处的任意文本,请使用函数 REPLACE。

  1. Subtotal

创建指定区域或当前区域(如果该区域为单个单元格时)的分类汇总
本示例创建工作表 Sheet1 中选定区域的分类汇总。该分类汇总是以第一个字段进行分组的求和,汇总对象为第二和第三个字段。
Worksheets("Sheet1").Activate
Selection.Subtotal GroupBy:=1, Function:=xlSum, _
    TotalList:=Array(2, 3)

  1. Subtotal

创建分类汇总。

  1. SubtotalHiddenPageItems

如果在行或列的分类汇总、块汇总和总计中包括数据透视表中的隐藏页字段项,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. SubtotalLocation

此方法可更改所有现有透视字段的分类汇总位置。更改分类汇总位置仅对大纲形式的字段产生直接的视觉效果,但是也会对表格形式的字段设置该方法。

  1. SubtotalName

返回或设置显示在指定数据透视表的分类汇总列或行标题中的文本字符串标志。默认值为“Subtotal”。String 类型,可读写。

  1. Subtotals

返回或设置与指定字段同时显示的分类汇总。仅对非数据字段有效。Variant 类型,可读写。

  1. SuggestMainOnly

如果该值为 True,则命令 Microsoft Excel 只从主要词典中选取备选单词,以便使用拼写检查。如果该值为 False,则只取消主要词典中备选单词的限制,以便使用拼写检查。Boolean 类型,可读写。

  1. Sum

对某单元格区域中的所有数字求和。

  1. SumIf

根据给定条件对指定单元格求和。

  1. SumIfs

对区域中满足多个条件的单元格求和。

  1. Summary

如果指定区域为分级显示的汇总行或汇总列,则该值为 True
如果工作表Sheet1上第四行为分级显示的汇总行,则本示例将其字体设置为加粗和倾斜。
With Worksheets("Sheet1").Rows(4)
    If .Summary = True Then
        .Font.Bold = True
        .Font.Italic = True
    End If
End With

  1. SummaryColumn

返回或设置分级显示中的汇总列的位置。XlSummaryColumn 类型,可读写。

  1. SummaryRow

返回或设置分级显示中汇总行的位置。XlSummaryRow 类型,可读写。

  1. SumProduct

在给定的数组中,将数组中对应的元素相乘,并返回乘积之和。

  1. SumSq

返回参数的平方之和。

  1. SumX2MY2

返回两个数组中对应值的平方差之和。

  1. SumX2PY2

返回两数组中对应数值的平方和之和,平方和之和在统计计算中经常使用。

  1. SumXMY2

返回两个数组中对应值之差的平方和。

  1. Superscript

如果字体格式设为上标字符,则该值为 True,默认值为 False
本示例将 A1 单元格的最后一个字符设为上标字符。
n = Worksheets("Sheet1").Range("A1").Characters.Count
Worksheets("Sheet1").Range("A1") _
    .Characters(n, 1).Font.Superscript = True

  1. SurfaceGroup

返回 ChartGroup 对象,该对象代表三维图表中的曲面图组。
本示例设置 Chart1 中的三维曲面图组,使其中的每一数据标志都使用不同的颜色。本示例应在三维图表上运行。
Charts("Chart1").SurfaceGroup.VaryByCategories = True

  1. Switch

计算一组表达式列表的值,然后返回与表达式列表中最先为 True 的表达式所相关的 Variant 数值或表达式。
语法
Switch(expr-1, value-1[, expr-2, value-2 _ [, expr-n,value-n]])
expr 必要参数。要加以计算的 Variant 表达式。
value 必要参数。如果相关的表达式为 True,则返回此部分的数值或表达式。

  1. SYD

返回一个 Double,指定某项资产在一指定期间用年数总计法计算的折旧。
语法
SYD(cost, salvage, life, period)
cost 必要。Double 指定资产的初始成本。
salvage 必要。Double 指定资产在可用年限结束后的价值。
life 必要。Double 指定资产的可用年限。
period 必要。Double 指定计算资产折旧所用的那一期间。

  1. Syd

返回某项资产按年限总和折旧法计算的指定期间的折旧值。

  1. Sync

当作为“文档工作区”一部分的工作表的本地副本与服务器上的副本进行同步时,发生此事件
如果“文档工作区”中的工作表同步失败,则下例显示一条消息。
Private Sub Worksheet_Sync(ByVal SyncEventType As Office.MsoSyncEventType)
    If SyncEventType = msoSyncEventDownloadFailed Or _
            SyncEventType = msoSyncEventUploadFailed Then
           
        MsgBox "Document synchronization failed.  " & _
            "Please contact your administrator " & vbCrLf & _
            "or try again later."
   
    End If
End Sub

  1. Sync

返回一个 Sync 对象,使用该对象可访问作为“文档工作区”一部分的文档的方法和属性。
下例显示了当活动工作簿是“文档工作区”的共享文档时,最后修改此活动工作簿的人员的名称。
Dim eStatus As MsoSyncStatusType
Dim strLastUser As String
eStatus = ActiveDocument.Sync.Status
If eStatus = msoSyncStatusLatest Then
    strLastUser = ActiveWorkbook.Sync.WorkspaceLastChangedBy
    MsgBox "You have the most up-to-date copy." & _
        "This file was last modified by " & strLastUser
End If

  1. SyncScrollingSideBySide

如果为 True,在对文档进行并排比较的同时启用窗口内容的滚动功能。若为 False,则在对文档进行并排比较的同时禁用窗口内容的滚动功能。
expression.SyncScrollingSideBySide
expression必需。该表达式返回一个 Windows 集合。

  1. Excel VBA属性、方法、事件大全——Part14(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. Tab

返回一个图表或工作表的 Tab 对象。
在本示例中,Microsoft Excel 判断工作表的第一个标签的颜色索引是否设置为无,并通知用户。
Sub CheckTab()
    ' Determine if color index of 1st tab is set to none.
    If Worksheets(1).Tab.ColorIndex = xlColorIndexNone Then
        MsgBox "The color index is set to none for the 1st " & _
            "worksheet tab."
    Else
        MsgBox "The color index for the tab of the 1st worksheet " & _
            "is not set none."
    End If
End Sub

  1. Tab

与 Print # 语句或 Print 方法一起使用,对输出进行定位。
语法
Tab[(n)]
可选的 n 参数是在显示或打印列表中的下一个表达式之前移动的列数。若省略此参数,则 Tab 将插入点移动到下一个打印区的起点。这就使 Tab 可用来替换区域中的逗号,此处,逗号是作为十进制分隔符使用的。

  1. Table

依据输入值和工作表上定义的公式创建数据表
本示例在工作表 Sheet1 的 A1:K11 单元格中创建一个带格式的乘法运算表。
Set dataTableRange = Worksheets("Sheet1").Range("A1:K11")
Set rowInputCell = Worksheets("Sheet1").Range("A12")
Set columnInputCell = Worksheets("Sheet1").Range("A13")
Worksheets("Sheet1").Range("A1").Formula = "=A12*A13"
For i = 2 To 11
    Worksheets("Sheet1").Cells(i, 1) = i - 1
    Worksheets("Sheet1").Cells(1, i) = i - 1
Next i
dataTableRange.Table rowInputCell, columnInputCell
With Worksheets("Sheet1").Range("A1").CurrentRegion
    .Rows(1).Font.Bold = True
    .Columns(1).Font.Bold = True
    .Columns.AutoFit
End With

  1. TableRange1

返回一个 Range 对象,该对象表示包括整个数据透视表但不包括页字段的区域。只读。

  1. TableRange2

返回一个 Range 对象,该对象表示包括整个数据透视表(含页字段)的区域。只读。

  1. TableStyle2

TableStyle2 属性指定当前应用于数据透视表的数据透视表样式。可读/写。

  1. TabRatio

返回或设置工作簿中工作表标签区域的宽度与窗口水平滚动条的宽度比例(可为 0 到 1 之间的数字;默认值为 0.6)。
本示例将工作簿中工作表标签区域设为水平滚动条宽度的一半。
ActiveWindow.TabRatio = 0.5

  1. TabRatio

返回或设置工作簿中工作表标签区域的宽度与窗口水平滚动条的宽度比例(可为 0 到 1 之间的数字;默认值为 0.6)。Double 类型,可读写。
语法
表达式.TabRatio
表达式   一个代表 Window 对象的变量。

  1. Tag

返回或设置与数据透视表一起保存的字符串。String 类型,可读写。

  1. Tan

返回一个 Double 的值,指定一个角的正切值。
语法
Tan(number)
必要的 number 参数是 Double 或任何有效的数值表达式,表示一个以弧度为单位的角度。

  1. Tanh

返回某一数字的双曲正切值。

  1. TargetBrowser

返回或设置一个 MsoTargetBrowser 常量,它指明浏览器的版本。可读写。

  1. TBillEq

返回国库券的等价债券收益。

  1. TBillPrice

返回面值 ¥100 的国库券的价格。

  1. TBillYield

返回国库券的收益。

  1. TDist

返回学生 t 分布的百分点(概率),其中数值 (x) 是 t 的计算值(将计算其百分点)。t 分布用于小样本数据集合的假设检验。使用此函数可以代替 t 分布的临界值表。

  1. TemplateRemoveExtData

如果工作簿保存为模板时删除所有外部数据引用,则该值为 True
本示例将指定工作簿保存为不包含外部数据的模板。
With ThisWorkbook
    .TemplateRemoveExtData = True
    .SaveAs "current", xlTemplate
    .TemplateRemoveExtData = False
End With

  1. TemplatesPath

返回模板所存储的本地路径
本示例返回模板所存储的本地路径。
Msgbox Application.TemplatesPath

  1. Text

返回或设置指定对象的文本
本示例设置 Chart1 的图表标题文本。
With Charts("Chart1")
    .HasTitle = True
    .ChartTitle.Text = "First Quarter Sales"
End With

  1. Text

返回或设置指定对象的文本
本示例演示包含格式数字的单元格的 Text 和 Value 属性的不同用法。
Set c = Worksheets("Sheet1").Range("B14")
c.Value = 1198.3
c.NumberFormat = "$#,##0_);($#,##0)"
MsgBox c.Value
MsgBox c.Text

  1. Text

设置批注文本。
语法
表达式.Text(Text, Start, Overwrite)
表达式   一个代表 Comment 对象的变量。
返回值:String
参数
名称  必选/可选  数据类型  描述
Text  可选  Variant  要添加的文本。
Start  可选  Variant  所添加文本的起始位置(字符数)。如果省略此参数,则删除批注中的所有现有文字。
Overwrite  可选  Variant  如果为True,则覆盖现有文件。默认值是 False(插入文本)。

  1. Text

将数值转换为按指定数字格式表示的文本。

  1. Text

返回或设置一个 String 类型的值,该值指定条件格式规则所用的文本字符串。

  1. Text

返回或设置指定对象中的文本。String 型,可读写。

  1. TextboxText

设置或返回一个 String 类型的数值,该数值表示智能文档文本框控件中的文本。可读写。

  1. TextDate

如果设置为 True(默认值),则 Microsoft Excel 将使用“自动更正选项”按钮识别包含用两位数字表示年份的文本日期的单元格。如果该属性值为 False,则禁用此类单元格的错误检查。Boolean 类型,可读写。

  1. TextEffect

该属性返回一个 TextEffectFormat 对象,它包含指定形状的文本效果格式属性。
语法
表达式.TextEffect
表达式   一个代表 Shape 对象的变量。

  1. TextFileColumnDataTypes

返回或设置一个有序的常量数组,用于指定文本文件中相应列的数据类型,而该文本文件则是正要导入查询表中的文本文件。每一列的默认常量为 xlGeneral。Variant 类型,可读写。

  1. TextFileCommaDelimiter

如果将文本文件导入查询表中时,以逗号作为分隔符,则该值为 True。如果以其他字符作为分隔符,则该值为 False。默认值为 False。Boolean 类型,可读写。

  1. TextFileConsecutiveDelimiter

当向查询表中导入文本文件时,如果将连续分隔符看作是一个分隔符,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. TextFileDecimalSeparator

返回或设置小数分隔符,在将文本文件导入查询表中时,Microsoft Excel 将使用小数分隔符。默认值为系统小数分隔符。String 类型,可读写。

  1. TextFileFixedColumnWidths

返回或设置一个整数数组,该数组对应于正要向查询表中导入的文本文件的列宽(按字符)。有效的宽度为 1 到 32767 个字符。Variant 类型,可读写。

  1. TextFileOtherDelimiter

返回或设置在向查询表中导入文本文件时用作分隔符的字符。默认值为 null。String 类型,可读写。

  1. TextFileParseType

返回或设置要导入查询表的文本文件中数据的列格式。XlTextParsingType 类型,可读写。

  1. TextFilePlatform

返回或设置正向查询表中导入的文本文件的原始格式。该属性确定在数据导入过程中使用何种代码页。XlPlatform 类型,可读写。

  1. TextFilePromptOnRefresh

如果每次刷新查询表时都要指定导入文本文件的名称,则该属性值为 True。“导入文本文件”对话框允许用户指定路径和文件名。默认值为 False。Boolean 类型,可读写。

  1. TextFileSemicolonDelimiter

如果该值为 True,则在将文本文件导入查询表时使用分号作为分隔符,并且 TextFileParseType 属性的值为 xlDelimited。默认值是 False。Boolean 类型,可读写。

  1. TextFileSpaceDelimiter

如果向查询表中导入文本文件时,使用空格字符作为分隔符,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. TextFileStartRow

返回或设置向查询表中导入文本文件时进行文本分列的起始行号。其有效值为 1 到 32767 之间的整数。默认值为 1。Long 类型,可读写。

  1. TextFileTabDelimiter

如果向查询表中导入文本文件时使用 Tab 作为分隔符,则该值为 True。默认值为 False。Boolean 类型,可读写。

  1. TextFileTextQualifier

返回或设置向查询表中导入文本文件时的文本识别符。文本识别符用于指定包含的数据是文本格式。XlTextQualifier 类型,可读写。

  1. TextFileThousandsSeparator

返回或设置向查询表中导入文本文件时 Microsoft Excel 所使用的千位分隔符。默认为系统千位分隔符。String 类型,可读写。

  1. TextFileTrailingMinusNumbers

如果为 True,则表示 Microsoft Excel 将导入的数字作为以“-”符号开头的文本,“-”符号为负号。如果为 False,则表示 Excel 将导入的数字作为以“-”符号开头的文本,“-”符号为文本。Boolean 类型,可读写。

  1. TextFileVisualLayout

返回或设置一个 XlTextVisualLayoutType 枚举,该枚举表示导入的文本的可见布局是从左到右还是从右到左。

  1. TextFrame

返回一个 TextFrame 对象,它包含指定形状的对齐方式和定位属性。
语法
表达式.TextFrame
表达式   一个代表 Shape 对象的变量。

  1. TextFrame2

返回一个 TextFrame2 对象,该对象包含指定形状的文本格式。只读。
版本信息
 已添加版本:  Excel 2007
语法
表达式.TextFrame2
表达式   一个代表 Shape 对象的变量。

  1. TextOperator

返回或设置一个 XlContainsOperator 枚举常量,该常量指定条件格式规则执行的文本搜索。

  1. TextToColumns

将包含文本的一列单元格分解为若干列
本示例将剪贴板中的内容(以空格分隔的文字表格)转换为Sheet1中单独的列内。可用“记事本”或“写字板”(或其他文本编辑器)创建简单的以空格分隔的表格,将该表格复制到剪贴板,再切换到 Microsoft Excel,然后运行本示例。
Worksheets("Sheet1").Activate
ActiveSheet.Paste
Selection.TextToColumns DataType:=xlDelimited, _
    ConsecutiveDelimiter:=True, Space:=True

  1. TextToDisplay

返回或设置要为指定超链接显示的文本。默认值为超链接的地址。String 类型,可读写。

  1. TextureAlignment

返回或设置指定 FillFormat 对象的文本对齐方式。可读/写。

  1. TextureHorizontalScale

返回或设置 FillFormat 对象的横向文本缩放值。可读/写 Single 类型。

  1. TextureName

返回指定填充的自定义纹理文件名称。String 型,只读。

  1. TextureOffsetX

返回指定填充的偏移 X 值。可读/写 Single 类型。

  1. TextureOffsetY

返回指定填充的偏移 Y 值。可读/写 Single 类型。

  1. TextureTile

返回指定填充的纹理平铺样式。可读/写 MsoTriState 类型。

  1. TextureType

返回指定填充的纹理类型。MsoTextureType,只读。

  1. TextureVerticalScale

返回指定填充的纹理垂直缩放。可读/写 Single 类型。

  1. ThemeColor

返回或设置已应用的配色方案中的主题颜色,该配色方案与指定对象相关联。可读/写 Variant 类型。

  1. ThemeColor

返回或设置已应用的配色方案中的主题颜色,该配色方案与指定对象相关联。可读/写 XlThemeColor 类型。

  1. Thickness

返回或设置一个 Long 类型的值,该值指定基底的厚度。可读/写。

  1. Thickness

返回或设置一个指定边框粗细的 Long 类型的值。可读/写。

  1. ThisCell

返回单元格,在该单元格中,将用户定义的函数作为 Range 对象进行调用。
在本示例中,名为“UseThisCell”的函数包括 ThisCell 属性,以便将单元格的地址通知用户。
Function UseThisCell()
    MsgBox "The cell address is: " & _
        Application.ThisCell.Address
End Function

  1. ThisWorkbook

返回一个 Workbook 对象,该对象代表 当前宏代码运行的工作簿
本示例关闭包含示例代码的工作簿,不保存对工作簿的任何更改。
ThisWorkbook.Close SaveChanges:=False

  1. ThousandsSeparator

设置或返回用于千位分隔符的字符
本示例将“1,234,567.89”放置在单元格 A1 中,然后将系统的十位分隔符和千位分隔符更改为短划线。
Sub ChangeSystemSeparators()
    Range("A1").Formula = "1,234,567.89"
    MsgBox "The system separators will now change."
    ' Define separators and apply.
    Application.DecimalSeparator = "-"
    Application.ThousandsSeparator = "-"
    Application.UseSystemSeparators = False
End Sub

  1. ThreeD

返回一个 ThreeDFormat 对象,它包含指定形状的三维效果格式属性。只读。
语法
表达式.ThreeD
表达式   一个代表 Shape 对象的变量。

  1. TickLabelPosition

说明指定坐标轴上刻度线标志的位置。XlTickLabelPosition 类型,可读写。

  1. TickLabels

返回一个 TickLabels 对象,该对象表示指定坐标轴的刻度线标签。只读。

  1. TickLabelSpacing

返回或设置刻度线标签之间的分类数或数据系列数。仅应用于分类轴和系列轴。可以是 1 到 31999 之间的一个数值。Long 类型,可读写。

  1. TickLabelSpacingIsAuto

返回或设置刻度标签间距是否是自动设置的。可读/写 Boolean 类型。

  1. TickMarkSpacing

返回或设置刻度线之间的分类数或数据系列数。仅应用于分类轴和系列轴。可以是 1 到 31999 之间的一个数值。Long 类型,可读写。

  1. Time

设置系统时间。
语法
Time = time
必要的 time 参数,可以是任何能够表示时刻的数值表达式、字符串表达式或它们的组合。

  1. Time

返回一个指明当前系统时间的 Variant (Date)。
语法
Time
说明
为了设置系统时间,请使用 Time 语句。

  1. Time

设置或返回 AutoRecover 对象的时间间隔。允许的值为从 1 到 120 分钟的整数。默认值为 10 分钟。Long 类型,可读写。
语法
表达式.Time
表达式   一个代表 AutoRecover 对象的变量。

  1. Timer

返回一个 Single,代表从午夜开始到现在经过的秒数。
语法
Timer
说明
Microsoft Windows中,Timer函数返回一秒的小数部分。在Macintosh上,计时器的精度是1秒。

  1. TimeSerial

返回一个 Variant (Date),包含具有具体时、分、秒的时间。
语法
TimeSerial(hour, minute, second)
hour 必要;Variant (Integer)。其值从 0 (12:00 A.M.) 到 23 (11:00 P.M.),或一数值表达式。
minute 必要;Variant (Integer)。任何数值表达式。
second 必要;Variant (Integer)。任何数值表达式。

  1. TimeValue

返回一个包含时间的 Variant (Date)。
语法
TimeValue(time)
必要的 time 参数,通常是一个字符串表达式,表示 0:00:00 (12:00:00 A.M.) 到 23:59:59 (11:59:59 P.M.) 之间的时刻。但是,time 也可以是表示在同一时间范围取值的任何其它表达式。如果 time 包含 Null,则返回 Null。

  1. TintAndShade

返回或设置一个 Single,使颜色变深或变浅。

  1. TInv

返回作为概率和自由度函数的学生 t 分布的 t 值。

  1. TipOfDay

如果每次打开 Office 应用程序时“Office 助手”显示一个特殊提示,则为 True。可读/写。

  1. Title

返回或设置受保护的工作上可编辑的单元格区域的标题。String 型,可读写。

  1. Title

返回或设置在将文档另存为网页时的网页标题。String 型,可读写。

  1. ToggleVerticalText

将指定艺术字中的文字排列方向从水平切换为垂直,反之亦然。

  1. Top

从屏幕顶端到 Microsoft Excel 主窗口顶端的距离

  1. Top

从窗口顶端到可用区域(在菜单、任何停放在顶端的工具栏和编辑栏下方)顶端的距离
本示例水平排列第一个窗口和第二个窗口,也就是说,每个窗口占用可用的垂直空间的一半,占用应用程序窗口的工作区域的所有水平空间。若要运行该示例,必须只打开两个工作表窗口
Windows.Arrange xlArrangeTiled
ah = Windows(1).Height                      ' available height
aw = Windows(1).Width + Windows(2).Width    ' available width
With Windows(1)
    .Width = aw
    .Height = ah / 2
    .Left = 0
End With
With Windows(2)
    .Width = aw
    .Height = ah / 2
    .Top = ah / 2
    .Left = 0
End With

  1. Top

从第一行顶端到该区域顶端的距离
本示例水平排列第一个窗口和第二个窗口,也就是说,每个窗口占用可用的垂直空间的一半,占用应用程序窗口的工作区域的所有水平空间。若要运行该示例,必须只打开两个工作表窗口。
Windows.Arrange xlArrangeTiled
ah = Windows(1).Height                      ' available height
aw = Windows(1).Width + Windows(2).Width    ' available width
With Windows(1)
    .Width = aw
    .Height = ah / 2
    .Left = 0
End With
With Windows(2)
    .Width = aw
    .Height = ah / 2
    .Top = ah / 2
    .Left = 0
End With

  1. Top

设置或获取“Office 助手”顶部与屏幕顶边之间的距离(以磅为单位)。可读写。

  1. Top

设置或获取指定的命令栏顶边到屏幕顶边的距离。对于固定命令栏,此属性返回或设置从命令栏到停靠区域顶部的距离。可读写。
语法
表达式.Top
表达式   必需。一个代表 CommandBar 对象的变量。

  1. Top

返回或设置一个 Single 值,它代表形状范围内最上面的形状的上边缘到工作表上边缘的距离(以磅为单位)。
语法
表达式.Top
表达式   一个代表 Shape 对象的变量。

  1. Top

返回或设置一个 Double 值,它代表从对象的上边缘到工作表第一行顶部或图表上的图表区顶部的距离(以磅为单位)。

  1. Top

返回一个 Double 值,它代表从对象的上边缘到工作表第一行顶部或图表上的图表区顶部的距离(以磅为单位)。

  1. Top

返回或设置一个 Double 值,它代表从窗口上边缘到使用区域(在菜单、任何停放在顶端的工具栏和编辑栏下方)上边缘的距离(以磅为单位)。
语法
表达式.Top
表达式   一个代表 Window 对象的变量。

  1. TopLeftCell

返回一个 Range 对象,它代表位于指定对象左上角下方的单元格。只读。
语法
表达式.TopLeftCell
表达式   一个代表 Shape 对象的变量。

  1. TopLeftCell

返回一个 Range 对象,它代表位于指定对象左上角下方的单元格。只读。

  1. TopMargin

以磅为单位返回或设置上边距的大小。Double 类型,可读写。

  1. ToRecipients

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. TotalLevels

返回当前字段组中的字段总数。如果字段没有分组或数据源基于的是 OLAP,则 TotalLevels 将返回值 1。Long 类型,只读。

  1. TotalsAnnotation

如果在基于 OLAP 数据源的指定数据透视表中,每个分类汇总和总计旁都显示有星号 (*),则该值为 True。默认值为 True。Boolean 类型,可读写。

  1. Tracking

返回或设置指定艺术字中每个字符的水平间隔相对于字符宽度的比例。该比例可为从 0 到 5 之间的值。(为该属性指定的值越大,字符间的空间越大;小于 1 的值会产生字符重叠)。可读写。Single 类型。

  1. TrackStatus

如果允许对传送名单进行状态追踪,则该属性值为 True。Boolean 类型,可读写。

  1. TransitionExpEval

如果 Microsoft Excel 对工作表使用 Lotus 1-2-3 的表达式求值规则,则该值为 True。
本示例设置 Microsoft Excel 对 Sheet1 使用 Lotus 1-2-3 表达式求值规则。
Worksheets("Sheet1").TransitionExpEval = True

  1. TransitionMenuKey

返回或设置 Microsoft Excel 菜单或帮助键,通常为“/”。
本示例将 1-2-3 的帮助菜单键设为“/”(默认键)。
Application.TransitionMenuKey = "/"

  1. TransitionMenuKeyAction

返回或设置按下 Microsoft Excel 菜单键后将执行的操作
本示例设置按下 Microsoft Excel 菜单键后将运行“Lotus 1-2-3 帮助”。
Application.TransitionMenuKeyAction = xlLotusHelp

  1. TransitionNavigKeys

如果 Lotus 1-2-3 常用键是活动的,则该值为 True
本示例显示“lotus 1-2-3 常用键”选项的当前状态。
If Application.TransitionNavigKeys Then
    keyState = "On"
Else
    keyState = "Off"
End If
MsgBox "The Transition Navigation Keys option is " & keyState

  1. Transparency

返回或设置指定填充的透明度,取值范围为 0.0(不透明)到 1.0(清晰)之间。Double 型,可读写。

  1. TransparencyColor

返回或设置指定图片的透明色,以红-绿-蓝 (RGB) 值表示。必须将 TransparentBackground 属性设置为 True,该属性才有效。仅应用于位图。Long 类型,可读写。

  1. TransparentBackground

使用 TransparencyColor 属性可设置透明颜色。仅应用于位图。MsoTriState 类型,可读写。

  1. Transpose

返回转置单元格区域,即将一行单元格区域转置成一列单元格区域,反之亦然。在行列数分别与数组的行列数相同的区域中,必须将 TRANSPOSE 输入为数组公式。使用 TRANSPOSE 可在工作表中转置数组的垂直和水平方向。

  1. TreeviewControl

返回 CubeField 对象的 TreeviewControl 对象,该对象表示基于 OLAP 的数据透视表的多维数据集操作控件。只读。

  1. Trend

返回一条线性回归拟合线的一组纵坐标值(y 值)。即找到适合给定的数组 known_y's 和 known_x's 的直线(用最小二乘法),并返回指定数组 new_x's 值在直线上对应的 y 值。

  1. Trendlines

返回一个对象,该对象表示单个趋势线(Trendline 对象)或所有趋势线的集合(Trendlines 集合)。

  1. Trim

删除文本中的所有空格(除了单词之间的单个空格外)。对于从其他应用程序中获取带有不规则空格的文本,可以使用 TRIM。

  1. TrimMean

返回数据集的内部平均值。函数 TRIMMEAN 先从数据集的头部和尾部除去一定百分比的数据点,然后再求平均值。当希望在分析中剔除一部分数据的计算时,可以使用此函数。

  1. TTest

返回与学生 t 检验相关的概率。可以使用函数 TTEST 判断两个样本是否可能来自两个具有相同平均值的总体。

  1. TwoColorGradient

将指定填充设为双色渐变。

  1. TwoInitialCapitals

如果自动更正以两个大写字母开头的词,则该属性值为 True。Boolean 类型,可读写。
语法
表达式.TwoInitialCapitals
表达式   一个代表 AutoCorrect 对象的变量。

  1. Type

返回或设置窗口类型
expression.Type
expression必需。该表达式返回一个 Window 对象。

  1. Type

返回或设置工作表类型
expression.Type
expression必需。该表达式返回一个Worksheet对象

  1. Type

在模块级别中使用,用于定义包含一个或多个元素的用户自定义的数据类型。
语法
[Private | Public] Type varname
elementname [([subscripts])] As type
[elementname [([subscripts])] As type]
. . .
End Type
Public 可选的。用于声明可在所有工程的所有模块的任何过程中使用的用户定义类型。
Private 可选的。用于声明只能在包含该声明的模块中使用的用户自定义的类型。
varname 必需的。用户自定义类型的名称;遵循标准的变量命名约定
elementname 必需的。用户自定义类型的元素名称。除了可以使用的关键字,元素名称也应遵循标准变量命名约定。
subscripts 可选的。数组元素的维数。当定义大小可变的数组时,只须圆括号。subscripts 参数使用如下语法:
  [lower To] upper [,[lower To] upper] . . .
如果不显式指定 lower,则数组的下界由 Option Base 语句控制。如果没有 Option Base 语句则下界为 0。
type 必需的。元素的数据类型;可以是Byte、Boolean、Integer、Long、Currency、Single、Double、Decimal(目前尚不支持)、Date、String(对变长的字符串)、String * length(对定长的字符串)、Object、Variant、其它的用户自定义的类型或对象类型。

  1. Type

获取命令栏的类型。只读。
语法
表达式.Type
表达式   必需。一个代表 CommandBar 对象的变量。

  1. Type

返回一个包含 xlFormatConditionType 值的 Long 值,它代表对象类型。

  1. Type

返回一个包含 MsoHyperlinkType 常量的 Long 值,它代表 HTML 框架的位置。

  1. Type

返回一个包含 XlDVType 常量的 Long 值,它代表区域的数据类型有效性验证。

  1. Type

返回或设置一个代表形状类型的 MsoShapeType 值。
语法
表达式.Type
表达式   一个代表 Shape 对象的变量。

  1. Type

返回一个代表填充类型的 MsoFillType 值。

  1. Type

返回或设置一个 MsoConnectorType 值,它代表连接符格式类型。

  1. Type

返回或设置一个代表阴影格式类型的 MsoShadowType 值。

  1. Type

返回一个 XlSmartTagControlType 值,它代表在“文档操作”任务窗格中显示的“智能文档”控件的类型。

  1. Type

返回或设置一个 XlPageBreak 值,它代表分页符类型。

  1. Type

返回一个代表参数类型的 XlParameterType 值。

  1. Type

返回一个 XlCalculatedMemberType 值,它代表计算成员类型。

  1. Type

返回或设置一个代表系列类型的 Long 值。

  1. Type

返回或设置一个 XlTrendlineType 值,它代表趋势线的类型。

  1. Type

返回一个 XlAxisType 值,它代表“坐标轴”类型。

  1. Type

获取或设置文档属性类型。对于内置文档属性为只读;对于自定义文档属性为可读/写。

  1. Type

返回或设置一个代表窗口类型的 XlWindowType 值。
语法
表达式.Type
表达式   一个代表 Window 对象的变量。

  1. TypeName

返回一个 String,提供有关变量的信息。
语法
TypeName(varname)
必要的 varname 参数是一个 Variant,它包含用户定义类型变量之外的任何变量。

  1. Excel VBA属性、方法、事件大全——Part15(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. Ubound

返回一个 Long 型数据,其值为指定的数组维可用的最大下标。
语法
UBound(arrayname[, dimension])
arrayname 必需的。数组变量的名称,遵循标准变量命名约定。
dimension 可选的;Variant (Long)。指定返回哪一维的上界。1 表示第一维,2 表示第二维,如此等等。如果省略 dimension,就认为是 1。

  1. Ucase

返回 Variant (String),其中包含转成大写的字符串。
语法
UCase(string)
必要的 string 参数为任何有效的字符串表达式。如果 string 包含 Null,将返回 Null。

  1. Underline

返回或设置应用于字体的下划线类型
本示例将 Sheet1 中活动单元格的字体设为单下划线。
Worksheets("Sheet1").Activate
ActiveCell.Font.Underline = xlUnderlineStyleSingle

  1. Undo

撤消最后一次用户界面操作
本示例撤消最后一次用户界面操作。本示例必须放在宏的第一行。
Application.Undo

  1. Ungroup

在分级显示中对一个区域进行升级(即降低其分级显示的级别)。
本示例取消 ORDER_DATE 字段的分组。
Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
Set groupRange = pvtTable.PivotFields("ORDER_DATE").DataRange
groupRange.Cells(1).Ungroup

  1. Ungroup

取消指定形状或者形状区域中组合形状的组合。取消指定形状或形状区域中图片和 OLE 对象的组合。
语法
表达式.Ungroup
表达式   一个代表 Shape 对象的变量。
返回值
一个 ShapeRange 对象,它代表取消组合的形状。

  1. Union

返回两个或多个区域的合并区域
本示例以公式“=RAND()”填充两个命名区域(“Range1”和“Range2”)的合并区域。
Worksheets("Sheet1").Activate
Set bigRange = Application.Union(Range("Range1"), Range("Range2"))
bigRange.Formula = "=RAND()"

  1. Unload

从内存中删除一个对象。
语法
Unload object
必要的 object 参数,代表对象表达式,其值为“应用于”列表中的对象。

  1. UnlockedFormulaCells

如果该值为 True(默认值),则 Microsoft Excel 将识别未锁定并包含一个公式的选定单元格。如果该值为 False,则禁用包含公式的未锁定单元格的错误检查。Boolean 类型,可读写。

  1. UnMerge

将合并区域分解为独立的单元格
本示例将包含单元格 A3 的合并区域分解。
With Range("a3")
    If .MergeCells Then
        .MergeArea.UnMerge
    Else
        MsgBox "not merged"
    End If
End With

  1. Unprotect

取消工作表或工作簿的保护。
本示例取消当前活动工作簿的保护。
ActiveWorkbook.Unprotect

  1. Unprotect

取消工作表或工作簿的保护
本示例取消当前活动工作簿的保护。
ActiveWorkbook.Unprotect

  1. Unprotect

取消工作表或工作簿的保护。如果工作表或工作簿不是受保护的,则此方法不起作用。

  1. UnprotectSharing

关闭共享保护功能并保存工作簿。
本示例关闭共享保护,并保存当前活动工作簿。
ActiveWorkbook.UnprotectSharing

  1. UpBars

返回 UpBars 对象,该对象表示折线图上的涨柱线。仅应用于折线图。只读。

  1. Update

根据保存在 Windows 注册表中的加载项列表更新 COMAddIns 集合的内容。

  1. Update

更新链接。

  1. Update

更新数据透视表。

  1. UpdateFromFile

如果磁盘上的工作簿版本比内存中的当前工作簿副本新,则用磁盘上保存的工作簿文件更新只读工作簿
本示例使用磁盘上的文件更新当前活动工作簿。
ActiveWorkbook.UpdateFromFile

  1. UpdateLink

更新 Microsoft Excel 链接、DDE 链接或 OLE 链接。
本示例更新当前活动工作簿中的所有链接。
ActiveWorkbook.UpdateLink Name:=ActiveWorkbook.LinkSources

  1. UpdateLinks

返回或设置一个 XlUpdateLink 常量,该常量指示更新嵌入 OLE 链接的工作簿设置
在本示例中,Microsoft Excel 确定更新链接的设置,并通知用户。
Sub UseUpdateLinks()
    Dim wkbOne As Workbook
    Set wkbOne = Application.Workbooks(1)
    Select Case wkbOne.UpdateLinks
        Case xlUpdateLinksAlways
            MsgBox "Links will always be updated " & _
                "for the specified workbook."
        Case xlUpdateLinksNever
            MsgBox "Links will never be updated " & _
                "for the specified workbook."
        Case xlUpdateLinksUserSetting
            MsgBox "Links will update according " & _
                "to user settting for the specified workbook."
    End Select
End Sub

  1. UpdateLinksOnSave

如果该属性值为 True,则将文档保存为网页之前,自动更新超链接和所有指向支持文件的路径,以确保文档保存时包含最新的链接。如果该属性值为 False,则不更新链接。默认值为 True。Boolean 类型,可读写。

  1. UpdateRemoteReferences

如果 Microsoft Excel 对指定工作簿中导入的远程引用进行更新,则该值为 True
本示例更新活动工作簿中的远程引用。
ActiveWorkbook.UpdateRemoteReferences = True

  1. UpgradeOnRefresh

包含有关是否在下一次刷新时升级 PivotCache 及所有连接的数据透视表的信息。可读/写 Boolean 类型。

  1. Uri

返回一个 String 类型的数值,该数值表示指定 XML 命名空间的统一资源定位符 (URI)。只读。

  1. UsableHeight

以磅为单位返回在应用程序窗口区域中一个窗口能占有的最大高度
本示例将活动窗口扩展为可用的最大值(假定指定窗口尚未最大化)。
With ActiveWindow
    .WindowState = xlNormal
    .Top = 1
    .Left = 1
    .Height = Application.UsableHeight
    .Width = Application.UsableWidth
End With

  1. UsableHeight

以磅为单位返回在应用程序窗口区域中一个窗口能占有的最大高度。
本示例将活动窗口扩展为可用的最大值(假定指定窗口尚未最大化)。
With ActiveWindow
    .WindowState = xlNormal
    .Top = 1
    .Left = 1
    .Height = Application.UsableHeight
    .Width = Application.UsableWidth
End With

  1. UsableHeight

返回在应用程序窗口区域中一个窗口能占有的最大高度(以磅 (磅:指打印的字符的高度的度量单位。1 磅等于 1/72 英寸,或大约等于 1 厘米的 1/28。)为单位)。Double 型,只读。
语法
表达式.UsableHeight
表达式   一个代表 Window 对象的变量。

  1. UsableWidth

以磅为单位返回在应用程序窗口区域中一个窗口能占有的最大宽度
本示例将活动窗口扩展为可用的最大值(假定指定窗口尚未最大化)。
With ActiveWindow
    .WindowState = xlNormal
    .Top = 1
    .Left = 1
    .Height = Application.UsableHeight
    .Width = Application.UsableWidth
End With

  1. UsableWidth

返回在应用程序窗口区域中一个窗口能占有的最大宽度(以磅 (磅:指打印的字符的高度的度量单位。1 磅等于 1/72 英寸,或大约等于 1 厘米的 1/28。)为单位)。Double 型,只读。
语法
表达式.UsableWidth
表达式   一个代表 Window 对象的变量。

  1. USDollar

将数字转换为文本格式并应用货币符号。方法的名称(及其应用的货币符号)取决于语言设置。

  1. UseDefaultFolderSuffix

根据所选或安装的语言支持,将含指定文档的文件夹后缀设置为默认后缀。

  1. UsedObjects

返回一个 UsedObjects 对象,该对象代表在工作簿中分配的对象
在本示例中,Microsoft Excel 确定已分配的对象的个数,并通知用户。本示例假定在应用程序中执行重新计算,并且在完成前中断重新计算。
Sub CountUsedObjects()
    MsgBox "The number of used objects in this application is: " & _
        Application.UsedObjects.Count
End Sub

  1. UsedObjects

代表工作簿中已分配的对象
可用 Application 对象的 UsedObjects 属性返回一个 UsedObjects 对象
本示例假定在应用程序中执行重新计算,并且在完成前中断重新计算。
Sub CountUsedObjects()
    MsgBox "The number of used objects in this application is: " & _
        Application.UsedObjects.Count
End Sub

  1. UsedRange

返回代表指定工作表上已使用区域的 Range 对象
本示例选定 Sheet1 中的已用区域。
Worksheets("Sheet1").Activate
ActiveSheet.UsedRange.Select

  1. UseLocalConnection

如果 LocalConnection 属性用于指定使 Microsoft Excel 能够连接到数据源的字符串,则返回 True。如果使用 Connection 属性指定的连接字符串,则返回 False。Boolean 类型,可读写。

  1. UseLongFileNames

如果该属性值为 True,则将文档保存为网页时使用长文件名。如果该属性值为 False,则不使用长文件名,而使用 DOS 文件名格式(8.3)。默认值是 True。Boolean 类型,可读写。

  1. UseMemberPropertyAsCaption

此属性用于控制是否将成员属性标题用于透视字段的 PivotItem 标题。可读/写 Boolean 类型。

  1. UserControl

如果应用程序可见,或者用户已创建或启动应用程序,则该值为 True
本示例显示 UserControl 属性的状态。
If Application.UserControl Then
    MsgBox "This workbook was created by the user"
Else
    MsgBox "This workbook was created programmatically"
End If

  1. UserDict

当在工作表上执行拼写检查时,指示 Microsoft Excel 创建自定义词典,以便向该词典中添加新单词。String 类型,可读写。

  1. UserLibraryPath

返回用户计算机上 COM 加载宏安装位置的路径
本示例确定用户计算机上 COM 加载宏的安装路径, 并为变量 strLibPath 赋一个字符串值。
strLibPath = Application.UserLibraryPath

  1. UserName

返回或设置当前用户的名称
本示例显示当前用户的名称。
MsgBox "Current user is " & Application.UserName

  1. UserPicture

用图像填充指定的形状。

  1. Users

返回工作表上受保护区域的一个 UserAccessList 对象。

  1. UserStatus

返回一个基于 1 的二维数组,该数组提供有关每一个以共享清单模式打开工作簿的用户的信息
本示例新建一个工作簿,并将所有以共享清单模式打开活动工作簿的用户的信息插入新工作簿。
users = ActiveWorkbook.UserStatus
With Workbooks.Add.Sheets(1)
    For row = 1 To UBound(users, 1)
        .Cells(row, 1) = users(row, 1)
        .Cells(row, 2) = users(row, 2)
        Select Case users(row, 3)
            Case 1
                .Cells(row, 3).Value = "Exclusive"
            Case 2
                .Cells(row, 3).Value = "Shared"
        End Select
    Next
End With

  1. UserTextured

用平铺的小图像填充指定形状。如果要用一个大图像来填充该形状,请使用 UserPicture 方法。

  1. UseStandardHeight

如果Range对象的行高等于工作表的标准行高,则该值为 True
本示例将工作表 sheet1 上行一的行高设置为标准行高。
Worksheets("Sheet1").Rows(1).UseStandardHeight = True

  1. UseStandardWidth

如果Range对象的列宽等于工作表的标准列宽,则该值为 True
本示例将工作表 sheet1 上的 A 列的列宽设置为标准列宽。
Worksheets("Sheet1").Columns("A").UseStandardWidth = True

  1. UseSystemSeparators

如果 Microsoft Excel 的系统分隔符可用,则该值为 True
本示例中,“1,234,567.89”位于单元格 A1 中。然后十位和千位系统分隔符被更改为短划线。
Sub ChangeSystemSeparators()
    Range("A1").Formula = "1,234,567.89"
    MsgBox "The system separators will now change."

    ' Define separators and apply.
    Application.DecimalSeparator = "-"
    Application.ThousandsSeparator = "-"
    Application.UseSystemSeparators = False
End Sub

  1. Excel VBA属性、方法、事件大全——Part16(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. VacatedStyle

返回或设置当数据透视表刷新时,应用于空单元格的样式。默认值为无效字符串。(默认状态下没有样式应用)。String 类型,可读写。

  1. Val

返回包含于字符串内的数字,字符串中是一个适当类型的数值。
语法
Val(string)
必要的 string 参数可以是任何有效的字符串表达式.

  1. Validation

返回Validation对象,该对象代表指定区域内的数据有效性检验。
本示例使单元格 E5 的数据有效性检验为允许有空值。
Range("e5").Validation.IgnoreBlank = True

  1. ValidWorkbookParameter

如果指定的 Name 对象是有效的工作簿参数,则返回 True。只读 Boolen 类型。
语法
表达式.ValidWorkbookParameter
表达式   一个代表 Name 对象的变量。

  1. Value

对于 Application 对象,总是返回“Microsoft Excel”
expression.Value
expression必需。该表达式返回上面的对象之一。

  1. Value

返回或设置指定区域的值
本示例将 Sheet1 上 A1 单元格的值设置为 3.14159。
Worksheets("Sheet1").Range("A1").Value = 3.14159

  1. Value

Borders.LineStyle 的同义词。
expression.Value
expression必需。该表达式返回上面的对象之一。

  1. Value

返回或设置一个 String 值,它代表规定名称去引用的公式。
语法
表达式.Value
表达式   一个代表 Name 对象的变量。

  1. Value

返回一个 Boolean 值,它指明是否符合所有的有效性验证条件(即,该区域是否包含有效数据)。

  1. Value

返回一个 String 值,它代表指定样式的名称。
语法
表达式.Value
表达式   一个代表 Style 对象的变量。

  1. Value

返回或设置一个 Long 值,它代表指定的控件格式的名称。

  1. Value

Borders.LineStyle 的同义词。

  1. Value

返回一个代表参数值的 Variant 值。

  1. Value

返回或设置一个 String 值,它代表数据透视表的名称。

  1. Value

返回一个 String 值,它

  1. Value

返回或设置一个 String 值,它代表数据透视表中指定的字段的名称。

  1. Value

返回或设置一个 String 值,它代表数据透视表中指定的公式的名称。

  1. Value

返回或设置一个 String 值,它代表数据透视表中指定的数据项的名称。

  1. Value

获取或设置文档属性的值。可读/写。

  1. Value

返回一个 String 值,它代表指定样式的名称。

  1. Value

返回一个 String 值,该值代表已添加到工作簿的 XML 命名空间。

  1. Value2

返回或设置单元格值
本示例使用 Value2 属性对两个单元格的值进行相加。
Range("a1").Value2 = Range("b1").Value2 + Range("c1").Value2

  1. Values

返回一个 Variant 数组,它包含方案的可变单元格的当前值。

  1. Values

返回或设置一个 Variant 值,它代表系列中所有值的集合。

  1. Var

估算基于样本的方差。

  1. VarP

计算基于整个总体的方差。

  1. VarType

返回一个 Integer,指出变量的子类型。
语法
VarType(varname)
必要的 varname 参数是一个 Variant,包含用户定义类型变量之外的任何变量。

  1. VaryByCategories

如果 Microsoft Excel 对每个数据标志指定不同的颜色或模式,则该值为 True。图表中必须只包含一个数据系列。Boolean 类型,可读写。

  1. VBASigned

如果指定工作簿的 Visual Basic for Applications 项目已进行过数字签名,则该值为 True
本示例加载名为 mybook.xls 的工作簿,然后检测其 Visual Basic for Applications 项目是否已进行数字签名。如果没有进行数字签名,则本示例将显示警告消息。
Workbooks.Open FileName:="c:\My Documents\mybook.xls", _
    ReadOnly:=False
If Workbook.VBASigned = False Then
    MsgBox "Warning! The project " _
    "has not been digitally signed." _
    , vbCritical, "Digital Signature Warning"
End If

  1. VBE

返回一个 VBE 对象,该对象代表 Visual Basic 编辑器
本示例更改活动的 Visual Basic 项目的名称。
Application.VBE.ActiveVBProject.Name = "TestProject"

  1. VBProject

返回一个 VBProject 对象,该对象代表指定工作簿中的 Visual Basic 项目
本示例更改工作簿中活动的 Visual Basic 项目的名称。
ThisWorkbook.VBProject.Name = "TestProject"

  1. Vdb

使用双倍余额递减法或其他指定的方法,返回指定的任何期间内(包括部分期间)的资产折旧值。函数 VDB 代表可变余额递减法。

  1. Verb

向指定的 OLE 对象服务器发送动词。

  1. Version

返回 Microsoft Excel 版本号
本示例显示包含 Microsoft Excel 版本号和操作系统名称的消息框。
MsgBox "Welcome to Microsoft Excel version " & _
    Application.Version & " running on " & _
    Application.OperatingSystem & "!"

  1. Version

返回一个 XlPivotTableVersionList 值,它代表 Microsoft Excel 版本号。

  1. Version

返回在其中创建数据透视表缓存的 Microsoft Excel 版本。只读。

  1. VerticalAlignment

返回或设置指定对象的垂直对齐方式
本示例将Sheet1上第二行的行高设置为标准行高的两倍,然后使该行的内容垂直居中。
Worksheets("Sheet1").Rows(2).RowHeight = _
    2 * Worksheets("Sheet1").StandardHeight
Worksheets("Sheet1").Rows(2).VerticalAlignment = xlVAlignCenter

  1. VerticalAlignment

返回或设置一个 Variant 值,它代表指定对象的垂直对齐方式。
语法

表达式.VerticalAlignment

表达式   一个代表 CellFormat 对象的变量。

  1. VerticalAlignment

返回或设置一个 XlVAlign 值,它代表指定对象的垂直对齐方式。
语法
表达式.VerticalAlignment
表达式   一个代表 Style 对象的变量。

  1. VerticalAlignment

返回或设置一个 XlVAlign 值,它代表指定对象的垂直对齐方式。

  1. VerticalAlignment

返回或设置一个 Variant 值,它代表指定对象的垂直对齐方式。

  1. VerticalFlip

如果指定的形状绕垂直坐标轴翻转,则此属性为 True。MsoTriState 类型,只读。
语法
表达式.VerticalFlip
表达式   一个代表 Shape 对象的变量。

  1. Vertices

将指定任意多边形形状的顶点(及贝塞尔曲线的控制点)坐标作为一系列坐标对 (坐标对:一对值,表示两维数组中存储的点的 x 和 y 坐标,该数组中包含许多点的坐标。)返回。可将此属性返回的数组用作 AddCurve 方法或 AddPolyLine 方法的参数。Variant 型,只读。
语法
表达式.Vertices
表达式   一个代表 Shape 对象的变量。

  1. View

返回或设置在窗口中显示的视图。
本示例将活动窗口中的视图切换为分页预览。
ActiveWindow.View = xlPageBreakPreview

  1. View

返回或设置在窗口中显示的视图。XlWindowView 类型,可读写。
语法
表达式.View
表达式   一个代表 Window 对象的变量。

  1. ViewCalculatedMembers

如果设置为 True(默认),则可以查看联机分析处理 (OLAP) 数据透视表的计算成员。Boolean 类型,可读写。

  1. Visible

决定对象是否可见
expression.Visible
expression必需。该表达式返回上面的对象之一。

  1. Visible

决定对象是否可见
expression.Visible
expression必需。该表达式返回上面的对象之一

  1. Visible

决定对象是否可见
本示例隐藏 Sheet1。
Worksheets("Sheet1").Visible = False
本示例将 Sheet1 设置为可见。
Worksheets("Sheet1").Visible = True

  1. Visible

决定对象是否可见。
expression.Visible
expression必需。该表达式返回上面的对象之一。

  1. Visible

获取或设置“Office 助手”的 Visible 属性。可读/写。

  1. Visible

获取或设置命令栏的 Visible 属性。如果命令栏可见,则为 True。可读写。
语法
表达式.Visible
表达式   一个代表 CommandBar 对象的变量。
返回值
Boolean

  1. Visible

返回或设置一个 Boolean 值,它确定对象是否可见。可读写。
语法
表达式.Visible
表达式   一个代表 Name 对象的变量。

  1. Visible

返回或设置一个 Variant 值,它确定对象是否可见。

  1. Visible

返回或设置一个 Boolean 值,它确定对象是否可见。可读写。

  1. Visible

返回或设置一个 MsoTriState 值,它确定对象是否可见。可读写。
语法
表达式.Visible
表达式   一个代表 Shape 对象的变量。

  1. Visible

返回或设置一个 MsoTriState 值,它确定对象是否可见。可读写。

  1. Visible

返回或设置一个 Variant 值,它确定对象是否可见。
语法
表达式.Visible
表达式   一个代表 Charts 对象的变量。

  1. Visible

返回或设置一个 Boolean 值,它确定对象是否可见。可读写。
语法
表达式.Visible
表达式   一个代表 Window 对象的变量。

  1. VisibleFields

返回一个对象,该对象表示数据透视表中的单个字段(PivotField 对象),或所有可见字段的一个集合(PivotFields 对象)。可见字段显示为行、列、页或数据字段。只读。

  1. VisibleItems

返回一个对象,该对象表示指定字段中的单个可见数据透视表项(PivotItem 对象),或指定字段中的所有可见项的集合(PivotItems 对象)。只读。

  1. VisibleItemsList

返回或设置一个 Variant 类型的值,该值指定一个字符串数组,字符串代表应用于透视字段的手动筛选中的包含项。可读/写。

  1. VisibleRange

返回一个 Range 对象,该对象代表在窗口或窗格中可见的单元格区域。
本示例显示工作表 sheet1 中可见单元格的数目。
Worksheets("Sheet1").Activate
MsgBox "There are " & Windows(1).VisibleRange.Cells.Count _
    & " cells visible"

  1. VisibleRange

返回一个 Range 对象,它代表显示在窗口或窗格中的单元格区域。如果列或行只显示了一部分,则说明它是包括在区域之内的。只读。
语法
表达式.VisibleRange
表达式   一个代表 Window 对象的变量。

  1. VisibleRange

返回一个 Range 对象,它代表显示在窗口或窗格中的单元格区域。如果列或行只显示了一部分,则说明它是包括在区域之内的。只读。

  1. VisualTotals

如果该属性值为 True(默认值),则在视图中隐藏项目后,联机分析处理(OLAP) 数据透视表将重新汇总。Boolean 类型,可读写。

  1. VLookup

在表格数组的首列查找值,并由此返回表格数组当前行中其他列的值。

  1. Volatile

用于将用户自定义函数标记为易失性函数
本示例将用户自定义函数“My_Func”标记为易失性函数。只要包含此函数的工作表上任何单元格中出现计算过程,此函数都将重新进行计算。
Function My_Func()
    Application.Volatile
    '
    '    Remainder of the function
    ">
End Function

  1. VPageBreaks

返回 VPageBreaks 集合,该集合代表工作表上的垂直分页符
本示例显示全屏幕垂直分页符和打印区域垂直分页符的总数。
For Each pb in Worksheets(1).VPageBreaks
    If pb.Extent = xlPageBreakFull Then
        cFull = cFull + 1
    Else
        cPartial = cPartial + 1
    End If
Next
MsgBox cFull & " full-screen page breaks, " & cPartial & _
    " print-area page breaks"

  1. VPageBreaks

返回一个 VPageBreaks 集合,它代表工作表上的垂直分页符。只读。

  1. VPageBreaks

返回一个 VPageBreaks 集合,它代表工作表上的垂直分页符。只读。
语法
表达式.VPageBreaks
表达式   一个代表 Charts 对象的变量。

  1. Excel VBA属性、方法、事件大全——Part17(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. Wait

暂停运行宏,直到一特定时间才可继续执行
本示例暂停一个正在执行的宏,到今天下午 6:23 时才可继续执行。
Application.Wait "18:23:00"
本示例显示一条消息,用以表明是否经过 10 秒钟。
If Application.Wait(Now + TimeValue("0:00:10")) Then
    MsgBox "Time expired"
End If

  1. Walls

返回一个 Walls 对象,该对象代表三维图表的背景墙。
本示例将 Chart1 的背景墙边框颜色设置为红色。本示例应在三维图表上运行。
Charts("Chart1").Walls.Border.ColorIndex = 3

  1. Walls

代表三维图表的背景墙。此对象不是集合。没有代表单个背景墙的对象;只能将所有的背景墙作为一个单位同时返回。

  1. WallsAndGridlines2D

如果三维图表中的网格线以二维方式绘制,则该值为 True
本示例使 Microsoft Excel 在 Chart1 中绘制二维网格线。
Charts("Chart1").WallsAndGridlines2D = True

  1. Watch

代表在重新计算工作表时跟踪的区域。Watch 对象允许用户验证其模型的准确性并调试其遇到的问题。
说明
Watch 对象是 Watches 集合的成员

  1. Watches

返回一个 Watches 对象,该对象代表在 重新计算工作表时跟踪的区域
本示例在单元格 A3 中创建一个求和公式, 然后将该单元格添加到“监视窗口”中。
Sub AddWatch()
    With Application
        .Range("A1").Formula = 1
        .Range("A2").Formula = 2
        .Range("A3").Formula = "=Sum(A1:A2)"
        .Range("A3").Select
        .Watches.Add Source:=ActiveCell
    End With
End Sub

  1. Watches

指定应用程序中所有 Watch 对象的集合
使用 Application 对象的 Watches 属性可返回一个 Watches 集合。

  1. WebConsecutiveDelimitersAsOne

当从网页的 HTML <PRE> 标记中向查询表导入数据时,如果将连续多个分隔符看作单个分隔符,并且数据将被分列,则该值为 True。如果将连续多个分隔符看作多个分隔符,则该值为 False。默认值是 True。可读/写 Boolean 类型。

  1. WebDisableDateRecognition

向查询表中导入网页时,如果将类似日期的数据当作文本进行处理,则该值为 True。如果使用了日期识别,则该值为 False。默认值为 False。Boolean 类型,可读写。

  1. WebDisableRedirections

如果对 QueryTable 对象禁用 Web 查询重定向,则该属性的值为 True。默认值为 False。Boolean 类型,可读写。

  1. WebFormatting

返回或设置一个值,用于确定向查询表中导入网页时,网页中有多少格式被应用。XlWebFormatting 类型,可读写。

  1. WebOptions

返回 WebOptions 集合,该集合中包含以网页保存文档或打开网页时 Microsoft Excel 所使用的工作簿级属性。
本示例指定将第一个工作簿中的项目保存到网页中时,使用级联样式表和 Western 文档编码。
Set objWO = Workbooks(1).WebOptions
objWO.RelyOnCSS = True
objWO.Encoding = msoEncodingWestern

  1. WebOptions

包含工作簿级的属性,当以网页保存文档或打开网页时,Microsoft Excel 将使用这些属性

  1. WebPagePreview

以网页的形式显示对指定工作簿的预览。
本示例以网页的形式显示对第一个工作簿的预览。
Workbooks(1).WebPagePreview

  1. WebPreFormattedTextToColumns

返回或设置向查询表中导入网页时,是否对网页 HTML <PRE> 标记内的数据进行分列。默认值为 True。Boolean 类型,可读写。

  1. WebSelectionType

返回或设置一个值,用于确定是否向查询表中导入了整个网页、网页上的所有表格或网页上的特定表格。XlWebSelectionType 类型,可读写。

  1. WebSingleBlockTextImport

向查询表中导入网页时,如果位于指定网页的 HTML <PRE> 标记中的数据是同时进行处理的,则该值为 True。如果数据是以连续行的数据块方式导入的,以便能识别标题行,则该值为 False。默认值为 False。Boolean 类型,可读写。

  1. WebTables

向查询表中导入网页时,返回或设置由逗号分隔的表格名称或表格索引号的列表。String 类型,可读写。

  1. Weekday

返回一个 Variant (Integer),包含一个整数,代表某个日期是星期几。
语法
Weekday(date, [firstdayofweek])
date 必要。能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null,则返回 Null。
Firstdayofweek 可选。指定一星期第一天的常数。如果未予指定,则以 vbSunday 为缺省值。

  1. Weekday

返回与日期对应的一周中的某一天。默认情况下,其值为 1(星期日)到 7(星期六)之间的整数。

  1. WeekdayName

返回一个字符串,表示一星期中的某天。
语法
WeekdayName(weekday, abbreviate, firstdayofweek)
weekday 必需的。数字值,表示一星期中的某天。该数字值要依赖于firstdayofweek设置中的设置值来决定。
abbreviate 可选的。Boolean值,表示星期的名称是否被缩写。如果忽略该值,缺省值为False,表明星期的名称不能被缩写。
firstdayofweek 可选的。数字值,表示一星期中第一天。关于其值,请参阅“设置值”部分。

  1. WeekNum

返回一个数字,指示一年中的第几周。

  1. Weibull

返回韦伯分布。使用此分布可以进行可靠性分析,例如计算设备失效的平均时间。

  1. Weight

返回或设置边框的粗细。
本示例对 Sheet1 上椭圆一的边框粗细进行设置。
Worksheets("Sheet1").Ovals(1).Border.Weight = xlMedium

  1. Weight

返回或设置一个 XlBorderWeight 值,它代表边框的粗细。

  1. Weight

返回或设置一个 Single 值,它代表线条的粗细。

  1. WhichAddress

您查询的是 Macintosh 专用的 Visual Basic 关键词。有关该关键词的帮助信息,请查阅 Microsoft Office Macintosh 版的语言参考帮助。

  1. While...Wend

只要指定的条件为 True,则会重复执行一系列的语句。
语法
While condition
[statements]
Wend
condition 必要参数。数值表达式或字符串表达式,其计算结果为 True 或 False。如果 condition 为 Null,则 condition 会视为 False。
statements 可选参数。一条或多条语句,当条件为 True 时执行。

  1. Width

从应用程序窗口的左边到其右边的距离
本示例将活动窗口的尺寸扩大为可用的最大尺寸(假定该窗口尚未最大化)。
With ActiveWindow
    .WindowState = xlNormal
    .Top = 1
    .Left = 1
    .Height = Application.UsableHeight
    .Width = Application.UsableWidth
End With

  1. Width

窗口的宽度
expression.Width
expression必需。该表达式返回一个 Window 对象

  1. Width

区域的宽度
expression.Width
expression必需。该表达式返回一个 Range 对象。

  1. Width

获取或设置指定命令栏的宽度(以像素为单位)。可读写。
语法
表达式.Width
表达式   一个代表 CommandBar 对象的变量。
返回值
Integer

  1. Width

返回或设置一个 Single 值,它代表对象的宽度(以磅为单位)。
语法
表达式.Width
表达式   一个代表 Shape 对象的变量。

  1. Width

返回或设置一个 Double 值,它代表对象的宽度(以磅为单位)。

  1. Width

返回或设置一个 Single 值,它代表对象的宽度(以磅为单位)。

  1. Width

返回一个 Double 值,它代表对象的宽度(以磅为单位)。

  1. Width

返回或设置一个 Double 值,它代表窗口的宽度(以磅为单位)。
语法
表达式.Width
表达式   一个代表 Window 对象的变量。

  1. Width #

将一个输出行的宽度指定给用 Open 语句打开的文件。
语法
Width #filenumber, width
filenumber 必要。任何有效的文件号。
width 必要。范围在 0–255 之间的数值表达式,在新的一行开始之前,指出在该行上可出现多少字符。如果 width 等于 0,则行的长度不受限制。width 的缺省值为 0。

  1. Window

代表一个窗口。许多工作表的特性,如滚动条和网格线,都是窗口的属性。Window 对象是 Windows 集合中的成员。Application 对象的 Windows 集合包含该应用程序中的所有窗口,而 Workbook 对象的 Windows 集合只包含指定工作簿中的窗口。

  1. WindowActivate

工作簿的窗口激活时,将产生本事件
本示例使工作簿窗口激活时最大化。
Private Sub Workbook_WindowActivate(ByVal Wn As Excel.Window)
    Wn.WindowState = xlMaximized
End Sub

  1. WindowDeactivate

工作簿的窗口变为非活动状态时,将产生本事件
本示例使工作簿窗口变为非活动状态时最小化。
Private Sub Workbook_WindowDeactivate(ByVal Wn As Excel.Window)
    Wn.WindowState = xlMinimized
End Sub

  1. WindowNumber

返回窗口号。例如,名称为“Book1.xls:2”的窗口,其窗口号为 2。大多数窗口的窗口号为 1
本示例为活动窗口新建一个窗口,然后显示新窗口的窗口号。
ActiveWindow.NewWindow
MsgBox ActiveWindow.WindowNumber

  1. WindowNumber

返回窗口号。例如,名称为“Book1.xls:2”的窗口,其窗口号为 2。大多数窗口的窗口号为 1。Long 类型,只读。
语法
表达式.WindowNumber
表达式   一个代表 Window 对象的变量。

  1. WindowResize

工作簿窗口调整大小时,将产生本事件
工作簿窗口调整大小时,将运行本示例。
Private Sub Workbook_WindowResize(ByVal Wn As Excel.Window)
    Application.StatusBar = Wn.Caption & " resized"
End Sub

  1. Windows

对于 Application 对象,返回代表所有 工作簿中所有窗口的 Windows 集合
本示例关闭 Microsoft Excel 中第一个打开或隐藏的窗口。
Application.Windows(1).Close
 
本示例将活动工作簿的窗口一命名为“Consolidated Balance Sheet”。此名称将被用作对 Windows 集合的索引。
ActiveWorkbook.Windows(1).Caption = "Consolidated Balance Sheet"
ActiveWorkbook.Windows("Consolidated Balance Sheet") _
    .ActiveSheet.Calculate

  1. Windows

Microsoft Excel 中所有 Window 对象的集合
使用 Windows 属性返回 Windows 集合。下面的示例在 Microsoft Excel 中层叠所有当前显示窗口。
Windows.Arrange arrangeStyle:=xlCascade

  1. Windows

对于 Workbook 对象,返回代表指定工作簿中所有窗口的 Windows 集合
本示例将活动工作簿的窗口一命名为“Consolidated Balance Sheet”。此名称将被用作对 Windows 集合的索引。
ActiveWorkbook.Windows(1).Caption = "Consolidated Balance Sheet"
ActiveWorkbook.Windows("Consolidated Balance Sheet") _
    .ActiveSheet.Calculate

  1. Windows

Microsoft Excel 中所有 Window 对象的集合。Application 对象的 Windows 集合包含应用程序中的所有窗口,而 Workbook 对象的 Windows 集合则只包含指定工作簿中的窗口。

  1. WindowsForPens

如果此计算机正在运行的是 Microsoft Windows for Pen Computing,则该值为 True
本示例显示当 Microsoft Windows for PenComputing 在运行时,如何限制仅识别手写数字和标点符号。
If Application.WindowsForPens Then
    Application.ConstrainNumeric = True
End If

  1. WindowState

返回或设置窗口的状态
本示例将 Microsoft Excel 应用程序窗口最大化。
Application.WindowState = xlMaximized

  1. WindowState

返回或设置窗口的状态。XlWindowState 类型,可读写。
语法
表达式.WindowState
表达式   一个代表 Window 对象的变量。

  1. With

在一个单一对象或一个用户定义类型上执行一系列的语句。
语法
With object
[statements]
End With
object 必要参数。一个对象或用户自定义类型的名称。
statements 可选参数。要执行在 object 上的一条或多条语句。

  1. Workbook

代表 Microsoft Excel 工作簿
Workbook 对象是 Workbooks 集合的成员。Workbooks 集合包含 Microsoft Excel 中所有当前打开的 Workbook 对象

  1. WorkbookActivate

当激活任一工作簿时产生此事件
当激活一个工作簿时,本示例对所有打开的窗口进行排列。
Private Sub App_WorkbookActivate(ByVal Wb As Workbook)
    Application.Windows.Arrange xlArrangeStyleTiled
End Sub

  1. WorkbookAddinInstall

当工作簿作为加载宏安装时,产生此事件
当指定工作簿作为加载宏安装时,本示例将 Microsoft Excel 最大化。
Private Sub App_WorkbookAddinInstall(ByVal Wb As Workbook)
    Application.WindowState = xlMaximized
End Sub

  1. WorkbookAddinUninstall

当任一作为加载宏的工作簿卸载时产生此事件
当指定工作簿作为加载宏卸载时,本示例将 Microsoft Excel 最小化。
Private Sub App_WorkbookAddinUninstall(ByVal Wb As Workbook)
    Application.WindowState = xlMinimized
End Sub

  1. WorkbookAfterXmlExport

在 Microsoft Excel 将任一打开的工作簿中的数据保存或导出到 XML 数据文件之后,发生此事件
expression.WorkbookAfterXmlExport(Wb, Map, Url, Result)
expression必需。该表达式返回一个 Application 对象。

  1. WorkbookAfterXmlImport

当刷新现有的 XML 数据连接或新的 XML 数据被导入任一打开的 Microsoft Excel 工作簿之后,发生此事件。
expression.WorkbookAfterXmlImport(Wb, Map, IsRefresh, Result)
expression必需。该表达式返回一个 Application 对象。

  1. WorkbookBeforeClose

当任一打开的工作簿要关闭时立即产生此事件
本示例在关闭工作簿之前询问用户是否关闭。
Private Sub App_WorkbookBeforeClose(ByVal Wb as Workbook, _
        Cancel as Boolean)
    a = MsgBox("Do you really want to close the workbook?", _
        vbYesNo)
    If a = vbNo Then Cancel = True
End Sub

  1. WorkbookBeforePrint

在打印任一打开的工作簿之前产生此事件
本示例在打印工作簿之前对所有工作表进行重新计算。
Private Sub App_WorkbookBeforePrint(ByVal Wb As Workbook, _
        Cancel As Boolean)
    For Each wk in Wb.Worksheets
        wk.Calculate
    Next
End Sub

  1. WorkbookBeforeSave

在保存任一打开工作簿之前产生此事件
本示例在保存工作簿之前询问用户是否保存。
Private Sub App_WorkbookBeforeSave(ByVal Wb As Workbook, _
        ByVal SaveAsUI As Boolean, Cancel as Boolean)
    a = MsgBox("Do you really want to save the workbook?", vbYesNo)
    If a = vbNo Then Cancel = True
End Sub

  1. WorkbookBeforeXmlExport

在 Microsoft Excel 将任一打开的工作表中的数据保存或导出到 XML 数据文件之前,发生此事件。
expression.WorkbookBeforeXmlExport(Wb, Map, Url, Cancel)
expression必需。该表达式返回一个 Application 对象。

  1. WorkbookBeforeXmlImport

在刷新现有的 XML 数据连接或新的 XML 数据被导入任一打开的 Microsoft Excel 工作簿之前,发生此事件。
expression.WorkbookBeforeXmlImport(Wb, Map, Url, IsRefresh, Cancel)
expression 必需。该表达式返回一个 Application 对象。

  1. WorkbookConnection

返回查询表所使用的 WorkbookConnection 对象。只读。

  1. WorkbookConnection

建立当前工作簿与 PivotCache 对象之间的连接。只读。

  1. WorkbookConnection

返回指定的 XMLMap 对象的新连接。只读。

  1. WorkbookOpen

当打开一个工作簿时产生此事件
当打开一个工作簿时,本示例对所有打开的窗口进行排列。
Private Sub  App_WorkbookOpen(ByVal Wb As Workbook)
    Application.Windows.Arrange xlArrangeStyleTiled
End Sub

  1. WorkbookPivotTableCloseConnection

发生在数据透视表的连接关闭之后
本示例显示一则消息,说明数据透视表与其数据源的连接已经关闭。本示例假定您已在类模块中声明了带有事件的 Workbook 类型的对象。
Private Sub ConnectionApp_WorkbookPivotTableCloseConnection(ByVal wbOne As Workbook, Target As PivotTable)
    MsgBox "The PivotTable connection has been closed."
End Sub

  1. WorkbookPivotTableOpenConnection

发生在数据透视表的连接打开之后
本示例显示一则消息,说明数据透视表与其数据源的连接已经打开。本示例假定您已在类模块中声明了带有事件的 Workbook 类型的对象。
Private Sub ConnectionApp_WorkbookPivotTableOpenConnection(ByVal wbOne As Workbook, Target As PivotTable)
    MsgBox "The PivotTable connection has been opened."
End Sub

  1. Workbooks

返回一个 Workbooks 集合,此集合代表所有打开的工作簿
本示例激活 Book1.xls 工作簿。
Workbooks("BOOK1").Activate
 
本示例打开 Large.xls 工作簿。
Workbooks.Open filename:="LARGE.XLS"

  1. Workbooks

Microsoft Excel 应用程序中当前打开的所有 Workbook 对象的集合。
使用 Workbooks 属性可返回 Workbooks 集合。下例关闭所有打开的工作簿。
Workbooks.Close

  1. WorkbookSync

当作为“文档工作区”一部分的工作簿的本地副本与服务器上的副本进行同步时,发生此事件
如果“文档工作区”中的工作簿同步失败,则下例显示一条消息。
Private Sub app_WorkbookSync(ByVal Wb As Workbook, _
        ByVal SyncEventType As Office.MsoSyncEventType)
    If SyncEventType = msoSyncEventDownloadFailed Or _
            SyncEventType = msoSyncEventUploadFailed Then 
        MsgBox "Workbook synchronization failed. " & _
            "Please contact your administrator " & vbCrLf & _
            "or try again later."
    End If
End Sub

  1. WorkDay

返回某日期(起始日期)之前或之后相隔指定工作日的某一日期的日期值。工作日不包括周末和节假日。在计算发票到期日、预期交货时间或工作天数时,可以使用函数 WORKDAY 来扣除周末或节假日。

  1. Worksheet

代表一张工作表。Worksheet 对象是 Worksheets 集合的成员

  1. Worksheet

返回 Worksheet 对象,该对象代表包含指定区域的工作表
本示例显示包含活动单元格的工作表的名称。本示例必须在工作表上运行。
MsgBox ActiveCell.Worksheet.Name
本示例显示包含活动单元格区域“testRange”的工作表名称。
MsgBox Range("testRange").Worksheet.Name

  1. WorksheetFunction

返回 WorksheetFunction 对象
本示例对单元格区域 A1:A10 使用 Min 工作表函数,并显示结果。
Set myRange = Worksheets("Sheet1").Range("A1:C10")
answer = Application.WorksheetFunction.Min(myRange)
MsgBox answer

  1. WorksheetFunction

用作可从 Visual Basic 中调用的 Microsoft Excel 工作表函数的容器
使用 WorksheetFunction 属性可返回 WorksheetFunction 对象。下面的示例显示了对单元格区域 A1:A10 应用工作表函数 Min 的结果。
Set myRange = Worksheets("Sheet1").Range("A1:C10")
answer = Application.WorksheetFunction.Min(myRange)
MsgBox answer

  1. Worksheets

对于 Application 对象,返回代表活动 工作簿中所有工作表的 Sheets 集合
本示例显示活动工作簿中工作表 sheet1 上单元格 A1 中的值。
MsgBox Worksheets("Sheet1").Range("A1").Value
 
本示例显示活动工作簿中每个工作表的名称。
For Each ws In Worksheets
    MsgBox ws.Name
Next ws

  1. Worksheets

对于 Workbook 对象,返回代表指定工作簿所有工作表的 Sheets 集合
本示例显示活动工作簿中每个工作表的名称。
For Each ws In Worksheets
    MsgBox ws.Name
Next ws

  1. Worksheets

指定的或活动工作簿中所有 Worksheet 对象的集合。每个 Worksheet 对象都代表一个工作表。
说明
Worksheet 对象也是 Sheets 集合的成员。Sheets 集合包含工作簿中所有的工作表(图表工作表和工作表)。

  1. WrapText

如果使 Microsoft Excel 中对象的文本自动换行,则该值为 True
本示例对 sheet1 中的单元格 B2 进行格式设置,使其中的文字自动换行。
Worksheets("Sheet1").Range("B2").Value = _
    "This text should wrap in a cell."
Worksheets("Sheet1").Range("B2").WrapText = True

  1. WrapText

返回或设置一个 Variant 值,它指明 Microsoft Excel 是否为对象中的文本自动换行。
语法

表达式.WrapText

表达式   一个代表 CellFormat 对象的变量。

  1. WrapText

返回或设置一个 Boolean 值,它指明 Microsoft Excel 是否为对象中的文本自动换行。
语法
表达式.WrapText
表达式   一个代表 Style 对象的变量。

  1. WrapText

返回或设置一个 Boolean 值,它指明 Microsoft Excel 是否为对象中的文本自动换行。

  1. Write #

将数据写入顺序文件。
语法
Write #filenumber, [outputlist]
filenumber 必要。任何有效的文件号。
outputlist 可选。要写入文件的数值表达式或字符串表达式,用一个或多个逗号将这些表达式分界。

  1. WritePassword

返回或设置一个工作簿的写密码。
在本示例中,如果活动工作簿不能进行写保护,那么 Microsoft Excel 设置字符串密码以作为活动工作簿的写密码。
Sub UseWritePassword()
    Dim strPassword As String
    strPassword = InputBox ("Enter the password")
    ' Set password to a string if allowed.
    If ActiveWorkbook.WriteReserved = False Then
        ActiveWorkbook.WritePassword = strPassword
    End If
End Sub

  1. WriteReserved

如果指定工作簿是写保护的,则该值为 True
如果活动工作簿是写保护的,本示例将显示一则消息,其中包含将该工作簿以写保护方式保存的用户的名称。
With ActiveWorkbook
    If .WriteReserved = True Then
        MsgBox "Please contact " & .WriteReservedBy & Chr(13) & _
            " if you need to insert data in this workbook."
    End If
End With

  1. WriteReservedBy

返回当前对指定工作簿有写入权的用户的名称
如果当前工作簿是写保护的,本示例将显示一则消息,其中包含将该工作簿以写保护方式保存的用户的名称。
With ActiveWorkbook
    If .WriteReserved = True Then
        MsgBox "Please contact " & .WriteReservedBy & Chr(13) & _
            " if you need to insert data in this workbook."
    End If
End With

  1. Excel VBA属性、方法、事件大全——Part18(完结篇)(Complete List of Excel VBA attribute/method and event)
  1. 对象/属性/方法/事件
    (Object/Attribute/
    Method/Event)

描述
(Description)

  1. Xirr

返回一组现金流的内部收益率,这些现金流不一定定期发生。若要计算一组定期现金流的内部收益率,请使用函数 IRR。

  1. XlBuiltInDialog

名称                            值  描述
xlDialogActivate           103 “激活”对话框
xlDialogActiveCellFont     476 “活动单元格字体”对话框
xlDialogAddChartAutoformat 390 “添加图表自动套用格式”对话框
xlDialogAddinManager       321 “加载项管理器”对话框
xlDialogAlignment           43 “对齐方式”对话框
xlDialogApplyNames         133 “应用名称”对话框
xlDialogApplyStyle         212 “应用样式”对话框
xlDialogAppMove            170 “AppMove”对话框
xlDialogAppSize            171 “AppSize”对话框
xlDialogArrangeAll          12 “全部重排”对话框
xlDialogAssignToObject     213 “给对象指定宏”对话框
xlDialogAssignToTool       293 “给工具指定宏”对话框
xlDialogAttachText          80 “附加文本”对话框
xlDialogAttachToolbars     323 “附加工具栏”对话框
xlDialogAutoCorrect        485 “自动校正”对话框
xlDialogAxes                78 “坐标轴”对话框
xlDialogBorder              45 “边框”对话框
xlDialogCalculation         32 “计算”对话框
xlDialogCellProtection      46 “单元格保护”对话框
xlDialogChangeLink         166 “更改链接”对话框
xlDialogChartAddData       392 “图表添加数据”对话框
xlDialogChartLocation      527 “图表位置”对话框
xlDialogChartOptionsDataLabelMultiple  724 “图表选项多个数据标签”对话框
xlDialogChartOptionsDataLabels  505 “图表选项数据标签”对话框
xlDialogChartOptionsDataTable  506 “图表选项数据表”对话框
xlDialogChartSourceData    540 “图表源数据”对话框
xlDialogChartTrend         350 “图表趋势”对话框
xlDialogChartType          526 “图表类型”对话框
xlDialogChartWizard        288 “图表向导”对话框
xlDialogCheckboxProperties 435 “复选框属性”对话框
xlDialogClear               52 “清除”对话框
xlDialogColorPalette       161 “调色板”对话框
xlDialogColumnWidth         47 “列宽”对话框
xlDialogCombination         73 “组合图”对话框
xlDialogConditionalFormatting  583 “条件格式”对话框
xlDialogConsolidate        191 “合并计算”对话框
xlDialogCopyChart          147 “复制图表”对话框
xlDialogCopyPicture        108 “复制图片”对话框
xlDialogCreateList         796 “创建列表”对话框
xlDialogCreateNames         62 “创建名称”对话框
xlDialogCreatePublisher    217 “创建发布者”对话框
xlDialogCustomizeToolbar   276 “自定义工具栏”对话框
xlDialogCustomViews        493 “自定义视图”对话框
xlDialogDataDelete          36 “数据删除”对话框
xlDialogDataLabel          379 “数据标签”对话框
xlDialogDataLabelMultiple  723 “多个数据标签”对话框
xlDialogDataSeries          40 “数据系列”对话框
xlDialogDataValidation     525 “数据有效性”对话框
xlDialogDefineName          61 “定义名称”对话框
xlDialogDefineStyle        229 “定义样式”对话框
xlDialogDeleteFormat       111 “删除格式”对话框
xlDialogDeleteName         110 “删除名称”对话框
xlDialogDemote             203 “降级”对话框
xlDialogDisplay             27 “显示”对话框
xlDialogDocumentInspector  862 “文档检查器”对话框
xlDialogEditboxProperties  438 “编辑框属性”对话框
xlDialogEditColor          223 “编辑颜色”对话框
xlDialogEditDelete          54 “编辑删除”对话框
xlDialogEditionOptions     251 “编辑选项”对话框
xlDialogEditSeries         228 “编辑数据系列”对话框
xlDialogErrorbarX          463 “误差线 X”对话框
xlDialogErrorbarY          464 “误差线 Y”对话框
xlDialogErrorChecking      732 “错误检查”对话框
xlDialogEvaluateFormula    709 “公式求值”对话框
xlDialogExternalDataProperties  530 “外部数据属性”对话框
xlDialogExtract             35 “提取”对话框
xlDialogFileDelete           6 “文件删除”对话框
xlDialogFileSharing        481 “文件共享”对话框
xlDialogFillGroup          200 “填充组”对话框
xlDialogFillWorkgroup      301 “填充工作组”对话框
xlDialogFilter             447 “对话框筛选”对话框
xlDialogFilterAdvanced     370 “高级筛选”对话框
xlDialogFindFile           475 “查找文件”对话框
xlDialogFont                26 “字体”对话框
xlDialogFontProperties     381 “字体属性”对话框
xlDialogFormatAuto         269 “自动套用格式”对话框
xlDialogFormatChart        465 “设置图表格式”对话框
xlDialogFormatCharttype    423 “设置图表类型格式”对话框
xlDialogFormatFont         150 “设置字体格式”对话框
xlDialogFormatLegend        88 “图例格式”对话框
xlDialogFormatMain         225 “设置主要格式”对话框
xlDialogFormatMove         128 “设置移动格式”对话框
xlDialogFormatNumber        42 “设置数字格式”对话框
xlDialogFormatOverlay      226 “设置重叠格式”对话框
xlDialogFormatSize         129 “设置大小”对话框
xlDialogFormatText          89 “设置文本格式”对话框
xlDialogFormulaFind         64 “查找公式”对话框
xlDialogFormulaGoto         63 “转到公式”对话框
xlDialogFormulaReplace     130 “替换公式”对话框
xlDialogFunctionWizard     450 “函数向导”对话框
xlDialogGallery3dArea      193 “三维面积图库”对话框
xlDialogGallery3dBar       272 “三维条形图库”对话框
xlDialogGallery3dColumn    194 “三维柱形图库”对话框
xlDialogGallery3dLine      195 “三维折线图库”对话框
xlDialogGallery3dPie       196 “三维饼图库”对话框
xlDialogGallery3dSurface   273 “三维曲面图库”对话框
xlDialogGalleryArea         67 “面积图库”对话框
xlDialogGalleryBar          68 “条形图库”对话框
xlDialogGalleryColumn       69 “柱形图库”对话框
xlDialogGalleryCustom      388 “自定义库”对话框
xlDialogGalleryDoughnut    344 “圆环图库”对话框
xlDialogGalleryLine         70 “折线图库”对话框
xlDialogGalleryPie          71 “饼图库”对话框
xlDialogGalleryRadar       249 “雷达图库”对话框
xlDialogGalleryScatter      72 “散点图库”对话框
xlDialogGoalSeek           198 “单变量求解”对话框
xlDialogGridlines           76 “网格线”对话框
xlDialogImportTextFile     666 “导入文本文件”对话框
xlDialogInsert              55 “插入”对话框
xlDialogInsertHyperlink    596 “插入超链接”对话框
xlDialogInsertNameLabel    496 “插入名称标志”对话框
xlDialogInsertObject       259 “插入对象”对话框
xlDialogInsertPicture      342 “插入图片”对话框
xlDialogInsertTitle        380 “插入标题”对话框
xlDialogLabelProperties    436 “标签属性”对话框
xlDialogListboxProperties  437 “列表框属性”对话框
xlDialogMacroOptions       382 “宏选项”对话框
xlDialogMailEditMailer     470 “编辑邮件发件人”对话框
xlDialogMailLogon          339 “邮件登录”对话框
xlDialogMailNextLetter     378 “发送下一信函”对话框
xlDialogMainChart           85 “主要图”对话框
xlDialogMainChartType      185 “图表类型”对话框
xlDialogMenuEditor         322 “菜单编辑器”对话框
xlDialogMove               262 “移动”对话框
xlDialogMyPermission       834 “我的权限”对话框
xlDialogNew                119 “新建”对话框
xlDialogNewWebQuery        667 “新建 Web 查询”对话框
xlDialogNote               154 “注意”对话框
xlDialogObjectProperties   207 “对象属性”对话框
xlDialogObjectProtection   214 “对象保护”对话框
xlDialogOpen                 1 “打开”对话框
xlDialogOpenLinks            2 “打开链接”对话框
xlDialogOpenMail           188 “打开邮件”对话框
xlDialogOpenText           441 “打开文本”对话框
xlDialogOptionsCalculation 318 “计算选项”对话框
xlDialogOptionsChart       325 “图表选项”对话框
xlDialogOptionsEdit        319 “编辑选项”对话框
xlDialogOptionsGeneral     356 “常规选项”对话框
xlDialogOptionsListsAdd    458 “添加列表选项”对话框
xlDialogOptionsME          647 “ME 选项”对话框
xlDialogOptionsTransition  355 “转换选项”对话框
xlDialogOptionsView        320 “视图选项”对话框
xlDialogOutline            142 “大纲”对话框
xlDialogOverlay             86 “覆盖图”对话框
xlDialogOverlayChartType   186 “覆盖图图表类型”对话框
xlDialogPageSetup            7 “页面设置”对话框
xlDialogParse               91 “分列”对话框
xlDialogPasteNames          58 “粘贴名称”对话框
xlDialogPasteSpecial        53 “选择性粘贴”对话框
xlDialogPatterns            84 “图案”对话框
xlDialogPermission         832 “权限”对话框
xlDialogPhonetic           656 “拼音”对话框
xlDialogPivotCalculatedField 570 “数据透视表计算字段”对话框
xlDialogPivotCalculatedItem 572 “数据透视表计算项”对话框
xlDialogPivotClientServerSet 689 “设置数据透视表客户机服务器”对话框
xlDialogPivotFieldGroup    433 “组合数据透视表字段”对话框
xlDialogPivotFieldProperties 313 “数据透视表字段属性”对话框
xlDialogPivotFieldUngroup  434 “取消组合数据透视表字段”对话框
xlDialogPivotShowPages     421 “数据透视表显示页”对话框
xlDialogPivotSolveOrder    568 “数据透视表求解次序”对话框
xlDialogPivotTableOptions  567 “数据透视表选项”对话框
xlDialogPivotTableWizard   312 “数据透视表向导”对话框
xlDialogPlacement          300 “位置”对话框
xlDialogPrint                8 “打印”对话框
xlDialogPrinterSetup         9 “打印机设置”对话框
xlDialogPrintPreview       222 “打印预览”对话框
xlDialogPromote            202 “升级”对话框
xlDialogProperties         474 “属性”对话框
xlDialogPropertyFields     754 “属性字段”对话框
xlDialogProtectDocument     28 “保护文档”对话框
xlDialogProtectSharing     620 “保护共享”对话框
xlDialogPublishAsWebPage   653 “发布为网页”对话框
xlDialogPushbuttonProperties 445 “按钮属性”对话框
xlDialogReplaceFont        134 “替换字体”对话框
xlDialogRoutingSlip        336 “传送名单”对话框
xlDialogRowHeight          127 “行高”对话框
xlDialogRun                 17 “运行”对话框
xlDialogSaveAs               5 “另存为”对话框
xlDialogSaveCopyAs         456 “副本另存为”对话框
xlDialogSaveNewObject      208 “保存新对象”对话框
xlDialogSaveWorkbook       145 “保存工作簿”对话框
xlDialogSaveWorkspace      285 “保存工作区”对话框
xlDialogScale               87 “缩放”对话框
xlDialogScenarioAdd        307 “添加方案”对话框
xlDialogScenarioCells      305 “单元格方案”对话框
xlDialogScenarioEdit       308 “编辑方案”对话框
xlDialogScenarioMerge      473 “合并方案”对话框
xlDialogScenarioSummary    311 “方案摘要”对话框
xlDialogScrollbarProperties 420 “滚动条属性”对话框
xlDialogSearch             731 “搜索”对话框
xlDialogSelectSpecial      132 “特殊选定”对话框
xlDialogSendMail           189 “发送邮件”对话框
xlDialogSeriesAxes         460 “系列坐标轴”对话框
xlDialogSeriesOptions      557 “系列选项”对话框
xlDialogSeriesOrder        466 “系列次序”对话框
xlDialogSeriesShape        504 “系列形状”对话框
xlDialogSeriesX            461 “系列 X”对话框
xlDialogSeriesY            462 “系列 Y”对话框
xlDialogSetBackgroundPicture 509 “设置背景图片”对话框
xlDialogSetPrintTitles      23 “设置打印标题”对话框
xlDialogSetUpdateStatus    159 “设置更新状态”对话框
xlDialogShowDetail         204 “显示明细数据”对话框
xlDialogShowToolbar        220 “显示工具栏”对话框
xlDialogSize               261 “大小”对话框
xlDialogSort                39 “排序”对话框
xlDialogSortSpecial        192 “选择性排序”对话框
xlDialogSplit              137 “拆分”对话框
xlDialogStandardFont       190 “标准字体”对话框
xlDialogStandardWidth      472 “标准宽度”对话框
xlDialogStyle               44 “样式”对话框
xlDialogSubscribeTo        218 “订阅”对话框
xlDialogSubtotalCreate     398 “创建分类汇总”对话框
xlDialogSummaryInfo        474 “摘要信息”对话框
xlDialogTable               41 “表”对话框
xlDialogTabOrder           394 “Tab 键次序”对话框
xlDialogTextToColumns      422 “分列”对话框
xlDialogUnhide              94 “取消隐藏”对话框
xlDialogUpdateLink         201 “更新链接”对话框
xlDialogVbaInsertFile      328 “VBA 插入文件”对话框
xlDialogVbaMakeAddin       478 “VBA 创建加载项”对话框
xlDialogVbaProcedureDefinition 330 “VBA 过程定义”对话框
xlDialogView3d             197 “三维视图”对话框
xlDialogWebOptionsBrowsers 773 “Web 浏览器选项”对话框
xlDialogWebOptionsEncoding 686 “Web 编码选项”对话框
xlDialogWebOptionsFiles    684 “Web 文件选项”对话框
xlDialogWebOptionsFonts    687 “Web 字体选项”对话框
xlDialogWebOptionsGeneral  683 “Web 常规选项”对话框
xlDialogWebOptionsPictures 685 “Web 图片选项”对话框
xlDialogWindowMove          14 “窗口移动”对话框
xlDialogWindowSize          13 “窗口大小”对话框
xlDialogWorkbookAdd        281 “添加工作簿”对话框
xlDialogWorkbookCopy       283 “复制工作簿”对话框
xlDialogWorkbookInsert     354 “插入工作簿”对话框
xlDialogWorkbookMove       282 “移动工作簿”对话框
xlDialogWorkbookName       386 “命名工作簿”对话框
xlDialogWorkbookNew        302 “新建工作簿”对话框
xlDialogWorkbookOptions    284 “工作簿选项”对话框
xlDialogWorkbookProtect    417 “保护工作簿”对话框
xlDialogWorkbookTabSplit   415 “拆分工作簿标签”对话框
xlDialogWorkbookUnhide     384 “取消隐藏工作簿”对话框
xlDialogWorkgroup          199 “工作组”对话框
xlDialogWorkspace           95 “工作区”对话框
xlDialogZoom               256 “缩放”对话框

  1. XML

返回一个 String 值,它代表要传递给操作句柄的 XML 示例。

  1. XmlDataQuery

返回一个代表映射到特定 XPath 的 Range 对象

  1. XmlImport

将 XML 数据文件导入当前工作簿
expression.XmlImport(Url, ImportMap, Overwrite, Destination)
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. XmlImportXml

导入先前已被加载到内存的 XML 数据流。
expression.XmlImportXml(Data, ImportMap, Overwrite, Destination)
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. XmlMap

代表已添加到工作簿的 XML 映射。

  1. XmlMapQuery

返回一个代表映射到特定 XPath 的 Range 对象。

  1. XmlMaps

返回一个 XmlMaps 集合,代表已被添加到指定工作簿的架构映射。只读。
expression.XmlMaps
expression必需。该表达式返回一个 Workbook 对象。

  1. XmlMaps

代表已添加到工作簿的 XmlMap 对象的集合。

  1. XmlNamespaces

返回一个 XmlNamespaces 集合,代表包含在指定工作簿中的 XML 命名空间。只读。
expression.XmlNamespaces
expression必需。该表达式返回一个 Workbook 对象。

  1. XmlNamespaces

代表工作簿中 XmlNamespace 对象的集合。

  1. Xnpv

返回一组现金流的净现值,这些现金流不一定定期发生。可读/写 Double 类型。

  1. Xpath

返回一个 XPath 对象,代表被映射到指定 Range 对象的元素的 Xpath。只读。
expression.XPath
expression必需。该表达式返回“应用于”列表中的对象之一。

  1. XValues

返回或设置图表系列中 x 值的数组。XValues 属性可设置为工作表区域或数值数组,但不能为二者的组合。Variant 类型,可读写。

  1. XYGroups

返回代表二维图表上单个散点图图表组或散点图图表组集合的对象。
本示例设置 X-Y 组(散点图图表组)一,使其中的每个数据标志都使用不同的颜色。本示例应在二维图表上运行。
Charts("Chart1").XYGroups(1).VaryByCategories = True

  1. Year

返回 Variant (Integer),包含表示年份的整数。
语法
Year(date)
必要的 date 参数,可以是任何能够表示日期的 Variant、数值表达式、字符串表达式或它们的组合。如果 date 包含 Null,则返回 Null。

  1. YearFrac

返回 start_date 和 end_date 之间的天数占全年天数的百分比。使用 YEARFRAC 工作表函数可判别某一特定条件下全年效益或债务的比例。

  1. YieldDisc

返回已贴现债券的年收益。

  1. YieldMat

返回到期付息的债券的年收益。

  1. Zoom

以百分数的形式(100 表示正常大小,200 表示双倍大小,以此类推)返回或设置窗口的显示大小
expression.Zoom
expression必需。该表达式返回一个 Window 对象。
说明
如果本属性为 True,则可将窗口大小设置成与当前选定区域相适应的大小。

  1. Zoom

返回或设置一个 Variant 值,它代表一个数值在 10% 到 400% 之间的百分比,该百分比为 Microsoft Excel 打印工作表时的缩放比例。

  1. Zoom

返回或设置一个 Variant 值,它代表窗口的显示大小,以百分数表示(100 表示正常大小,200 表示双倍大小,以此类推)。
语法
表达式.Zoom
表达式   一个代表 Window 对象的变量。

  1. ZOrder

将指定的形状移到集合中其他形状的前面或后面(即更改该形状在 z-次序中的位置)。
语法
表达式.ZOrder(ZOrderCmd)
表达式   一个代表 Shape 对象的变量。
参数
名称 必选/可选 数据类型 描述
ZOrderCmd 必选 MsoZOrderCmd 指定根据其他形状将指定的形状移到什么位置。

  1. ZOrder

返回指定对象的 z-次序位置。Long 型,只读。

  1. ZOrderPosition

返回指定形状在 z-顺序中的位置。Long 型,只读。
语法
表达式.ZOrderPosition
表达式   一个代表 Shape 对象的变量。

  1. ZTest

返回 z 检验的单尾概率值。对于给定的假设总体平均值,ZTEST 返回样本平均值大于数据集(数组)中观察平均值(即观察样本平均值)的概率。

VBA编程常用词汇英汉对照表

表 20‑1到表 20‑8是VBA编程中使用频率最高的英文单词,按字母排序。词性列中,a表示形容词,n表示名词,v表示动词,p表示介词以及其他词性。

表 20‑1 VBA编程常用词汇表

单词

中文

词性

单词

中文

词性

单词

中文

词性

Absolute

绝对

a

Area

区域

n

Book

n

Accelerator

加速器

n

Areas

区域

n

Boolean

布尔

n

Access

访问

v

Arg

参数

n

Border

边框

n

Action

动作

n

Array

数组

n

Borders

边框

n

Activate

激活

v

Art

艺术

n

Both

这两个

p

Active

活动的

a

As

作为

p

Bottom

n

Activesheet

活动工作表

n

Asc

升序

p

Bound

绑定

n

Activeworkbook

活动工作簿

n

Ascending

提升

v

Box

盒子

n

Add

添加

v

Ascii

美国信息交换标准代码

n

Break

跳出

v

Addin

加载宏

n

Aspect

方面

n

Breaks

间隔

n

Addins

加载宏

n

At

p

Bring

v

Address

地址

n

Australia

澳大利亚

n

Browser

浏览器

n

After

p

Author

作者

n

Built

创建

v

Again

再一次

p

Auto

自动

a

Builtin

内置的

n

Age

年龄

n

Automatic

自动

a

Button

按钮

n

Alert

警报

n

Average

平均

n

By

通过

v

Alerts

警报

n

Axes

n

Bye

再见

n

Alias

别名

n

Axis

n

Byte

字节

n

Align

对齐

v

Back

回来

v

Calculate

计算

v

Alignment

对齐

n

Background

背景

n

Calculation

计算

n

All

所有

n

Backward

向后的

a

Call

调用

v

Allow

允许

v

Bar

条形

n

Caller

调用者

n

Alt

按键名

n

Bars

条形

n

Callout

调出

v

Anchor

n

Basic

基本

a

Cancel

取消

v

And

p

Before

之前

p

Canvas

画布

n

App

应用程序

n

Begin

开始

n

Capital

首字母大写

n

Appearance

外观

n

Below

下面

n

Caps

按键名

n

Application

应用程序

n

Between

之间的

a

Caption

标题

n

Applications

应用程序

n

Bitmap

位图

n

Case

分支

n

Apply

应用

v

Black

黑色的

a

Category

类别

n

April

4月

n

Blue

蓝色的

a

Cell

单元格

n

Arc

n

Bold

粗体

n

Cells

单元格

n

 表 20‑2 VBA编程常用

单词

中文

词性

单词

中文

词性

单词

中文

词性

Center

中心

n

Comment

批注

n

Deactivate

失去焦点

v

Centimeters

厘米

n

Comments

批注

n

Debug

调试

v

Change

改变

v

Common

普通的

a

Decimal

小数

a

Changes

变化

n

Compare

比较

n

Declare

声明

v

Char

字符

n

Condition

条件

n

Default

默认的

a

Characters

字符

n

Conditions

条件

n

Del

删除

v

Chart

图表

n

Connect

连接

v

Delay

延迟

n

Charts

图表

n

Constants

常数

n

Delete

删除

v

Check

检查

v

Content

内容

n

Deleting

删除

n

Child

孩子

n

Contents

内容

n

Delimited

分隔

n

China

中国

n

Context

环境

n

Demo

演示

v

Class

n

Continuous

连续

a

Descending

降序

n

Classic

经典的

a

Control

控制

v

Description

描述

n

Clear

清除

v

Controls

控制

n

Designer

设计师

n

Click

点击

v

Copies

副本

n

Desk

桌子

n

Clip

剪辑

v

Copy

复制

n

Destination

目的地

n

Clipboard

剪贴板

n

Corners

角落

n

Details

细节

n

Close

关闭

v

Count

计数

n

Diagonal

对角

n

Cls

清空

v

Create

创建

v

Diagram

n

Clustered

聚集的

a

Criteria

标准

n

Dialog

对话框

n

Cmd

命令行

n

Cross

交叉

n

Dialogs

对话框

n

Code

代码

n

Ctrl

按键名

n

Different

不同的

a

Collate

合并

v

Current

当前的

a

Dim

声明

v

Collection

集合

n

Custom

自定义

n

Direction

方向

n

Color

颜色

n

Customize

定制

v

Display

显示

v

Column

n

Cut

剪切

v

Distributed

分散的

a

Columns

n

Cyan

青色

a

Divide

除以

v

Combo

组合

n

Daemon

虚拟软件

n

Do

循环

v

Combobox

组合框

n

Dash

破折号

n

Doc

文档

n

Command

命令

n

Data

数据

n

Dock

停靠

v

Commandbar

工具栏

n

Date

日期

n

Document

文档

n

Commandbars

工具栏

n

Dbl

双精度

n

Dot

n

 表 20‑3 VBA编程常用词汇表

单词

中文

词性

单词

中文

词性

单词

中文

词性

Double

双精度

n

Everything

一切

n

Focus

焦点

n

Down

下来

n

Example

例子

n

Folder

文件夹

n

Drawing

n

Excel

Excel

n

Follow

跟随

v

Drink

饮料

n

Exclamation

警告

n

Fomat

格式

n

Drop

下降

n

Execute

执行

v

Font

字体

n

Dropdown

下拉

v

Exit

退出

v

Footer

页脚

n

Duplicate

克隆

v

Explorer

资源管理器

n

For

循环

n

Each

每一个

p

Export

导出

v

Fore

n

Edge

边缘

n

Expression

表达式

n

Foreground

前景

n

Edit

编辑

v

Extended

扩展

a

Form

窗体

n

Effect

效果

n

Extensions

扩展

n

Format

格式

n

Element

元素

n

Face

图标

n

Formats

格式

n

Else

其他的

p

FALSE

n

Formatting

格式化

n

Email

电子邮件

n

Feb

2月

n

Forms

窗体

n

Embed

嵌入

v

February

2月

n

Formula

公式

n

Embedded

嵌入式

a

Field

n

Formulas

公式

n

Empty

a

File

文件

n

Forward

向前

n

Enable

启用

a

Filename

文件名

n

Frame

框架

n

Enabled

启用

a

Files

文件

n

Freeform

自由的

a

End

结束

n

Fill

填充

v

Freeze

冻结

v

Enter

输入

v

Filter

过滤

v

Friday

星期五

n

Entire

整个

a

Filtering

过滤

n

From

p

Entry

条目

n

Filters

过滤器

n

Front

前面

n

Equal

平等的

a

Find

查找

v

Full

完整的

a

Err

错误

n

First

第一个

n

Function

函数

n

Error

错误

n

Fit

适合

v

Get

获取

v

Esc

按键名

n

Fixed

固定的

a

Girl

女孩

n

Escape

逃避

v

Flags

标识

n

Go

v

Evaluate

评价

v

Flash

闪光

n

Goto

定位

v

Even

偶数

n

Flip

翻转

v

Graphic

图形

n

Event

事件

n

Floating

浮动的

a

Gray

灰色的

a

Events

事件

n

Floor

向下取整

n

Greater

更大的

a

表 20‑4 VBA编程常用词汇表

单词

中文

词性

单词

中文

词性

单词

中文

词性

Green

绿色

n

Initialize

初始化

v

Large

n

Grid

网格

n

Initials

名字的首字母

n

Layout

布局

n

Gridline

栅格线

n

Ink

墨水

n

Left

n

Gridlines

网格线

n

Input

输入

v

Legend

图例

n

Group

组合

v

Ins

按键名

n

Len

长度

n

Handle

处理

v

Insert

插入

v

Length

长度

n

Has

n

Inserting

插入

n

Less

n

Header

页眉

n

Inside

内部

a

Lib

n

Headings

标题

n

Install

安装

v

Library

图书馆

n

Height

高度

n

Installed

安装

a

Like

比对

v

Hello

你好

n

Instance

实例

n

Line

n

Hidden

隐藏

v

Instr

检索位置

n

Lines

n

Home

按键名

n

Int

转换为整型

n

Link

链接

n

Horizontal

水平

a

Integer

整数

n

Linked

链接的

a

Horizontally

水平

p

Interface

接口

n

Links

链接

n

Hwnd

句柄

n

Interior

填充

n

List

列表

n

Hyper

n

Intersect

相交

n

Load

装载

v

Hyperlink

超链接

n

Is

p

Local

本地的

a

Hyperlinks

超链接

n

Italic

斜体

n

Location

定位

n

Icon

图标

n

Italy

意大利

n

Lock

锁定

v

Icons

图标

n

Item

n

Locked

锁着的

a

Id

编号、索引

n

Items

项目

n

Login

登录

v

If

如果

p

Jan

1月

n

Logo

图标

n

Ignore

忽略

v

January

1月

n

Long

a

Image

图像

n

Japan

日本

n

Look

v

In

在……里面

p

Join

加入

v

Loop

循环

p

Include

包括

v

Justify

对齐

v

Macro

n

Indent

缩进

n

Key

关键

n

Main

主要

n

Index

索引

n

Keys

n

Major

主要

n

Indicator

指示器

n

Korea

韩国

n

Manager

管理器

n

Information

信息

n

Label

标签

n

Manual

手动的

a

Initial

最初的

a

Labels

标签

n

Mar

三月

n

表 20‑5 VBA编程常用词汇表

单词

中文

词性

单词

中文

词性

单词

中文

词性

Margin

边界

n

Msgbox

对话框

n

Operator

操作符

n

Marker

标记

n

Mso

微软Office

n

Option

选项

n

Markers

标记

n

Multi

a

Options

选项

n

Match

匹配

v

Multiply

v

Or

p

Maths

数学

n

My

我的

a

Order

顺序

n

Max

最大值

n

Name

名称

n

Orientation

取向

n

Maximized

最大化

n

Names

名称

n

Other

其他

p

Maximum

最大

n

Navigate

导航

v

Out

输出

n

May

可能

n

New

a

Outlook

邮件

n

Me

本体

n

Newbook

新工作簿

n

Over

结束

n

Media

媒体

n

Newline

换行符

n

Page

页面

n

Medium

中位数

n

Next

下一个

p

Pages

页面

n

Melon

n

No

没有

p

Panes

窗格

n

Menu

菜单

n

None

没有一个

n

Paper

n

Menus

菜单

n

Normal

正常的

a

Parameter

参数

n

Merge

合并

v

Not

n

Parent

父级

n

Message

消息

n

Nothing

空的

n

Part

部分

n

Method

方法

n

Now

现在

n

Password

密码

n

Microsoft

微软

n

Null

空的

n

Paste

粘贴

v

Min

最小值

n

Num

按键名

n

Path

路径

n

Minimized

最小化

n

Number

数量

n

Pattern

模式

n

Minimum

最低

n

Numlock

按键名

n

Patterns

模式

n

Minor

次要

n

Numpad

数字键盘

n

People

n

Mixed

混合

a

Object

对象

n

Personal

个人的

a

Mod

求余

n

Objects

对象

n

Picker

选择器

n

Modal

模态

n

Odd

奇数

n

Picture

图片

n

Mode

模式

n

Office

微软Office

n

Pictures

图片

n

Modify

修改

v

Offset

偏移

n

Pie

饼图

n

Monday

周一

n

On

p

Pivot

透视表

n

Mouse

鼠标

n

One

一个

n

Pixels

像素

n

Move

移动

v

Only

只有

n

Place

置于

v

Movie

电影

n

Open

打开

v

Placeholder

占位符

n

 表 20‑6 VBA编程常用词汇表

单词

中文

词性

单词

中文

词性

单词

中文

词性

Plain

空白的

a

Radar

雷达

n

Ruler

标尺

n

Plot

绘图

v

Rand

随机数

n

Run

运行

v

Plus

v

Random

随机

n

Saturday

周六

n

Point

n

Range

单元格区域

n

Save

保存

v

Pointer

指针

n

Rank

排名

v

Saved

保存的

a

Points

n

Ratio

n

Scale

范围

n

Popup

弹出

v

Reading

阅读

n

Scatter

离散的

a

Portrait

肖像

n

Recent

最近

a

Scenarios

方案

n

Position

位置

n

Record

记录

v

Score

分数

n

Power

乘幂

n

Rectangle

矩形

n

Screen

屏幕

n

Press

按下

v

Recursive

递归

n

Script

脚本

n

Preview

预览

v

Red

红色的

n

Scroll

滚动

v

Previous

以前的

a

Ref

引用

n

Search

搜索

v

Primary

首要的

a

Reference

引用

n

Second

第二个

n

Print

打印

v

Refers

引用

n

Select

选择

v

Printer

打印机

n

Reg

注册

n

Selected

选择

a

Private

私人

a

Region

地区

n

Selection

选择

n

Proc

过程

n

Remove

移除

v

Send

发送

v

Professional

专业

a

Replace

替换

v

Series

系列

n

Program

程序

n

Replacement

更换

n

Server

服务器

n

Properties

属性

n

Reset

重置

v

Set

对象变量赋值

v

Property

属性

n

Resize

调整大小

v

Setup

安装

n

Protect

保护

v

Restrictions

限制

n

Shape

形状

n

Protection

保护

n

Result

结果

n

Shapes

形状

n

Province

n

Resume

重新开始

v

Sheet

工作表

n

Public

公共

a

Return

返回

v

Sheets

n

Publish

发布

v

Reverse

反向

v

Shell

调用DOS

v

Put

放在

v

Right

右侧

n

Shift

转变

n

Quality

质量

n

Rnd

随机数

n

Shortcut

快捷方式

n

Query

查询

v

Rotation

旋转

n

Show

显示

v

Question

问题

n

Row

n

Shrink

缩小

v

Quit

退出

v

Rows

n

Single

n

表 20‑7 VBA编程常用词汇表

单词

中文

词性

单词

中文

词性

单词

中文

词性

Size

大小

n

Superscript

上标

n

Treeview

树形控件

n

Small

n

Tab

选项卡

n

Trend

趋势

n

Smooth

光滑的

a

Table

n

Trendline

趋势线

n

Sort

排序

n

Tables

n

TRUE

真正的

n

Sorting

排序

n

Tabs

选项卡

n

Try

试一试

n

Source

n

Tag

标签

n

Tuesday

周二

n

Space

空格

n

Tall

n

Type

类型

n

Speak

讲话

v

Target

目标

n

Underline

下划线

n

Special

特殊的

a

Template

模板

n

Undo

撤销

n

Spinner

微调控制项

n

Temporary

临时

a

Unicode

Unicode

n

Split

分裂

v

Terminate

终止

v

Uninstall

卸载

v

Square

平方

n

Test

测试

n

Union

并集

n

Standard

标准

n

Text

文本

n

Unit

单位

n

Start

开始

v

Then

然后

p

Unload

卸载

v

Startup

启动

v

Thick

n

Unlocked

解锁

n

State

状态

n

Thin

n

Unprotect

解除

v

Status

状态

n

This

n

Up

向上

n

Step

步长

n

Through

通过

n

Used

用过的

a

Stop

停止

v

Thursday

周四

n

User

用户

n

Stretch

拉伸

v

Tiling

瓷砖

n

Userform

用户窗体

n

Strikethrough

加删除线

n

Time

时间

n

Using

使用

n

String

字符串

n

Timer

计时器

n

Val

计算值

n

Structure

结构

n

Tip

提示

n

Valid

有效的

n

Studio

工作室

n

Title

标题

n

Validate

验证

v

Style

样式

n

To

来、到

p

Validation

验证

n

Styles

样式

n

Toggle

切换

v

Value

数值

n

Sub

过程

n

Tool

工具

n

Values

n

Subscript

下标

n

Tools

工具

n

Variant

变体

n

Subtract

减去

n

Tooltip

工具提示

n

Version

版本

n

Success

成功

n

Top

n

Vertical

垂直

a

Sum

总和

n

Total

n

Vertically

垂直

n

Super

超级

n

Transpose

转置

v

Very

非常

n

表 20‑8 VBA编程常用词汇表

单词

中文

词性

单词

中文

词性

Video

视频

n

White

白色的

n

View

视图

n

Whole

整个

n

Viewer

阅读器

n

Wide

n

Visible

可见

n

Width

宽度

n

Visio

矢量绘图软件

n

Window

窗口

n

Visual

可视的

n

Windows

窗户

n

Wait

等待

v

With

p

Walls

n

Wizard

向导

n

Warning

警告

n

Word

单词

n

Wave

n

Work

工作

n

Web

网络

n

Workbook

工作簿

n

Wednesday

周三

n

Workbooks

手册

n

Weight

重量

n

Worksheet

工作表

n

Wend

循环结束标记

p

Worksheets

工作表

n

What

什么

n

World

世界

n

Where

在哪里

n

White

白色的

n

While

循环开始标记

n

Whole

整个

n

Wrap

回折

v

Zeros

零值

n

Yellow

黄色的

a

Zone

区域

n

Yes

是的

n

Zoom

缩放

v

     

Zorder

叠放次序

v

posted @ 2023-04-16 16:02  快乐58  阅读(469)  评论(0编辑  收藏  举报