全部显示

返回集合中的对象

Item 属性返回集合中的单个对象。下例将变量 firstBook 设置为代表第一个工作簿的 Workbook 对象。

Set FirstBook = Workbooks.Item(1)

Item 属性是大多数集合的默认属性，因此通过省略 Item 关键字，可将相同的语句简化。

Set FirstBook = Workbooks(1)

有关特定集合的详细信息，请参阅该集合或该集合的 Item 属性的“帮助”主题。

命名对象

虽然通常可用 Item 属性指定一个整数值，但使用对象的名称可能更为方便。在将名称与 Item 属性配合使用前，必须先为对象命名。命名对象最常用的方法是设置对象的 Name 属性。下例在活动工作簿中创建了一个命名工作表，然后用名称引用该工作表。

ActiveWorkbook.Worksheets.Add.Name = "A New Sheet"
With Worksheets("A New Sheet")
    .Range("A5:A10").Formula = "=RAND()"
End With

预定义索引值

有些集合有预定义的索引值，可用于返回单个对象。每一个预定义索引值用一个常量表示。例如，可用 Borders 集合的 Item 属性指定 XlBordersIndex 常量，以返回单个边框。

下例将 Sheet1 中单元格区域 A1:G1 的底部边框设置为双线。

Worksheets("Sheet1").Range("A1:A1"). _
    Borders.Item(xlEdgeBottom).LineStyle = xlDouble