<続>FlexGridでソートのキーを複数設定できますか？ (ID:79710)

名前

ホームページ(ブログ、Twitterなど)のURL (省略可)

本文 StrComp一回で済ませたいのであれば、数値比較したい値に対して Format(文字列, "0000000") などを使って、 "12" → "0000012" "2" → "0000002" などとして、先頭にゼロを補って、桁を揃えてやれば良いかと思います。 あるいは、StrComp一回で済ませるのではなく、 '(1列目を)文字列比較 Cmp = StrComp(.TextMatrix(Row1, 1), .TextMatrix(Row2, 1)) If Cmp = 0 Then '(4列目を)整数で比較 Cmp = Sgn(CLng(.TextMatrix(Row1, 4)) - CLng(.TextMatrix(Row2, 4))) End If If Cmp = 0 Then '(2列目を)文字列で比較 Cmp = StrComp(.TextMatrix(Row1, 2), .TextMatrix(Row2, 2)) End If のように区切って処理して行けば、より複雑な並び替えにも対応できるでしょう。 (応用すれば、One, Two, Three, Four, ……みたいな並べ方もできますよね)