SortFields.Add2 方法 (Excel)

创建一个新的排序字段并返回一个 SortFields 对象,该对象可以选择使用定义的 SubField 对数据类型进行排序。

语法

表达式Add2 (SortOnOrderCustomOrderDataOptionSubField)

表达 一个代表 SortFields 对象的变量。

参数

名称 必需/可选 数据类型 说明
Key 必需 区域 指定用于排序的键值。
SortOn 可选 Variant 要进行排序的字段。
Order 可选 Variant 指定排序次序。
CustomOrder 可选 Variant 指定是否应使用自定义排序次序。
DataOption 可选 Variant 指定数据选项。
SubField 可选 Variant 指定要为数据类型排序的字段 (,例如“人口”for Geography 或 Volume for Stocks) 。

返回值

SortField

备注

此 API 支持从数据类型(例如 Geography 或 Stocks)中对 SubField 进行排序。 如果不需要按数据类型排序,也可以使用 Add 方法。

与公式中不同,SubFields 不需要括号来包含空格。

示例

此示例根据“地域”数据类型的 SubField Population 按 Column1 对表(Sheet1 上的 Table1)按升序排序。

先调用 Clear 方法,以确保清除上一个排序,以便可以应用新排序。

调用 Sort 对象以将添加的排序应用于 Table1。

ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort.SortFields.Add2 _
 Key:=Range("Table1[[#All],[Column1]]"), _
 SortOn:=xlSortOnValues, _
 Order:=xlAscending, _
 DataOption:=xlSortNormal, _
 SubField:="Population"
With ActiveWorkbook.Worksheets("Sheet1").ListObjects("Table1").Sort
 .Header = xlYes
 .MatchCase = False
 .Orientation = xlTopToBottom
 .SortMethod = xlPinYin
 .Apply
End With

支持和反馈

有关于 Office VBA 或本文档的疑问或反馈? 请参阅 Office VBA 支持和反馈,获取有关如何接收支持和提供反馈的指南。