Excel VBA属性、方法、事件大全——Part1（Complete List of Excel VBA attribute/method and event）

为了提取这个列表，也算是费了九牛二虎之力了。

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

Attribute/Method/Event	Description
Abs	返回参数的绝对值，其类型和参数相同。 语法 Abs(number) 必要的 number 参数是任何有效的数值表达式，如果 number 包含 Null，则返回 Null，如果 number 是未初始化的变量，则返回 0。
AcceptAllChanges	接受指定的共享工作簿中的所有更改 本示例接受活动工作簿中的所有更改。 ActiveWorkbook.AcceptAllChanges
AcceptLabelsInFormulas	如果可在工作表公式中使用标志，则该值为 True 本示例对活动工作簿设置 AcceptLabelsInFormulas 属性，然后将第一张工作表中的单元格 B1:D1 设置为列标志。 ActiveWorkbook.AcceptLabelsInFormulas = True Worksheets(1).Range("b1:d1").FormulaLabel = xlColumnLabels
AccrInt	返回定期付息有价证券的应计利息。
AccrIntM	返回到期一次性付息有价证券的应计利息。
Acos	返回数字的反余弦值。反余弦值是余弦值为 Arg1 的角度。返回的角度以弧度给出，范围从 0（零）到 pi。
Acosh	返回数字的反双曲余弦值。数字必须大于或等于 1。反双曲余弦值的双曲余弦值为 Arg1，因此 Acosh(Cosh(number)) 等于 Arg1。
ActionControl	获取一个 CommandBarControl 对象，该对象的 OnAction 属性设置为当前正在运行的过程。只读。 语法 表达式.ActionControl 表达式   一个代表 CommandBars 对象的变量。
Activate	将窗口提到 z-次序的最前面这样不会引起可能附加在工作簿上的 Auto_Activate 或 Auto_Deactivate 宏的运行（可用 RunAutoMacros 方法运行这些宏）。 expression.Activate expression必需。该表达式返回上述对象之一。
Activate	激活一个工作簿、工作表、图表或嵌入图表时产生此事件。 当激活工作表时，本示例对 A1:A10 区域进行排序。 Private Sub Worksheet_Activate()     Range("a1:a10").Sort Key1:=Range("a1"), Order:=xlAscending End Sub
Activate	激活与该工作簿相关的第一个窗口 本示例激活工作簿 Book4.xls。如果工作簿 Book4.xls 有若干窗口，本示例激活第一个，即 Book4.xls:1。 Workbooks("BOOK4.XLS").Activate
Activate	使当前工作表成为活动工作表。等同于单击工作表的选项卡。 本示例激活工作表 Sheet1。 Worksheets("Sheet1").Activate
Activate	激活一个工作簿、工作表、图表或嵌入图表时产生此事件 当激活工作表时，本示例对 A1:A10 区域进行排序。 Private Sub Worksheet_Activate()     Range("a1:a10").Sort Key1:=Range("a1"), Order:=xlAscending End Sub
Activate	激活单个单元格，该单元格必须处于当前选定区域内 本示例选定工作表 Sheet1 上的单元格区域 A1:C3，并激活单元格 B2。 Worksheets("Sheet1").Activate Range("A1:C3").Select Range("B2").Activate
Activate	使当前图表成为活动图表。 expression.Activate expression必需。该表达式返回上述对象之一。
Activate	使当前图表成为活动图表。
Activate	激活对象。
Activate	将窗口提到 z-次序的最前面。 语法 表达式.Activate 表达式   一个代表 Window 对象的变量。 返回值 Variant
Activate	激活窗格。
ActivateMicrosoftApp	激活一个 Microsoft 应用程序 本示例启动并激活 Word。 Application.ActivateMicrosoftApp xlMicrosoftWord
ActivateNext	激活指定窗口，并将其移到窗口 z-次序的末尾 本示例将活动窗口移到窗口 z-次序的末尾。 ActiveWindow.ActivateNext
ActivateNext	激活指定窗口，并将其移到窗口 z-次序的末尾。 语法 表达式.ActivateNext 表达式   一个代表 Window 对象的变量。 返回值 Variant
ActivatePrevious	激活指定窗口，然后激活窗口 z-次序末尾的窗口 本示例激活窗口 z-次序末尾的窗口。 ActiveWindow.ActivatePrevious
ActivatePrevious	激活指定窗口，然后激活窗口 z-次序末尾的窗口。 语法 表达式.ActivatePrevious 表达式   一个代表 Window 对象的变量。 返回值 Variant
ActivateWizard	在自定义向导期间重新启动或暂停“Office 助手帮助”。
ActiveCell	返回一个 Range 对象 本示例更改活动单元格的字体格式设置。 Worksheets("Sheet1").Activate With ActiveCell.Font     .Bold = True     .Italic = True End With
ActiveCell	返回一个 Range 对象，该对象代表活动窗口的活动单元格（最上面的窗口），或指定窗口的活动单元格 本示例在消息框中显示活动单元格的值。由于如果活动表不是工作表则 ActiveCell 属性无效，所以本示例使用 ActiveCell 属性之前先激活 Sheet1。 Worksheets("Sheet1").Activate MsgBox ActiveCell.Value
ActiveCell	返回一个 Range 对象，它代表活动窗口（最上方的窗口）或指定窗口中的活动单元格。如果窗口中没有显示工作表，此属性无效。只读。 语法 表达式.ActiveCell 表达式   一个代表 Window 对象的变量。
ActiveChart	返回 Chart 对象 本示例打开活动图表的图例。 ActiveChart.HasLegend = True
ActiveChart	返回 Chart 对象，该对象代表活动图表（包括嵌入图表或图表工作表）。 本示例打开活动图表的图例。 ActiveChart.HasLegend = True
ActiveChart	返回 Chart 对象，该对象代表活动图表 本示例打开活动图表的图例。 ActiveChart.HasLegend = True
ActiveChart	返回一个 Chart 对象，它代表活动图表（嵌入式图表或图表工作表）。嵌入式图表在被选中或激活时被认为是活动的。当没有图表处于活动状态时，此属性返回 Nothing。 语法 表达式.ActiveChart 表达式   一个代表 Window 对象的变量。
ActiveFilters	指示指定数据透视表中的当前活动的筛选。只读。
ActiveMenuBar	获取一个 CommandBar 对象，该对象代表容器应用程序中的活动菜单栏。只读。 语法 表达式.ActiveMenuBar 表达式   一个代表 CommandBars 对象的变量。
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
ActivePane	返回一个 Pane 对象，该对象表示窗口中的活动窗格。只读。 语法 表达式.ActivePane 表达式   一个代表 Window 对象的变量。
ActivePrinter	返回或设置活动打印机的名称。 本示例显示活动打印机的名称。 MsgBox "The name of the active printer is " & _     Application.ActivePrinter
ActiveSheet	返回一对象，该对象代表活动工作簿中的窗口或活动工作表 本示例显示活动工作表的名称。 MsgBox "The name of the active sheet is " & ActiveSheet.Name
ActiveSheet	返回一对象，该对象代表活动工作簿中的，或者指定的窗口或工作簿中的活动工作表（最上面的工作表） 本示例显示活动工作表的名称。 MsgBox "The name of the active sheet is " & ActiveSheet.Name
ActiveSheet	返回一对象，该对象代表活动工作簿中的，或者指定的窗口或工作簿中的活动工作表（最上面的工作表）。 本示例显示活动工作表的名称。 MsgBox "The name of the active sheet is " & ActiveSheet.Name
ActiveSheet	返回一个对象，它代表活动工作簿中或指定的窗口或工作簿中的活动工作表（最上面的工作表）。如果没有活动的工作表，则返回 Nothing。 语法 表达式.ActiveSheet 表达式   一个代表 Window 对象的变量。
ActiveSheetView	返回一个对象，该对象代表指定窗口中活动工作表的视图。只读。 版本信息  已添加版本：  Excel 2007 语法 表达式.ActiveSheetView 表达式   一个代表 Window 对象的变量。
ActiveWindow	返回一个 Window 对象，该对象代表活动窗口 本示例显示活动窗口的名称（Caption 属性）。 MsgBox "The name of the active window is " & ActiveWindow.Caption
ActiveWorkbook	返回一个 Workbook 对象，该对象代表活动窗口的工作簿 本示例显示活动工作簿的名称。 MsgBox "The name of the active workbook is " & ActiveWorkbook.Name
ActiveXControl	返回一个 Object，该对象表示“文档操作”任务窗格中显示的 ActiveX 控件。只读。
AdaptiveMenu	获取一个 Boolean 类型的值，该值指定命令栏是否应包含自适应菜单。可读写。 语法 表达式.AdaptiveMenu 表达式   一个返回 CommandBar 对象的表达式。 返回值 Boolean
AdaptiveMenus	此属性可选中或取消选中指定 Microsoft Office 中菜单是完全显示还是按个性化方式显示的选项的复选框控件。可读写。 语法 表达式.AdaptiveMenus 表达式   一个代表 CommandBars 对象的变量。
Add	将新加载宏文件添加到加载宏列表中。返回 AddIn 对象。 expression.Add(FileName, CopyFile) expression   必需。该表达式返回一个 AddIns 对象。 Filename   String 类型，必需。包含要添加到加载宏管理器列表中的加载宏的文件名称。 CopyFile   Variant 类型，可选。如果加载宏文件在硬盘上，则忽略本参数。在加载宏处于可移动介质（软盘或光盘）上的情况下，如果为 True，就将该加载宏复制到硬盘上；如果为 False，则将加载宏保留在可移动介质上。如果省略本参数，Microsoft Excel 将弹出对话框，提示您选择。
Add	指定新名称 本示例为活动工作簿中工作表 Sheet1 上的单元格区域 A1:D3 定义新名称。注意，如果工作表 Sheet1 不存在，则无任何返回值。 Sub MakeRange()     ActiveWorkbook.Names.Add _         Name:="tempRange", _ RefersTo:="=Sheet1!$A$1:$D$3" End Sub
Add	新建工作簿。 本示例新建工作簿。 Workbooks.Add
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
Add	向指定的区域或图形添加超链接 本示例向单元格 A5 添加超链接。 With Worksheets(1)     .Hyperlinks.Add Anchor:=.Range("a5"), _         Address:="http://example.microsoft.com", _         ScreenTip:="Microsoft Web Site", _         TextToDisplay:="Microsoft" End With
Add	新建工作表、图表或宏表 本示例将新建工作表插入到活动工作簿的最后一张工作表之前。 ActiveWorkbook.Sheets.Add Before:=Worksheets(Worksheets.Count)
Add	创建一个新的命令栏并将其添加到命令栏集合中。语法 表达式.Add(Name, Position, MenuBar, Temporary) 表达式   必需。一个代表 CommandBars 对象的变量。 参数 名称必选/可选数据类型描述 Name 可选 Variant 新命令栏的名称。如果省略此参数，则为命令栏指定默认名称（如 Custom 1）。 Position 可选 Variant 新命令栏的位置或类型。可以是 MsoBar 常量之一。 MenuBar 可选 Variant 设置为 True 将以新命令栏替换活动菜单栏。默认值为 False。 Temporary 可选 Variant 如果为 True，则将使新命令栏变成临时命令栏。临时命令栏将在容器应用程序关闭时删除。默认值为 False。
Add	向最近使用的文件列表中添加文件。
Add	添加在重新计算工作表时要跟踪的区域。
Add	新建工作表、图表或宏表。新建的工作表将成为活动工作表。
Add	向指定区域内添加数据有效性验证。
Add	向指定的单元格中添加拼音文本。
Add	添加智能标记。返回 SmartTag 对象。
Add	在受保护的工作表中添加可编辑的单元格区域。返回 AllowEditRange 对象。
Add	添加用户访问列表。
Add	添加自定义属性信息。
Add	添加水平分页符。
Add	添加垂直分页符。
Add	向指定的区域或形状添加超链接。
Add	新建方案并将其添加到当前工作表可用的方案列表中。
Add	向工作表中添加新的 OLE 对象。
Add	新建一个查询表。
Add	创建新查询参数。
Add	添加新的数据透视表。返回一个 PivotTable 对象。
Add	创建新的计算字段。返回 PivotField 对象。
Add	向数据透视表中添加计算字段或计算项。返回 CalculatedMember 对象。
Add	新建数据透视表公式。
Add	新建数据透视表项。
Add	创建新的嵌入式图表。
Add	新建图表工作表，并返回 Chart 对象。 语法 表达式.Add(Before, After, Count, Type) 表达式   一个代表 Charts 对象的变量。 参数 名称必选/可选数据类型描述 Before 可选 Variant 指定工作表的对象，新建的工作表将置于此工作表之前。 After 可选 Variant 指定工作表的对象，新建的工作表将置于此工作表之后。 Count 可选 Variant 要添加的工作表数。默认值为 1。 Count 可选 Variant 一个 XlChartType 常量，它代表要添加的图表类型。 返回值 一个代表新的图表工作表的 Chart 对象。
Add	向 SeriesCollection 集合添加一个或多个新数据系列。
Add	创建新的趋势线。
Add	新建一个自定义的文档属性。只能在自定义 DocumentProperties 集合中新添文档属性。
Add	新建自定义视图。
Add	新建样式并将其添加到当前工作簿的可用样式列表中。
Add	创建一个对象，该对象代表保存在网页上的文档中的项目。当对 Microsoft Excel 中的文档进行了一些自动修订时，这些对象可帮助随后对网页进行的更新。返回 PublishObject 对象。
Add	添加 XML 映射到指定的工作簿。
AddCallout	创建一个无边框的线形标注。返回一个代表新标注的 Shape 对象。 语法 表达式.AddCallout(Type, Left, Top, Width, Height) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 Type 必选 MsoCalloutType 标注线的类型。 Left 必选 Single 标注边框的左上角相对于文档左上角的位置（以磅为单位）。 Top 必选 Single 标注边框的左上角相对于文档左上角的位置（以磅为单位）。 Width 必选 Single 标注边框的宽度（以磅为单位）。 Height 必选 Single 标注边框的高度（以磅为单位）。 返回值 Shape
AddChart	在活动工作表上的指定位置创建图表。 版本信息  已添加版本：  Excel 2007 语法 表达式.AddChart(Type, Left, Top, Width, Height) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 Type 可选 XlChartType 图表类型。 Left 可选 Variant 从对象左边界至 A 列左边界（在工作表上）或图表区左边界（在图表上）的距离，以磅为单位。  Top 可选 Variant 从图形区域中最上端的图形的顶端到工作表顶端的距离，以磅为单位。 Width 可选 Variant 对象的宽度，以磅为单位。  Height 可选 Variant 对象的高度，以磅为单位。  返回值 Shape
AddChartAutoFormat	向图表的可用自动套用格式列表中添加自定义的自动套用格式 本示例添加一个基于 Chart1 的自动套用格式。 Application.AddChartAutoFormat _     Chart:=Charts("Chart1"), Name:="Presentation Chart"
AddComment	为区域添加批注 本示例为第一张工作表中 E5 单元格添加批注。 Worksheets(1).Range("E5").AddComment "Current Sales"
AddConnector	创建一个连接符。返回一个代表新连接符的 Shape 对象。添加一个连接符时，它没有连接到任何对象。使用 BeginConnect 和 EndConnect 方法可将连接符的头和尾连接到文档中的其他形状上。 语法 表达式.AddConnector(Type, BeginX, BeginY, EndX, EndY) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 Type 必选 MsoConnectorType 要添加的连接符类型。 BeginX 必选 Single 连接符的起点相对于文档左上角的水平位置（以磅为单位）。 BeginY 必选 Single 连接符的起点相对于文档左上角的垂直位置（以磅为单位）。 EndX 必选 Single 连接符的终点相对于文档左上角的水平位置（以磅为单位）。 EndY 必选 Single 连接符的终点相对于文档左上角的垂直位置（以磅为单位）。 返回值 Shape
AddCurve	返回一个 Shape 对象，该对象表示工作表中的贝赛尔曲线。 语法 表达式.AddCurve(SafeArrayOfPoints) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 SafeArrayOfPoints 必选 Variant 由指定曲线的顶点和控制点的坐标对（坐标对：一对值，表示两维数组中存储的点的 x 和 y 坐标，该数组中包含许多点的坐标。）组成的数组。首先指定起点，然后指定两个第一段贝塞尔曲线的控制点。该曲线每增加一条线段，就要为其指定一个顶点和两个控制点。最后指定该曲线的终点。请注意，必须指定的点数始终为 3n + 1，其中 n 为曲线的线段个数。 返回值 Shape
AddCustomList	为自定义自动填充和/或自定义排序添加自定义序列 本示例将一个字符串数组添加到自定义列表中。 Application.AddCustomList Array("cogs", "sprockets", _     "widgets", "gizmos")
AddDataField	将数据字段添加到数据透视表中。返回一个 PivotField 对象，该对象表示新的数据字段。
AddFields	向数据透视表或数据透视图中添加行字段、列字段和页字段。
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
AddIndent	当单元格中文本的对齐方式为垂直或水平等距分布时，如果文本为自动缩进，则该值为 True 本示例将Sheet1的单元格A1中文本的水平对齐方式设置为等距分布，然后缩进该文本。 With Worksheets("Sheet1").Range("A1")     .HorizontalAlignment = xlHAlignDistributed     .AddIndent = True End With
AddIndent	返回或设置一个 Variant 值，它指明当单元格中文本的对齐方式为水平或垂直等距分布时，文本是否为自动缩进。 语法 表达式.AddIndent 表达式   一个代表 CellFormat 对象的变量。
AddIndent	返回或设置一个 Boolean 值，它指明当单元格中文本的对齐方式为水平或垂直等距分布时，文本是否为自动缩进。 语法 表达式.AddIndent 表达式   一个代表 Style 对象的变量。
AddIndent	返回或设置一个 Boolean 值，它指明当单元格中文本的对齐方式为水平或垂直等距分布时，文本是否为自动缩进。
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
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
AddinUninstall	当指定工作簿作为加载宏卸载时，产生此事件 本示例将 Microsoft Excel 最小化。 Private Sub Workbook_AddinUninstall()     Application.WindowState = xlMinimized End Sub
AddItem	为列表框或组合框添加项。
AddLabel	创建一个连接符。返回一个代表新连接符的 Shape 对象。 语法 表达式.AddLabel(Orientation, Left, Top, Width, Height) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 Orientation 必选 MsoTextOrientation 标签中文本的方向。 Left 必选 Single 标签左上角相对于文档左上角的位置（以磅为单位）。 Top 必选 Single 标签左上角相对于文档顶部的位置（以磅为单位）。 Width 必选 Single 标签的宽度（以磅为单位）。 Height 必选 Single 标签的高度（以磅为单位）。 返回值 Shape
AddLine	当本方法应用于 Shapes 对象时，返回一个 Shape 对象，该对象表示工作表中的新线条。 语法 表达式.AddLine(BeginX, BeginY, EndX, EndY) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 BeginX 必选 Single 线条的起点相对于文档左上角的位置（以磅为单位）。 BeginY 必选 Single 线条的起点相对于文档左上角的位置（以磅为单位）。 EndX 必选 Single 线条的终点相对于文档左上角的位置（以磅为单位）。 EndY 必选 Single 线条的终点相对于文档左上角的位置（以磅为单位）。 返回值 Shape
AddMemberPropertyField	将成员属性字段添加到多维数据集字段的显示区域。
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
AddPageItem	向具有多个项的页面字段添加其他项。
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
AddPolyline	创建一个不封闭的连续线段或一个封闭的多边形。返回一个代表新的连续线段或多边形的 Shape 对象。 语法 表达式.AddPolyline(SafeArrayOfPoints) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 SafeArrayOfPoints 必选 Variant 由指定多边形顶点的坐标对（坐标对：一对值，表示两维数组中存储的点的 x 和 y 坐标，该数组中包含许多点的坐标。）组成的数组。 返回值 Shape
AddReplacement	向“自动更正”替换文本数组中添加项。 语法 表达式.AddReplacement(What, Replacement) 表达式   一个代表 AutoCorrect 对象的变量。 参数 名称必选/可选数据类型描述 What 必选 String 要替换的文本。如果该字符串已存在于自动更正替换文本数组中，则现有的替换文本将被新文本替换。 Replacement 必选 String 替换文本。
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))
Address	返回或设置一个 String 型，它代表目标文档的地址。
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))
AddSet	向 CubeFields 集合中添加一个新的 CubeField 对象。CubeField 对象与多维数据集的联机分析处理 (OLAP) 提供程序上定义的集合相对应。
AddShape	返回一个 Shape 对象，该对象表示工作表中的新自选形状。 语法 表达式.AddShape(Type, Left, Top, Width, Height) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 Type 必选 MsoAutoShapeType 指定要创建的自选形状的类型。 Left 必选 Single 自选形状边框的左上角相对于文档左上角的位置（以磅为单位）。 Top 必选 Single 自选形状边框的左上角相对于文档左上角的位置（以磅为单位）。 Width 必选 Single 自选形状边框的宽度（以磅为单位）。 Height 必选 Single 自选形状边框的高度（以磅为单位）。 返回值 Shape
AddTextbox	创建一个文本框。返回一个代表新文本框的 Shape 对象。 语法 表达式.AddTextbox(Orientation, Left, Top, Width, Height) 表达式   一个代表 Shapes 对象的变量。 参数 名称必选/可选数据类型描述 Orientation 必选 MsoTextOrientation 文本框的方向。 Left 必选 Single 文本框左上角相对于文档左上角的位置（以磅为单位）。 Top 必选 Single 文本框左上角相对于文档顶部的位置（以磅为单位）。 Width 必选 Single 文本框的宽度（以磅为单位）。 Height 必选 Single 文本框的高度（以磅为单位）。 返回值 Shape
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
AddToFavorites	将工作簿或超链接的快捷方式添加到“收藏夹”文件夹 本示例将活动工作簿的快捷方式添加到“收藏夹”文件夹。 ActiveWorkbook.AddToFavorites
AddToFavorites	将工作簿或超链接的快捷方式添加到“收藏夹”文件夹。
AdjustColumnWidth	如果每次刷新指定的查询表时，列宽都会自动调整为最适合的状态，则为 True。如果每次刷新时列宽不自动调整，则为 False。默认值是 True。Boolean 类型，可读写。
AdjustColumnWidth	如果每次刷新指定 XML 映射时，列宽都会自动调整为最适合的宽度，则为 True。如果每次刷新时列宽不自动调整，则为 False。默认值是 True。Boolean 类型，可读写。
Adjustments	返回一个 Adjustments 对象，它包括指定形状的所有调整操作的调整值。应用于任何代表自选图形、艺术字或连接符的 Shape 对象。 语法 表达式.Adjustments 表达式   一个代表 Shape 对象的变量。
ADOConnection	如果将数据透视表缓存连接到 OLE DB 数据源，则返回一个 ADO Connection 对象。ADOConnection 属性表明 Microsoft Excel 与数据提供程序相连，允许用户在 Excel 正在使用的同一会话的上下文内编写代码，Excel 将该会话与 ADO（关系源）或 ADO MD（OLAP 源）一起使用。只读。
AdvancedFilter	基于给定的条件区域从数据清单中筛选或复制数据 本示例筛选基于条件区域“Criteria”的数据库区域“Database”。 Range("Database").AdvancedFilter _     Action:=xlFilterInPlace, _     CriteriaRange:=Range("Criteria")
AfterRefresh	当完成或者取消一个查询时，发生此事件。
AfterXmlExport	Microsoft Excel 将指定的工作簿中的数据保存或导出到 XML 数据文件之后，发生此事件。 expression.AfterXmlExport(Map, Url, Result) expression必需。该表达式返回一个 Workbook 对象。
AfterXmlImport	在刷新现有的 XML 数据连接或将新的 XML 数据导入到指定的 Microsoft Excel 工作簿之后，发生此事件。 expression.AfterXmlImport(Map, IsRefresh, Result) expression    必需。该表达式返回一个 Workbook 对象。
AlertBeforeOverwriting	进行拖放编辑操作过程中，如果 Microsoft Excel 在覆盖非空单元格之前先显示一条信息则为 True 本示例设置 Microsoft Excel 进行拖放编辑操作过程中，在改写非空单元格之前先显示警告。 Application.AlertBeforeOverwriting = True
AlertStyle	返回有效性检验警告样式。XlDVAlertStyle 类型，只读。
AlignMarginsHeaderFooter	如果 Excel 以页面设置选项中设置的边距对齐页眉和页脚，则返回 True。可读/写 Boolean 类型。
Alignment	返回或设置一个 Long 值，它代表指定的拼音文本或刻度线标签的对齐方式。
Alignment	返回或设置一个 MsoTextEffectAlignment 值，它代表艺术字的对齐方式。
AllItemsVisible	AllItemsVisible 属性检查是否对 PivotField 或 CubeField 应用手动筛选。只读 Boolean 类型。
AllItemsVisible	用于检索指示是否对透视字段应用任何手动筛选的 Boolean 值。只读。
AllowDeletingColumns	如果允许删除受保护工作表上的列，则返回 True。Boolean 类型，只读。
AllowDeletingRows	如果允许删除受保护工作表上的行，则返回 True。Boolean 类型，只读。
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
AllowEdit	返回或设置一个 Boolean 值，它指明是否允许用户访问受保护工作表的指定区域。
AllowEditRanges	返回 AllowEditRange 对象。
AllowFiltering	如果允许用户使用工作表受保护之前设置的“自动筛选”，则返回 True。Boolean 类型，只读。
AllowFormattingCells	如果允许对受保护的工作表上的单元格进行格式设置，则返回 True。Boolean 类型，只读。
AllowFormattingColumns	如果允许对受保护的工作表上的列进行格式设置，则返回 True。Boolean 类型，只读。
AllowFormattingRows	如果允许对受保护的工作表上的行进行格式设置，则返回 True。Boolean 类型，只读。
AllowInsertingColumns	如果允许在受保护的工作表上插入列，则返回 True。Boolean 类型，只读。
AllowInsertingHyperlinks	如果允许在受保护的工作表上插入超链接，则返回 True。Boolean 类型，只读。
AllowInsertingRows	如果允许用户在受保护的工作表上插入行，则返回 True。Boolean 类型，只读。
AllowMultipleFilters	设置或检索一个值，该值指示是否可同时将多个筛选应用于一个透视字段。可读写 Boolean。
AllowPNG	如果以网页保存文档时，允许将 PNG（可移植网络图形）作为图像格式使用，则为 True。如果不允许将 PNG 作为输出格式使用，则为 False。默认值是 False。Boolean 类型，可读写。
AllowSorting	如果允许在受保护的工作表上使用排序选项，则返回 True。Boolean 类型，只读。
AllowUsingPivotTables	如果允许用户在受保护的工作表上处理数据透视表，则返回 True。Boolean 类型，只读。
AlternativeText	返回或设置一个当 Shape 对象保存为网页时，该对象的描述性（可选）文本字符串。String 型，可读写。 语法 表达式.AlternativeText 表达式   一个代表 Shape 对象的变量。
AltStartupPath	返回或者设置替换启动文件夹的名称 本示例设置替换启动文件夹。 Application.AltStartupPath = "C:\EXCEL\MACROS"
AlwaysSaveInDefaultEncoding	如果在保存网页或纯文本文档时将使用默认编码，而该默认编码与文件打开时的初始编码是互相独立的，则该属性值为 True。如果使用文件的初始编码，则该属性值为 False。默认值为 False。Boolean 类型，可读写。
AmorDegrc	返回每个结算期的折旧值。此函数为法国会计系统提供。
AmorLinc	返回每个结算期的折旧值。此函数为法国会计系统提供。
And	如果其所有参数都为 TRUE，则返回 TRUE；如果一个或多个参数为 FALSE，则返回 FALSE。
Animation	获取或设置“Office 助手”的动画效果。可读/写。
AnswerWizard	返回 Microsoft Excel 的 AnswerWizard 对象 本示例重置 Answer Wizard 文件列表。 Application.AnswerWizard.ResetFileList
AppActivate	激活一应用程序窗口。 语法 AppActivate title[, wait] title 必需的。字符串表达式，所要激活的应用程序窗口的标题。可以使用 Shell 函数返回的任务识别码来替换 title，以激活应用程序。 wait 可选的。Boolean 值，说明在激活另一个应用程序之前调用的应用程序是否有焦点。如果为 False（缺省），那么，即使调用的应用程序没有焦点，也直接激活指定的应用程序。如果为 True，则调用的应用程序会等到有焦点后，才激活指定的应用程序。
AppendOnImport	如果希望在导入新数据或刷新现有连接时将新行附加到绑定在指定架构映射的 XML 列表中，则设该属性值 True。如果希望在导入新数据或刷新现有连接时覆盖绑定到指定架构映射的单元格内容，则该属性值为 False。默认值为 False。Boolean 类型，可读写。
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
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
Application	如果不使用对象识别符，则该属性返回一个代表 Microsoft Excel 应用程序的 Application 对象。如果使用对象识别符，则该属性返回一个代表指定对象的创建程序的 Application 对象。可对一个 OLE 自动化对象使用该属性来返回该对象的应用程序。只读。 语法 表达式.Application 表达式   一个代表 WorksheetFunction 对象的变量。
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
Application	如果不使用对象识别符，则该属性返回一个 Application 对象，该对象表示 Microsoft Excel 应用程序。如果使用对象识别符，则该属性返回一个代表指定对象（可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序）创建者的 Application 对象。只读。
Application	获取一个 Application 对象，代表 Assistant 对象的容器应用程序（可以使用 Automation 对象的此属性返回该对象的容器应用程序）。只读。
Application	获取一个 Application 对象，代表 COMAddIns 对象的容器应用程序（可以使用 Automation 对象的此属性返回该对象的容器应用程序）。只读。
Application	获取一个 Application 对象，代表 COMAddIn 对象的容器应用程序（可以使用 Automation 对象的此属性返回该对象的容器应用程序）。只读。
Application	如果不使用对象识别符，则该属性返回一个 Application 对象，该对象表示 Microsoft Excel 应用程序。如果使用对象识别符，则该属性返回一个表示指定对象（可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序）创建者的 Application 对象。只读。
Application	获取一个 Application 对象，代表 LanguageSettings 对象的容器应用程序（可以使用 Automation 对象的此属性返回该对象的容器应用程序）。只读。
Application	返回一个 Application 对象 语法 表达式.Application 表达式   一个代表 Name 对象的变量
Application	如果不使用对象识别符，则该属性返回一个 Application 对象，该对象表示 Microsoft Excel 应用程序。如果使用对象识别符，则该属性返回一个表示指定对象（可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序）创建者的 Application 对象。只读。 语法 表达式.Application 表达式   一个代表 Shapes 对象的变量。
Application	如果不使用对象识别符，则该属性返回一个 Application 对象，该对象表示 Microsoft Excel 应用程序。如果使用对象识别符，则该属性返回一个表示指定对象（可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序）创建者的 Application 对象。只读。 语法 表达式.Application 表达式   一个代表 Charts 对象的变量
Application	获取一个 Application 对象，代表 DocumentProperties 对象的容器应用程序（可以使用 Automation 对象的此属性返回该对象的容器应用程序）。只读。
Application	获取一个 Application 对象，代表 DocumentProperty 对象的容器应用程序（可以使用 Automation 对象的此属性返回该对象的容器应用程序）。只读。
Application	如果不使用对象识别符，则该属性返回一个 Application 对象，该对象表示 Microsoft Excel 应用程序。如果使用对象识别符，则该属性返回一个表示指定对象（可对一个 OLE 自动操作对象使用本属性来返回该对象的应用程序）创建者的 Application 对象。只读。 语法 表达式.Application 表达式   一个代表 Window 对象的变量。
AppliesTo	返回一个 Range 对象，指定格式规则将应用于的单元格区域。
Apply	应用通过 PickUp 方法复制的指定形状格式。 语法 表达式.Apply 表达式   一个代表 Shape 对象的变量。
ApplyCustomType	将标准图表类型或自定义图表类型应用于图表 本示例将“带数据标志的折线图”图表类型应用于第一张图表。 Charts(1).ApplyCustomType xlLineMarkers
ApplyDataLabels	将数据标签应用于图表中的某一数据点、某一数据系列或所有数据系列。 本示例对 Chart1 上的第一个数据系列应用分类标签。 Charts("Chart1").SeriesCollection(1). _     ApplyDataLabels Type:=xlDataLabelsShowLabel
ApplyDataLabels	向系列应用数据标签。
ApplyDataLabels	对数据点应用数据标签。
ApplyFilter	应用指定的 Autofilter 对象。
ApplyNames	将名称应用于指定区域中的单元格 本示例对整个工作表应用名称。 Cells.ApplyNames Names:=Array("Sales", "Profits")
ApplyOutlineStyles	对指定区域应用分级显示样式 下例对选定区域应用自动分级显示样式。该选定区域必须包括工作表上的整个分级显示区域。 Selection.ApplyOutlineStyles
ApplyPictToEnd	如果图片应用于系列中数据点或所有数据点之后，则为 True。Boolean 类型，可读写。
ApplyPictToFront	如果图片应用于系列中数据点或所有数据点之前，则为 True。Boolean 类型，可读写。
ApplyPictToSides	如果将图片应用于系列中某个数据点或所有数据点的旁边，则为 True。Boolean 类型，可读写。
ArabicModes	返回或设置阿拉伯语拼写检查的模式。XlArabicModes 类型，可读写。
ArbitraryXMLSupportAvailable	将文件保存为 XML 电子表格格式 expression.ArbitraryXMLSupportAvailable expression    必需。该表达式返回一个 Application 对象。
AreaGroups	在二维图表上返回一个对象，该对象既可代表单独面积图组，也可代表面积图组的集合。 本示例打开二维面积图图表组的垂直线。 Charts(1).AreaGroups(1).HasDropLines = True
Areas	返回一个 Areas 集合，此集合代表多重选定区域中的所有区域 本示例在用户选定多个区域并试图执行某一命令时显示提示信息。该示例必须在工作表上运行。 If Selection.Areas.Count > 1 Then     MsgBox "Cannot do this to a multi-area selection." End If
Arrange	对屏幕上的窗口进行排列 本示例平铺应用程序中的所有窗口。 Application.Windows.Arrange ArrangeStyle:=xlArrangeStyleTiled
Array	返回一个包含数组的 Variant。 语法 Array(arglist) 所需的 arglist 参数是一个用逗号隔开的值表，这些值用于给 Variant 所包含的数组的各元素赋值。如果不提供参数，则创建一个长度为 0 的数组。
Asc	返回一个 Integer，代表字符串中首字母的字符代码。 语法 Asc(string) 必要的 string 参数可以是任何有效的字符串表达式。如果 string 中没有包含任何字符，则会产生运行时错误。
Asc	对于双字节字符集 (DBCS) 语言，将全角（双字节）字符更改为半角（单字节）字符。
Asin	返回一个数字的反正弦值。反正弦值是一个角度，这个角度的正弦值为 Arg1。返回的角度采用弧度的形式，其范围从 -pi/2 到 pi/2。
Asinh	返回数字的反双曲正弦值。反双曲正弦值的双曲正弦值为 Arg1，因此 Asinh(Sinh(number)) 等于 Arg1。
AskToUpdateLinks	如果 Microsoft Excel 打开带有链接的文件时询问用户是否更新链接则为 True 本示例设置 Microsoft Excel 每当打开包含链接的文件时就询问用户是否更新链接。 Application.AskToUpdateLinks = True
Assert	有条件地在该方法出现的行上挂起执行。 语法 object.Assert booleanexpression Assert 方法的语法有如下的对象限定符和参数： 部分描述 object 必需的。总是 Debug 对象。 booleanexpression 必需的。一个值为 True 或者 False 的表达式。
Assistant	返回 Microsoft Excel 的 Assistant 对象 本示例使 Office 助手可见。 Assistant.Visible = True
AssistWithAlerts	当“Office 助手”可见时，如果“Office 助手”气球发送应用程序警告，则为 True。可读/写。
AssistWithHelp	如果在用户按“F1”键显示“帮助”时“Office 助手”出现，则为 True。可读/写。
AssistWithWizards	如果“Office 助手”提供带向导的联机帮助，则为 True。可读/写。
Atan2	返回指定的 x 和 y 坐标值的反正切值。反正切值是角度，是从 x 轴到通过原点 (0, 0) 和坐标点 (x_num, y_num) 的直线之间的夹角。该角度用弧度给出，介于 -pi 和 pi 之间（不包括 -pi）。
Atanh	返回数字的反双曲正切值。数字必须介于 -1 和 1 之间（不包括 -1 和 1）。
Atn	返回一个 Double，指定一个数的反正切值。 语法 Atn(number) 必要的 number 参数是一个 Double或任何有效的数值表达式。
Author	返回或设置批注的作者。 本示例将活动工作表中所有由 Jean Selva 所做的批注删除。 For Each c in ActiveSheet.Comments     If c.Author = "Jean Selva" Then c.Delete Next
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
AutoCorrect	返回一个 AutoCorrect 对象，该对象代表 Microsoft Excel AutoCorrect 属性 本示例在 AutoCorrect 替换文本数组中设置单词“Temp.”的替换文本为“Temperature”。 With Application.AutoCorrect     .AddReplacement "Temperature", "Temp." End With
AutoExpandListRange	表示列表（列表：包含相关数据的一系列行，或使用“创建列表”命令作为数据表指定给函数的一系列行。）的自动扩展是否被启用的 Boolean 值。在列表旁的空行或空列键入时，如果启用了自动扩展功能，则列表将扩展为包含此行或此列。Boolean 类型，可读写。 语法 表达式.AutoExpandListRange 表达式   一个代表 AutoCorrect 对象的变量。
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
AutoFillFormulasInLists	影响由自动填充列表创建的计算列的创建。可读/写 Boolean 类型。 版本信息  已添加版本：  Excel 2007 语法 表达式.AutoFillFormulasInLists 表达式   一个代表 AutoCorrect 对象的变量。
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
AutoFilter	使用“自动筛选”筛选出一个列表 本示例从工作表 Sheet1 上的 A1 单元格开始筛选出一个清单，该清单中只显示字段一为字符串“Otis”的数据项。字段一的下拉箭头将被隐藏。 Worksheets("Sheet1").Range("A1").AutoFilter _     field:=1, _     Criteria1:="Otis"     VisibleDropDown:=False
AutoFilterDateGrouping	如果用于日期分组的自动筛选器当前显示在指定的窗口中，则为 True。可读/写 Boolean 类型。 版本信息  已添加版本：  Excel 2007 语法 表达式.AutoFilterDateGrouping 表达式   一个代表 Window 对象的变量。
AutoFilterMode	如果当前在工作表上显示有“自动筛选”下拉箭头，则该值为 True 本示例显示工作表 Sheet1 中 AutoFilterMode 属性的当前状态。 If Worksheets("Sheet1").AutoFilterMode Then     isOn = "On" Else     isOn = "Off" End If MsgBox "AutoFilterMode is " & isOn
AutoFit	将区域中的列宽和行高调整为最适当的值 本示例调整工作表 Sheet1 中从 A 到 I 的列，以获得最适当的列宽。 Worksheets("Sheet1").Columns("A:I").AutoFit
AutoFormat	对指定区域自动套用预定义的格式 本示例将预定义格式套用到 Sheet1 中的单元格区域 A1:D8 上。 Worksheets("Sheet1").Range("A1:D8"). _     AutoFormat Format:=xlRangeAutoFormatClassic1
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
AutoLoad	如果打开包含指定 OLE 对象的工作簿时自动载入该 OLE 对象，则为 True。Boolean 类型，可读写。
AutoMargins	如果 Microsoft Excel 自动计算文本框边距，则该属性值为 True。Boolean 类型，可读写。
AutomaticStyles	如果分级显示使用自动样式，则该属性值为 True。Boolean 类型，可读写。
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
AutoOutline	自动为指定区域创建分级显示 本示例创建工作表 Sheet1 上单元格区域 A1:G37 的分级显示。该区域必须包含汇总行或汇总列。 Worksheets("Sheet1").Range("A1:G37").AutoOutline
AutoPercentEntry	如果在向格式设置为百分比的单元格中输入数值时，并不自动乘以 100，则其值为 True 本示例使得以后向格式为百分比的单元格中输入的数据都将自动乘以 100。 Application.AutoPercentEntry = False
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
AutoRepublish	在保存工作表时，Microsoft Excel 判断 PublishObjects 集合中的任意一个项目是否具有设置为 True 的 AutoRepublish 属性。如果有，则重新发布该项目。默认值为 False。Boolean 类型，可读写。
AutoScaleFont	如果对象中的文本在对象大小更改时更改字号，则为 True。默认值是 True。Variant 型，可读写。
AutoScaling	如果 Microsoft Excel 对三维图表进行缩放使其大小接近于等价的二维图表，则该值为 True 本示例自动对 Chart1 进行缩放。本示例应在三维图表上运行。 With Charts("Chart1")     .RightAngleAxes = True     .AutoScaling = True End With
AutoShapeType	返回或设置指定的 Shape 或 ShapeRange 对象的形状类型，该对象必须代表自选图形，而不能代表直线、任意多边形图形或连接符。MsoAutoShapeType 类型，可读写。 语法 表达式.AutoShapeType 表达式   一个代表 Shape 对象的变量。
AutoShow	显示指定数据透视表中行字段、页字段或列字段顶部或底部数据项的个数。
AutoShowCount	返回指定数据透视表字段中自动显示的首项号或末项号。Long 类型，只读。
AutoShowField	返回数据字段的名称，该字段用于判断在指定数据透视表字段中自动显示的是首项还是末项。String 类型，只读。
AutoShowRange	如果指定数据透视表字段中自动显示首项，则返回 xlTop；如果自动显示末项，则返回 xlBottom。Long 类型，只读。
AutoShowType	如果启用指定数据透视表字段的 AutoShow，则返回 xlAutomatic；如果禁用 AutoShow，则返回 xlManual。Long 类型，只读。
AutoSize	如果指定对象能自动调整大小，以适应其中所包含的文字，则该属性值为 True。Boolean 类型，可读写。
AutoSort	为数据透视表建立自动字段排序规则。
AutoSortCustomSubtotal	返回用于对指定数据透视表字段进行自动排序的自定义分类汇总的名称。只读。
AutoSortField	返回用于对指定数据透视表字段进行自动排序的数据字段的名称。String 类型，只读。
AutoSortOrder	返回用于对指定数据透视表字段进行自动排序的次序。可为 XlSortOrder 常量之一。Long 类型，只读。
AutoSortPivotLine	返回用于对指定数据透视表字段进行自动排序的 PivotLine 的名称。只读。
AutoText	如果对象会根据内容自动生成合适的文字，则为 True。可读/写 Boolean 类型。
AutoText	如果对象会根据内容自动生成合适的文字，则为 True。Boolean 类型，可读写。
AutoUpdate	如果源更改时 LinkFormat 对象自动进行更新，则此属性为 True。Boolean 类型，只读。
AutoUpdate	如果数据源改变时 OLE 对象将自动更新，则为 True。仅当对象是链接方式时有效（该对象的 OLEType 属性必须设为 xlOLELink）。Boolean 类型，只读。
AutoUpdateFrequency	以分钟为单位返回或设置对共享工作簿进行自动更新的时间间隔。 本示例使共享工作簿每五分钟自动更新一次。 ActiveWorkbook.AutoUpdateFrequency = 5
AutoUpdateSaveChanges	如果共享工作簿自动更新时，对其所做的更改将传送到其他用户，则该值为 True 本示例使共享工作簿自动更新时，将对其所做的更改传送到其他用户。 ActiveWorkbook.AutoUpdateSaveChanges = True
AveDev	返回多个数据点与其平均值的绝对偏差的平均值。AveDev 是对数据集中可变性的度量。
Average	返回参数的平均值（算术平均值）。
AverageIf	返回区域内满足给定条件的所有单元格的平均值（算术平均值）。
AverageIfs	返回满足多个条件的所有单元格的平均值（算术平均值）。
Axes	返回代表图表上单个坐标轴或坐标轴集合的某个对象。 本示例为 Chart1 的分类坐标轴添加坐标轴标志。 With Charts("Chart1").Axes(xlCategory)     .HasTitle = True     .AxisTitle.Text = "July Sales" End With 本示例将关闭 Chart1 中分类坐标轴的主要网格线。 Charts("Chart1").Axes(xlCategory).HasMajorGridlines = False
AxisBetweenCategories	如果数值轴与分类坐标轴相交于分类之间，则该属性值为 True。Boolean 类型，可读写。
AxisGroup	返回或设置一个 XlAxisGroup 值，它代表指定系列的组。
AxisGroup	返回或设置一个 XlAxisGroup 值，它代表所指定坐标轴的组。
AxisGroup	返回或设置一个 XlAxisGroup 值，它代表指定图表组的组。
AxisTitle	返回一个 AxisTitle 对象，该对象表示指定坐标轴的标题。只读。