行数 = Com获取行数(工作簿, 页签)
Com清除排序字段(工作簿, 0)
Com添加排序字段(工作簿, 1, 'C2', 1, 1)
工作域 = format('A2:G%d',[行数])
TRACE('工作域:' + 工作域)
Com排序(工作簿, 1, 工作域,2, False,1, 1)
Com保存工作簿(工作簿, 数据表)
excel排序
最新推荐文章于 2023-06-09 14:46:10 发布
行数 = Com获取行数(工作簿, 页签)
Com清除排序字段(工作簿, 0)
Com添加排序字段(工作簿, 1, 'C2', 1, 1)
工作域 = format('A2:G%d',[行数])
TRACE('工作域:' + 工作域)
Com排序(工作簿, 1, 工作域,2, False,1, 1)
Com保存工作簿(工作簿, 数据表)