此ABAP代码有效,但只能运行一次。我使用不同的参数运行此代码,但结果数据不会更改。我该如何解决?
Sub sort()
Dim myRange As Range
Dim i As Long
i = 200
With Sheets("Final")
Set myRange = .Range("A2", "S" & i)
myRange.sort Key1:=.Range("C2"), order1:=xlAscending, _
Header:=xlYes, Orientation:=xlSortColumns
End With
End Sub
答案 0 :(得分:1)
REFRESH S_DATE.之前
添加
APPEND S_DATE.您现在只是附加您所做的每一个选择。