Accent属性适用于CalloutFormat对象描述如果在标注文字和标注线之间有垂直的强调线,本属性为True。Long类型,可读写。示例本示例向myDocument中添加椭圆和指向该椭圆的标注。该标注的文字没有边框,但用垂直的强调线分开标注文字和标注线。SetmyDocument=Worksheets(1)WithmyDocument.Shapes.AddShapemsoShapeOval,180,200,280,130With.AddCallout(msoCalloutTwo,420,170,170,40).TextFrame.Characters.Text=MyovalWith.Callout.Accent=True.Border=FalseEndWithEndWithEndWith--------------------------------------------------------------------------------AcceptAllChanges方法适用于Workbook对象描述接受指定的共享工作簿中的所有修改。句法expression.AcceptAllChangesexpression必选。该表达式返回Workbook对象。另见RejectAllChanges方法示例本示例接受活动工作簿中的所有修改。ActiveWorkbook.AcceptAllChanges--------------------------------------------------------------------------------AcceptLabelsInFormulas属性适用于Workbook对象描述如果可在工作表公式中使用标志,本属性为True。默认值为True。Boolean类型,可读写。另见FormulaLabel属性示例本示例对活动工作簿设置AcceptLabelsInFormulas属性,然后将第一张工作表中的单元格“B1:D1”设置为列标志。ActiveWorkbook.AcceptLabelsInFormulas=TrueWorksheets(1).Range(b1:d1).FormulaLabel=xlColumnLabels--------------------------------------------------------------------------------Activate事件适用于Chart对象,Workbook对象,Worksheet对象描述激活一个工作簿、工作表、图表或嵌入式图表时产生此事件。句法PrivateSubobject_Activate()ObjectChart,Workbook或者Worksheet。说明切换两个显示同一工作簿的窗口时,将产生WindowActivate事件,但不产生工作簿的Activate事件。新建窗口时不产生本事件。另见Deactivate事件,SheetActivate事件,SheetDeactivate事件,WindowActivate事件,WindowDeactivate事件,WorkbookActivate事件,WorkbookDeactivate事件。示例本示例当激活工作表时对A1:A10区域进行排序。PrivateSubWorksheet_Activate()Range(a1:a10).SortKey1:=Range(a1),Order:=xlAscEndingEndSub--------------------------------------------------------------------------------Activate方法适用于Chart对象,ChartObject对象,OLEFormat对象,OLEObject对象,Pane对象,Range对象,Window对象,Workbook对象,Worksheet对象描述激活对象,如下表所示。对象说明Chart,ChartObject使该图表成为活动图表。Worksheet使该工作表成为活动工作表,等同于单击工作表选项卡。OLEObject激活对象。Pane激活窗格。如果该窗格不在活动窗口,则该窗格所属的窗口也将激活。不能激活冻结的窗格。Range激活单个单元格,该单元格必须处于当前选定区域内。可用Select方法选定单元格区域。Window将窗口提到Z-顺序的最前面,这样不会引起可能附加在工作簿上的Auto_Activate或Auto_Deactivate宏的运行(可用RunAutoMacros方法运行这些宏)。Workbook活该工作簿的第一个窗口,这样不会引起可能附加在工作簿上的Auto_Activate或Auto_Deactivate宏的运行(可用RunAutoMacros方法运行这些宏)。句法expression.Activateexpression必选。该表达式返回“适用于”列表中的对象。另见RunAutoMacros方法,Select方法示例本示例激活工作表Sheet1。Worksheets(Sheet1).Activate本示例选定工作表“Sheet1”中的单元格区域“A1:C3”,并激活单元格“B2”。Worksheets(Sheet1).ActivateRange(A1:C3).SelectRange(B2).Activate本示例激活工作簿“Book4.xls”。如果工作簿“Book4.xls”有若干窗口,本示例激活第一个,即“Book4.xls:1”。Workbooks(BOOK4.XLS).Activate--------------------------------------------------------------------------------ActivateMicrosoftApp方法适用于Application对象描述激活一个Microsoft应用程序。如果该应用程序已经处于运行状态,则本方法激活的是正在运行的此应用程序。如果该应用程序不处于运行状态,本方法将启动该应用程序的新实例。句法expression.ActivateMicrosoftApp(index)expression必选。该表达式返回一个Application对象。IndexLong类型,必选。指定要激活的Microsoft应用程序,可为下列XlMSApplication常量之一:xlMicrosoftWord、xlMicrosoftPowerPoint、xlMicrosoftMail、xlMicrosoftAccess、xlMicrosoftFoxPro、xlMicrosoftProject或xlMicrosoftSchedulePlus。示例本示例启动并激活Word。Application.ActivateMicrosoftAppxlMicrosoftWord--------------------------------------------------------------------------------ActivateNext方法适用于Window对象描述激活指定窗口,并将其移到窗口z-次序的末尾。句法expression.ActivateNextexpression必选。该表达式返回一个Window对象。另见ActivatePrevious方法,DisplayNoteIndicator属性,Next属性示例本示例将活动窗口移到窗口z-次序的末尾。ActiveWindow.ActivateNext--------------------------------------------------------------------------------ActivatePrevious方法适用于Window对象描述激活指定窗口,然后激活窗口z-次序末尾的窗口。句法expression.ActivatePreviousexpression必选。该表达式返回一个Window对象。另见ActivateNext方法,DisplayNoteIndicator属性,Next属性示例本示例激活z-次序末尾的窗口。ActiveWindow.ActivatePrevious--------------------------------------------------------------------------------ActiveCell属性适用于Application对象,Window对象描述返回一个Range对象,该对象代表活动窗口的活动单元格(最上面的窗口),或指定窗口的活动单元格。如果该窗口显示的不是工作表,则该属性无效。只读。说明如果不指定对象识别符,本属性返回的是活动窗口中的活动单元格。注意区分活动单元格和选定区域。活动单元格是当前选定区域内的单个单元格。选定区域可能包含多个单元格,但只有一个是活动单元格。下列表达式都是返回活动单元格,并都是等价的。ActiveCellApplication.ActiveCellActiveWindow.ActiveCellApplication.ActiveWindow.ActiveCell示例本示例在消息框中显示活动单元格的值。由于活动表不是工作表而导致ActiveCell属性无效,因此本示例使用ActiveCell属性之前先激活Sheet1。Worksheets(Sheet1).ActivateMsgBoxActiveCell.Value本示例更改活动单元格的字体格式设置。Worksheets(Sheet1).ActivateWithActiveCell.Font.Bold=True.Italic=TrueEndWith--------------------------------------------------------------------------------ActiveChart属性适用于Application对象,Window对象,Workbook对象描述返回Chart对象,该对象代表活动图表(包括嵌入式图表或图表工作表)。当选定或激活嵌入式图表时,该嵌入式图表就成为活动的。如果当前没有活动的图表,本属性返回Nothing。只读。说明如果未指定对象识别符,本属性返回活动工作簿上的活动图表。示例本示例打开活动图表的图例。ActiveChart.HasLegend=True--------------------------------------------------------------------------------ActivePane属性适用于Window对象描述返回一个Pane对象,此对象代表指定窗口中的活动窗格。只读。说明此属性仅用于工作表和宏表。此属性返回Pane对象。必须使用Index属性得到活动窗格的索引。另见ActiveWindow属性示例本示例激活Book1.xls中当前窗口的下一个窗格。如果当前窗格处于被冻结状态则不能激活下一个窗格。本示例必须在除Book1.xls外的另一工作簿上运行。运行本示例之前,必须确保Book1.xls的活动工作表有两个或四个窗格。Workbooks(BOOK1.XLS).ActivateIfnotActiveWindow.FreezePanesThenWithActiveWindow14i=.ActivePane.IndexIfi=.Panes.CountThen.Panes(1).ActivateElse.Panes(i+1).ActivateEndIfEndWithEndIf--------------------------------------------------------------------------------ActivePrinter属性适用于Application对象描述返回或者设置活动打印机的名称。String类型,可读写。示例本