Application Excel 方法属性
Application对象是Excel对象模型中最高层级的对象，代表Excel应用程序自身，也包含组成工作簿的许多部分，包括工作簿、工作表、单元格集合以及它们包含的数据。
Application对象包含：
应用程序设置和选项，许多选项与“选项”对话框中的选项相同。 返回顶级对象的方法，例如ActiveCell、ActiveSheet，等等。
本文使用VBA代码示例简要介绍了与Application对象相关的经常使用的对象、方法和属性，其中一些成员能够改变用户与Excel应用程序交互的方式，还能够改变应用程序的外观和式样。
熟悉Application对象能够让您扩展和调整Excel的功能，以满足自已的需求。 本文主要介绍的内容如下： 从Application对象中引用对象 Application对象相关的集合
? ? ? ?
AddIns集合
Columns集合和Rows集合 Dialogs集合 Sheets集合
Application对象相关的属性 ActiveCell属性 ActiveChart属性 ActiveSheet属性 ActiveWindow属性 ActiveWorkbook属性 RangeSelection属性 ScreenUpdating属性 Selection属性 StatusBar属性 ThisWorkbook属性 Application对象相关的方法 FindFile方法和Dialogs集合 GetOpenFilename方法 GetSaveAsFilename方法 InputBox方法 Run方法
Application对象相关的事件
? ? ? ? ? ? ? ? ? ?
? ? ? ? ?
? 激活Application事件监视 使用Application对象执行其它任务
删除工作表而显示提示信息（DisplayAlerts属性） 无须提示用户而保存工作表（DisplayAlerts属性） 使用SendKeys方法发送信息到记事本
安排宏在指定的时间和间隔运行（OnTime方法） Application对象的其它一些属性和方法 Caller属性 CutCopyMode属性 Evaluate方法 OnKey方法 ThisCell属性
WorksheetFunction属性 改变光标显示（Cursor属性）
获取或改变Excel窗口的状态或大小（WindowState属性） 获取系统信息
自动隐藏公式栏（DisplayFormulaBar属性） 将Excel全屏显示（DisplayFullScreen属性） 获取Excel启动文件夹的路径（StartupPath属性） 检测Excel的版本（Version属性） 打开最近使用过的文档（RecentFiles属性） 文件对话框操作（FileDialog属性） 改变Excel工作簿的名称（Caption属性）
调用Windows的计算器（ActivateMicrosoftApp方法） 暂时停止宏运行（Wait方法） 重新计算工作簿（Calculate方法） 控制函数重新计算（Volatile方法） 获取重叠区域（Intersect方法） 获取路径分隔符（PathSeparator属性） 快速移至指定位置（Goto方法） 关闭Excel（Quit方法） 从Application对象中引用对象
使用Application属性返回Application对象。在引用应用程序之后，要访问Application
? ? ? ?
? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ? ?
对象下面的对象，则依次下移对象模型层级。
例如，下面的代码设置第一个工作簿的第一个工作表中的第一个单元格的值为20： Application.Workbooks(1).Worksheets(1).Cells(1, 1) = 20
要引用该单元格，上述代码以Application对象开始，移至第一个工作簿，然后到第一
个工作表，最后到达单元格。
…… 此处隐藏2145字 ……
ActiveWindow属性返回Window对象，代表活动窗口（在顶部的窗口）。下面的示例显示活动窗口的名称（Caption属性）：
MsgBox 活动窗口的名称是
Caption属性返回活动窗口的名称，允许使用名称而不是索引号来更清楚地访问该窗口。 下面的示例选择并打印工作表，然后对第二个工作表重复这一过程： Sub PrintWorksheet()
Application.ScreenUpdating = False Sheets(
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True Sheets(
ActiveWindow.SelectedSheets.PrintOut Copies:=1, Collate:=True End Sub
在该示例中，您可能奇怪为什么将ScreenUpdating属性设置为False。当Excel执行一系列操作任务时，屏幕被更新并且被刷新许多次，这导致屏幕闪烁。设置ScreenUpdating属性为False消除这些闪烁。此外，因为计算机处理器无须为刷新屏幕而暂停，这能使大的应用程序运行得更快。