我正在尝试使用第一列作为包含员工 ID 的排序标准对工作表中的数据进行排序。下面的代码是我尝试过的,它可以工作,但你可以看到它的范围有限(“A2:F7”)。现在我可以使用 excel 向下更改第一列选择,但我不知道如何在整个范围内执行此操作。shift + ctrl + end 或它的其他变体会起作用吗?
' Sort Data According to emp_id
'
ActiveWorkbook.Worksheets("Temp Calc").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Temp Calc").Sort.SortFields.Add Key:=Range("A2:A7" _
), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Temp Calc").Sort
.SetRange Range("A1:F7")
.Header = xlYes
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With