SortFields.Add2 方法 (Excel)
05/16/2019
本文内容
创建新的排序字段并返回 SortFields 对象,该对象可以选择使用定义的 SubField 对数据类型进行排序。
语法
表达式.Add2 (Key、 SortOn、 Order、 CustomOrder、 DataOption、 SubField)
参数
名称
必需/可选
数据类型
说明
Key
必需
Range
指定用于排序的键值。
SortOn
可选
Variant
要进行排序的字段。
Order
可选
Variant
指定排序次序。
CustomOrder
可选
Variant
指定是否应使用自定义排序次序。
DataOption
可选
Variant
指定数据选项。
SubField
可选
Variant
指定要针对市场排序的字段数据类型 (如 Population for Geography 或 Volume for 股票) 。
返回值
SortField
备注
此 API 包括对从数据类型(如地理位置或股票)中对 SubField 进行排序的支持。 如果不需要按
与公式中不同,SubFields 不需要括号来包含空格。
示例
本示例根据"地理"数据类型按"子字段填充"按列 1 的升序对工作表 Sheet1 上的 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 支持和反馈,获取有关如何接收支持和提供反馈的指南。