全部显示组合指定的区域中的图形。将成组的图形作为单个 Shape 对象返回。
expression.Group
expression 必需。该表达式返回 ShapeRange 对象。
当 Range 对象代表数据透视表字段的数据区域中的单个单元格时，Group 方法在该字段中执行基于数字或日期的组合。
expression.Group(Start, End, By, Periods)
expression 必需。该表达式返回一个 Range 对象。
Start Variant 类型，可选。要组合的第一个值。如果省略或为 True，则使用字段中的第一个值。
End Variant 类型，可选。要组合的最后一个值。如果省略或为 True，则使用字段中的最后一个值。
By Variant 类型，可选。如果字段为数字，则该参数指定每个组合的大小。如果字段是日期，当 Periods 数组中的元素 4 为 True，而其他所有元素为 False 时，本参数指定每个组合中的天数。其他情况下，忽略本参数。如果参数被忽略，Microsoft Excel 将自动选择一个默认的组合大小。
Periods Variant 类型，可选。布尔值数组，指定组合的期限，如下表所示。
| 数组元素 | 句号 |
|---|---|
| 1 | 秒 |
| 2 | 分 |
| 3 | 小时 |
| 4 | 日 |
| 5 | 月 |
| 6 | 季度 |
| 7 | 年 |
如果数组中的元素为 True，则为相应的时间创建组合；如果元素为 False，则不创建组合。当字段不是日期字段时，忽略该参数。
因为将组合图形作为单个图形对待，因此组合或取消图形组合时，将更改 Shapes 集合中的项目个数，并更改集合中受影响的图形之后的各项的索引号。
Range 对象必须是数据透视表字段的数据区域中的单个单元格。如果试图对多个单元格应用该方法，将会失败（不显示错误消息）。
本示例用 10 天期限组合名为“ORDER_DATE”的字段。
应用于 ShapeRange 对象的 Group 方法。Set pvtTable = Worksheets("Sheet1").Range("A3").PivotTable
Set groupRange = pvtTable.PivotFields("ORDER_DATE").DataRange
groupRange.Cells(1).Group by:=10, _
periods:=Array(False, False, False, _
True, False, False, False)