应用于 Adjustments、CanvasShapes、DiagramNodeChildren、DiagramNodes 和 ShapeNodes 对象的 Count 属性。
返回指定集合中对象的数目。Integer 类型,只读。
expression.Count
expression 必需。该表达式返回上面的对象之一。
返回指定集合中对象的数目。Long 类型,只读。
expression.Count
expression 必需。该表达式返回“应用于”列表中的对象之一。
本示例显示 Sheet1 上选定区域中的列数。本示例还将检测选定区域中是否包含多重选定区域,如果包含,则对多重选定区域中每一子区域进行循环。
Worksheets("Sheet1").Activate
areaCount = Selection.Areas.Count
If areaCount <= 1 Then
MsgBox "The selection contains " & _
Selection.Columns.Count & " columns."
Else
For i = 1 To areaCount
MsgBox "Area " & i & " of the selection contains " & _
Selection.Areas(i).Columns.Count & " columns."
Next i
End If
本示例将 A1 单元格的最后一个字符设为上标字符。
n = Worksheets("Sheet1").Range("A1").Characters.Count
Worksheets("Sheet1").Range("A1").Characters(n, 1) _
.Font.Superscript = True