| 投稿日 | ： 2004/01/29(Thu) 00:50 |
| 投稿者 | ： 寝タロ |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： MSFlexGridの一つの固定セルを赤文字にしたいんですが… |
色々、見ていて勉強させて頂きました。
今、似た様な問題に当たっているのですが、
クリックする度に前回選択した行の文字色を
消して又、選びなおしたいのですが、初回はうまく動くのですが
2回目以降がクリックする度に赤の行が増えるだけで
うまくいきません。
出来れば、前回選択行を別に記憶せず
全体に対してカラー変更したいのですが、
よろしくお願いします。
Private Sub Grid2_Click()
Grid2.ForeColor = vbWhite
With Grid2
.Col = 1
.Row = Grid2.Row
.ColSel = 11
.RowSel = Grid2.Row
.CellForeColor = vbRed
End With
End Sub