SortFields.Add2 方法 (Excel)

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

语法

表达式。Add2 (键、 SortOn、 Order、 CustomOrder、 DataOption、 SubField)

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

参数

名称	必需/可选	数据类型	说明
Key	必需	区域	指定用于排序的键值。
SortOn	可选	Variant	一个 XlSortOn 值，该值指定用于排序的单元格的哪个属性。
Order	可选	Variant	指定排序顺序的 XlSortOrder 值。
CustomOrder	可选	Variant	指定是否应使用自定义排序次序。
DataOption	可选	Variant	一个 XlSortDataOption 值，该值指定如何对文本进行排序。
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 支持和反馈，获取有关如何接收支持和提供反馈的指南。