VBA Excel 按特定列排序范围

使用VBA Excel按特定列排序范围是一种非常常见的操作，它可以帮助我们快速整理和分析大量的数据。在本文中，我们将介绍如何使用VBA Excel来实现按特定列排序范围的功能，并提供一个实际案例代码供参考。

Sub SortByGrade()
    Dim ws As Worksheet
    Dim rng As Range
    
    ' 设置工作表和排序范围
    Set ws = ThisWorkbook.Worksheets("Sheet1")
    Set rng = ws.Range("A1:C10")
    
    ' 对排序范围进行排序
    With rng
        .Sort Key1:=.Columns(3), Order1:=xlDescending, Header:=xlYes
    End With
    
    ' 将排序结果输出到新工作表
    rng.Copy Destination:=ThisWorkbook.Worksheets("Sheet2").Range("A1")
    
    ' 清空剪贴板
    Application.CutCopyMode = False
End Sub