对于 Application 对象,返回代表活动工作簿中所有工作表的 Sheets 集合。对于 Workbook 对象,返回代表指定工作簿中所有工作表的 Sheets 集合。Sheets 对象,只读。
有关返回集合中单个成员的详细信息,请参阅返回集合中的对象。
在不用对象识别符的情况下,使用此属性等价于使用 ActiveWorkbook.Sheets
。
本示例新建一张工作表,然后在第一列中列出活动工作簿中的所有工作表的名称。
Set newSheet = Sheets.Add(Type:=xlWorksheet)
For i = 1 To Sheets.Count
newSheet.Cells(i, 1).Value = Sheets(i).Name
Next i