按列中的值对列中的数据进行sorting

我想按字母顺序排列范围Range("G1:J" & LastrowProjectList)中的数据列H的值。 以下代码不起作用。 我知道问题是.Range("H") ，但我不知道如何解决这个问题。 我的数据没有标题。 数据从row 1开始。

 Sheets("VBA_Data").Range("G1:J" & LastrowProjectList).Sort Key1:=Sheets("VBA_Data").Range("H"), Order1:=xlAscending 

Answer 1

尝试

 Sheets("VBA_Data").Range("G1:J" & LastrowProjectList).Sort Key1:=Sheets("VBA_Data").Range("H1:H" & LastrowProjectList), Order1:=xlAscending 

.Range("H"), Order1:=xlAscending应该是.Range("H1:H" & LastrowProjectList), Order1:=xlAscending