我们可以根据一列对Excel工作表进行sorting吗？

我有一个Excel工作表，并希望所有的值按字母顺序sorting。 举个例子，假设我有：

Col 1 | Col 2 ------+------- z | 26 ------+------- a | 1 ------+------- 

我想拥有

 Col 1 | Col 2 ------+------- a | 1 ------+------- z | 26 ------+------- 

并不是

 Col 1 | Col 2 ------+------- a | 26 ------+------- z | 1 ------+------- 

我知道我可以使用第一列进行sorting

 Target.EntireColumn.Sort Key1:=Target, Order1:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom 

但是，像这样sorting第一列会产生我不想要的结果。

任何人有任何想法？

Answer 1

  Columns("D:D").Select ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Clear ActiveWorkbook.Worksheets("Sheet1").Sort.SortFields.Add Key:=Range("D1"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("Sheet1").Sort .SetRange Range("A1:D6") .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With