將Excel 2007 VBA轉換爲Excel 2003

我正在嘗試改編我爲Excel 2007編寫的xla加載項，以便在Excel 2003中工作。我對大多數問題進行了排序，但我無法找到一種方法排序表中的字段。我有一些數據行需要按創建日期的順序進行排序（其值在H列中）。這裏是我使用的Excel 2007代碼：將Excel 2007 VBA轉換爲Excel 2003

 'sort issues into descending order 
     Sheets("In Progress").Sort.SortFields.Clear 
     Sheets("In Progress").Sort.SortFields.Add _ 
       Key:=Range("H:H"), _ 
       SortOn:=xlSortOnValues, _ 
       Order:=xlDescending, _ 
       DataOption:=xlSortNormal 
     With Sheets("In Progress").Sort 
      .SetRange Range("A2:M" & rowCount - 1) 
      .Header = xlNo 
      .MatchCase = False 
      .Orientation = xlTopToBottom 
      .SortMethod = xlPinYin 
      .Apply 
     End With

任何人都可以幫助我得到這與Excel 2003的工作嗎？

來源

2012-06-19 Liam Barrett

你會得到什麼錯誤？什麼不行？你是否試圖逐步刪除一些代碼行？ – JMax

最好的方法是在低版本中編寫代碼，以使其適用於所有版本。

我會使用此代碼進行排序，這將在所有版本中工作。

With Sheets("In Progress") 
    .Range("A2:M" & rowCount - 1).Sort Key1:=.Range("A2"), _ 
    Order1:=xlDescending, Header:=xlNo, _ 
    OrderCustom:=1, MatchCase:=False, Orientation:=xlTopToBottom, _ 
    DataOption1:=xlSortNormal 
End With

來源

2012-06-19 14:59:32

乾杯，這似乎已經做到了！非常感謝。 –

將Excel 2007 VBA轉換爲Excel 2003

回答

相關問題