我想在一个单独的工作表内排序一个范围。 不过,我不断收到这样的信息:'1004':“排序参考无效。”
'1004': "The sort reference is not valid. Make sure it's within the data you want to sort, and the first Sort By box isn't the same or blank.
我已经检查的范围,它们都存在并正常工作。
的代码如下:提前
Dim EmpBRange As String
EmpBRange = Sheets("EmployeeData").Cells(Cells.Rows.Count, "B").End(xlUp).Row
Worksheets("EmployeeData").Range("K3:K" & EmpBRange).Sort Key1:=Range("K3:K" & EmpBRange), Order1:=xlAscending, Header:=xlGuess, _
OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _
DataOption1:=xlSortNormal
感谢
谢谢,这很好! – 2013-03-08 16:51:36
哇!你如何看待这些事情? Excel文档绝对没有任何有用的信息。 – DavidHyogo 2014-08-15 15:02:15
@DavidHyogo,试错。它的几年:-)。 – 2014-08-15 19:52:38