Sheets 集合成员属性及使用方法.docVIP

Sheets 集合 Sheets 集合包括以下成员。 Visible 属性 Visible 属性可以显示或隐藏一个现有的表。可将Visibility 属性设置成 XlSheetVisibility枚举值（ XlSheetHidden 、XlSheetVeryHidden 、xlSheetVisible ） 中的一个值。使用XlSheetHidden 可以让用户通过Excel 界面隐藏表；使用XlSheetVeryHidden，则要求运行代码来取消隐藏表，例如： Workbooks(1).Sheets(1).Visible = xlSheetHidden Add 方法 Add 方法将一个新表添加到工作簿中的表集合中，并且可以接受四个可选参数，这些 参数可以指明表的位置、要添加的表数和表的类型（工作表、图表等）： Dim sh As Worksheet Set sh = ThisWorkbook.Sheets.Add() Copy 方法 Copy 方法创建一个表的副本，并且将表插入到指定的位置。 Delete 方法 Delete 方法删除一个指定的工作表，与选择“编辑 － 删除工作表”效果一致。 Worksheets(sheet1).Delete FillAcrossSheets 方法 FillAcrossSheets 方法将工作簿内一个表的范围中的数据复制到所有其他表。可以指定一个范围，以及是否要复制数据、进行格式化，或全部。 Move 方法 Move 方法和Copy 方法很类似，只不过最终您得到的是表的一个实例。 PrintOut 方法 PrintOut 方法允许打印选择的对象（这个方法适用于多个不同的对象）。PrintOut 可以指定许多可选的参数，包括：要打印的页数（起始页和终止页）、副本数量、打印前是否进行预览、要使用的打印机的名称、是否打印到一个文件、是否进行逐份打印以及您要打印到的文件名。下面的例子使用默认的打印机打印指定的表、只打印第一页、打印两份副本，并且在打印前预览文档： ThisWorkbook.Sheets(1).PrintOutFrom:=1, To:=1, Copies:=2, Preview:=True PrintPreview 方法 PrintPreview 方法允许您在打印预览窗口显示指定的对象，并且可以选择禁止更改页面布局： Select 方法 Select 方法选择指定的对象，并且改变用户的选择（可使焦点，而不需改变用户的选择。）您可以有选择地提供一个被当前选择取代的对象的引用。 下面的代码片段选择第一个工作表： ActiveWorkbook.Sheets(1).Select() 注：在这一部分中列出的许多方法也适用于其他的类。例如，PrintOut 方法是由以下类提 供的：Chart、Charts、Range、Sheets、 Window、Workbook、Worksheet 和Worksheets。 这些方法的具体使用是相同的，只不过是作用在不同的对象上而已。Select 方法几乎 适用于任何一种可选择的对象（并且这样的对象有很多）。 Range 对象 Range 对象是Excel 应用程序中最经常使用的对象；在操作Excel 内的任何区域之前，都需要将其表示为一个Range 对象，然后使用该Range 对象的方法和属性。基本上来说，一个Range 对象代表一个单元格、一行、一列、包含一个或者更多单元块（可以是连续的单元格，也可以式不连续的单元格）的选定单元格，甚至是多个工作表上的一组单元格。也可以简单的说，Range 就是操作Excel 内的具体内容（单元格）的对象。 1. 返回或获得 Range 对象 本部分将说明如何获得或返回 Range 对象。 Range 属性 可用 Range(arg)（其中 arg 为区域名称）来返回代表单个单元格或单元格区域的Range 对象。下例将单元格 A1 中的值赋给单元格 A5。 Worksheets(Sheet1).Range(A5).Value = _ Worksheets(Sheet1).Range(A1).Value 下例设置单元格区域 A1:H8 中每个单元格的公式，用随机数填充该区域。在没有对象识别符（句号左边的对象）的情况下，使用 Range 属性将返回活动表（ActiveSheet）上的一个区域。如果活动表不是工作表，则该方法无效。在没有明确的对象识别符的情况下，使用 Range 属性之前，可用 Activate 方法来激活工作表。 Worksheets(Sheet1).Activate Range(A1:H8).Formula = =Rand() 下例清除区域 Criteria 中的内容。 Worksheets(1).Range(