在另一个工作表中sorting列而不select该工作表

是否可以在另一个表中对列进行sorting而不select该表？ 问题是，当我运行这个代码，我想这张表被隐藏，我不希望它闪过来，当我需要sorting表。 这是我的代码…这个工作，但它显然select工作表，并显示其他工作表。 也许用'做积极表'的东西可以工作，你可以这样做，然后说'做积极的细胞'。 我不确定。 多谢你们。

Application.Worksheets("RawDataLines").Select Application.Worksheets("RawDataLines").Range("Q5").Select Application.Worksheets("RawDataLines").Range("A4:R1007").Sort Key1:=Range("Q5"), Order1:=xlAscending, Header:= _ xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal Application.Worksheets("RawDataLines").Range("A5").Select Application.Worksheets("RawDataLines").Range("A4:R1007").Sort Key1:=Range("A5"), Order1:=xlAscending, Header:= _ xlGuess, OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ DataOption1:=xlSortNormal 

Answer 1

这个：

 Application.Worksheets("RawDataLines").Select Application.Worksheets("RawDataLines").Range("Q5").Select Application.Worksheets("RawDataLines").Range("A4:R1007").Sort ... 

可能是这样的：

 With Application.Worksheets("RawDataLines") .Range("A4:R1007").Sort Key1:= .Range("A5")'... End With 

Answer 2

添加ScreenUpdating

 Application.ScreenUpdating = False #Your Code Application.ScreenUpdating = True 

只要确保在设置ScreenUpdating = True之前将select设置回到所需的表单