Excel 中未获得所需输出

Excel 中未获得所需输出
V      A      R      K
12     4      9      12
  1. 我需要从最大值到最小值查看这些值
  2. 例如 12,12,9,4
  3. 然后在单独的单元格中显示相应的成绩

答案1

从以下数据开始:

在此处输入图片描述

运行此宏:

Sub Zort()
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear
    ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("A2:D2"), _
        SortOn:=xlSortOnValues, Order:=xlDescending, DataOption:=xlSortNormal
    With ActiveWorkbook.Worksheets("Sheet1").Sort
        .SetRange Range("A1:D2")
        .Header = xlGuess
        .MatchCase = False
        .Orientation = xlLeftToRight
        .SortMethod = xlPinYin
        .Apply
    End With
End Sub

将产生以下结果:

在此处输入图片描述

答案2

如果您不想使用宏来进行排序,正如 Gary's Student 建议的那样,您也可以从排序对话框中这样做:

在此处输入图片描述

相关内容