投稿日 | : 2007/01/30(Tue) 12:28 |
投稿者 | : かさのば |
Eメール | : |
URL | : |
タイトル | : Re^10: フレックスグリッド |
> ええと皆さんありがとうございます。
> おかげさまで幅の設定で隠すことはうまく行きました。
> 現在こんな感じでしています↓
> チョット考え中だったため返信が遅れてしまいました。
>
> 文字が入力されている場合は1づつ加算、されていない場合は
> 0.01づつ加算って設定が難しくて考えておりました。
> う〜む・・
>
>
> Dim x As Integer
> Dim y As Integer
> Dim z As Integer
>
> With grd_一覧
> For x = .FixedRows To .Rows - 1
>
> If Len(.TextMatrix(x, 0)) > 0 Then
> .TextMatrix(x, 2) = x
> Else
> .TextMatrix(x, 2) = x + 0.01
> End If
> Next
>
> End With
xって行カウントですよね?
行カウントをソート用列の値に入れてもダメですよ