是否可以使用VBA代码对范围内的范围进行排序？

Question

我知道如何按值对范围进行排序。我有这个代码

Sub calander4()
Range("currentmonth").Sort _
Key1:=Range("currentmonthrating"), Order1:=xlDescending
End Sub

此代码按列从最高到最低的列中排序。我最想要的是按照值从左到右对列进行排序。说第二个顶级单元格。我当然会命名和制作范围。有可能吗？

Answer 1

您需要指定 Orientation 参数。

Option Explicit

Sub calander5()
    With Range("currentmonth")
        .Sort Key1:=.Cells(2, 1), Order1:=xlAscending, _
              Orientation:=xlSortColumns, Header:=xlNo
    End With
End Sub

有关详情，请参阅Range.Sort Method (Excel)。