按列中的值對列中的數據進行排序

我試圖按字母順序排列列中的值。以下代碼不起作用。我知道問題是.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

沒有理由，它幾乎與你的相同，從字面上... –

回答