MSFlexGridのソート方法 (ID:101323)

名前

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

本文 ↓な感じでは駄目ですか？ Private Sub MSHFlexGrid1_Click() With MSHFlexGrid1 If .Col = 0 And .Row = 1 And .MouseRow = 0 Then If .TextMatrix(0, 0) = "項目名 ▲" Then .TextMatrix(0, 0) = "項目名 ▼" .Sort = flexSortGenericAscending Else .TextMatrix(0, 0) = "項目名 ▲" .Sort = flexSortGenericDescending End If End If '以下同様に必要な列だけ追加 End With End Sub