| 投稿日 | ： 2003/12/17(Wed) 12:26 |
| 投稿者 | ： ak |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re^5: MSFlexGridの一つの固定セルを赤文字にしたいんですが… |
> はい。CellForeColor プロパティの方は、成功しました。
> しかし、ForeColorプロパティで、非固定セルの特定の一列だけ（１行目から最終行まで）を
> 赤文字にしたいのですが、先ほどのやり方ですと、全ての列の文字が赤くなってしまいました。
>
> なので、□□□■□□ このように■の文字だけを赤くできますか？
> □□□■□□
> □□□■□□
> □□□■□□
そういった場合はFillStyle、RowSel、ColSelの各プロパティを使用します。
FillStyleプロパティを1(flexFillRepeat)にする事によって選択した範囲に
変更内容が反映されるようになります。
あとはRow、Col、RowSel、ColSelプロパティを使用して範囲を指定してから
文字色を変更すれば良い訳です。
サンプルを記述しておきます。
Dim iTmp As Integer
With MSFlexGrid1
iTmp = .FillStyle
.FillStyle = flexFillRepeat
.Col = 1
.Row = 1
.ColSel = 1
.RowSel = .Rows - 1
.CellForeColor = vbBlue
.FillStyle = iTmp
End With