2

Excel 2007 用に作成した xla アドインを Excel 2003 で動作するように調整しようとしています。ほとんどの問題はソートされていますが、シート内のフィールドをソートする方法が見つかりません。作成日順に並べ替える必要があるデータ行があります (その値は列 H にあります)。私が使用していたExcel 2007コードは次のとおりです。

        '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 で動作させるのを手伝ってくれる人はいますか?

4

1 に答える 1

3

最良の方法は、すべてのバージョンで機能するように、コードを下位バージョンで記述することです。

すべてのバージョンで機能するソートにこのコードを使用します。

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-19T14:59:32.133 に答える