[リストへもどる]   [VBレスキュー(花ちゃん)]
一括表示

投稿時間:2006/12/27(Wed) 21:26
投稿者名:ラオウ
Eメール:
URL :
タイトル:
MSFlexGridでのソートを簡単操作で!!
MSFlexGridを使って以下のようにデータを表示しています

Rowsは15 Colsは5 FixedRowsは1 FixedColsは0 

FixedRowには左から名前 順位 タイム 年齢 性別というタイトルをつけています

その下にはそれぞれのデータを表示しています exまさお 3(位)2:34.12 10(歳)男

で FixedRowのそれぞれのタイトルのセルをクリックすると

そのタイトルの順にすべてのデータを昇順にソートし

もう一回クリックすると降順にソートできるようにしたいのですがどうすればいいのでしょうか


このサイトのMSFlexGridのソートの仕方を見たのですが このやり方が自分ではわからないので
ご教授いただければと思います よろしくお願いします

投稿時間:2006/12/27(Wed) 21:50
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re: MSFlexGridでのソートを簡単操作で!!
下記は何をしているのでしょうか?

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
            .Row = 1
        End If

投稿時間:2006/12/28(Thu) 01:08
投稿者名:ラオウ
Eメール:
URL :
タイトル:
Re^2: MSFlexGridでのソートを簡単操作で!!
花ちゃんさんのコードを参考に完成することができました

ありがとうございました 万歳

投稿時間:2006/12/31(Sun) 01:33
投稿者名:ラオウ
Eメール:
URL :
タイトル:
Re^3: MSFlexGridでのソートを簡単操作で!!
お世話になります

ソート時にひとつ問題があります

昇順でソートするときグリッドに空白があるとそれが一番上に来てしまいます

空白は一番下に持っていきたいのですがどうすればいいのでしょうか?

空白はデータによってあるときもあればないときもあり 2つ以上あるときもあります

過去ログでclipプロパティを使うことで回避できるとありましたがどのようにすればよいのかわかりません

簡単なサンプルコードを書いてもらえるとありがたいです よろしくお願いいたします

投稿時間:2006/12/31(Sun) 08:51
投稿者名:花ちゃん
Eメール:
URL :
タイトル:
Re^4: MSFlexGridでのソートを簡単操作で!!
> 空白は一番下に持っていきたいのですがどうすればいいのでしょうか?
> 簡単なサンプルコードを書いてもらえるとありがたいです よろしくお願いいたします

http://hanatyan.sakura.ne.jp/vbhlp/MSFlexNO5.htm

ご自分でどうぞ

投稿時間:2007/01/01(Mon) 11:07
投稿者名:ラオウ
Eメール:
URL :
タイトル:
Re^5: MSFlexGridでのソートを簡単操作で!!
返信ありがとうございます

うーん なかなかわからない

もう少しがんばってみます