VBA实现Excel数据排序功能
前言
本节会介绍使用VBA如何实现Excel工作表中数据的排序功能。 本节会通过下表数据内容为例进行实操：
1. Sort 单列排序
语法：Sort key1,Order1
说明：
Key1：表示需要按照哪列进行排序
Order1：用来指定是升序xlAscending，还是降序xlDescending
Header:表示是否首行为表头，当等于是xlYes时，则不会对表头行参与到排序中，若为否xlNo，则也会参与排序
示例：
在sheet1中存放着学生的成绩单，先需要将该表数据按照语文成绩进行降序排序，完整的代码如些：
Sub Sort()
' 声明工作表变量
Dim ws As Worksheet
' 声明范围数据变量
Dim Rng As Range
Set ws = ThisWorkbook.Worksheets("Sheet1")
' 设置数据范围
Set Rng = ws.Range("A1:D10")
' 设置通过语文成绩进行升序排序
Rng.Sort Key1:="语文", Order1:=xlDescending, Header:=xlYes
End Sub
运行后截图
原文地址：https://blog.csdn.net/hotkoko/article/details/140309238
免责声明：本站文章内容转载自网络资源，如本站内容侵犯了原著者的合法权益，可联系本站删除。更多内容请关注自学内容网（zxcms.com）！