按列中的值对列中的数据进行排序

我试图按字母顺序排列列中的值。以下代码不起作用。我知道问题是.Range("H")，但我不知道如何解决这个问题。我的数据没有标题。数据从row 1开始。按列中的值对列中的数据进行排序

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

2017-10-05 pwm2017

尝试

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

2017-10-05 09:53:15 Mrig

一瞬间更快;） –

@KresimirL。 - 可能是4或5秒;）。你可以保留你的答案。 – Mrig

没有理由，它几乎与你的相同，从字面上... –

回答