[已解决]EXCEL高手用VBA改定公式排序方法

vbyou127 · 发表于 2016-1-3 21:42

EXCEL高手用VBA改定公式排序方法

最佳答案

七彩屋

2016-1-4 14:45

Sub Macro1()
Range("Q10:R42").Copy Range("X10")
With ActiveWorkbook.Worksheets("12星座").Sort
.SortFields.Add Key:=Range("Y10")
.Apply
End With
End Sub

dsmch · 发表于 2016-1-4 10:47

手工排序，录制宏，OK

vbyou127 · 发表于 2016-1-4 13:20

dsmch 发表于 2016-1-4 10:47
手工排序，录制宏，OK

真的不懂，没有办法

七彩屋 · 发表于 2016-1-4 14:45

Sub Macro1()
Range("Q10:R42").Copy Range("X10")
With ActiveWorkbook.Worksheets("12星座").Sort
.SortFields.Add Key:=Range("Y10")
.Apply
End With
End Sub

		自动登录	找回密码
密码			注册