
VB2005環境にてFlexGridを使用しています。
ある列のセルの値が1になったら、その行の背景色を灰色にしたいと
思っているのですが、その方法についてご教授ください。
おそらくは値が変わった時に何かイベントを取得できると思うので、
その時に例えば左から2列めの該当セルが1にされたら、色を変える…
というような考え方で良いでしょうか?
ただ、それを実現するためのイベントが何か、また、行の値を
変える方法がわからず困っています。
(ROWプロパティでしょうか?)
申し訳ないのですが、サンプルコードを交えて教えていただけ
ないでしょうか?
よろしくお願いします。
No.1ベストアンサー
- 回答日時:
VB6の頃の FlexGridってことでしょうか?
セルのデータを変更しても それを検知できるイベントはありません
やるとすればEnterイベント(VB6風ならGotfocusイベント)やLeaveCellイベントで
カレントセルの列番号、値を調べて条件に一致したならCellBackColorで色を変更といった具合でしょう
LeaveCellイベントでやる場合は 再帰を不可にする工夫が必要です
dim n as integer
' 元に戻すための色を設定
dim cl as Drawing.Color = axMSFlexGrid1.BackColor
if axMSFlexGrid1.Text = "1" then
' 希望の色に変更してください
cl = Color.Red
end if
' 左から2番目の列がカレントセルなら
' FixedColsを考慮したほうがいいでしょう
if axMSFlexGrid1.Col = 1 then
' 行の先頭から末尾までセルの背景色を変更
for n = axMSFlexGrid1.FixedCols to axMSFlexGrid1.Cols-1
axMSFlexGrid1.CellBackColor = cl
next
' 元選択されていた列に戻す
axMSFlexGrid1.Col = 1
end if
といった具合でしょう ...
行番号は Rowプロパティで取得できますよ
詳しいVerを書き忘れていました。
Flex Grid For.NET 3.0Jです。
しかし、redfox63さんの提示してくれたコードを参考に、
目的の動作を実現することができました。
ありがとうございました。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
Flexgridで選択行の列の値を取得したい
Visual Basic(VBA)
-
FlexGridの選択されたセル内の文字色を変える方法
C言語・C++・C#
-
FlexGridで文字色を変更。
Visual Basic(VBA)
-
-
4
FORMが開いているかどうかの確認方法
Visual Basic(VBA)
-
5
FlexGridの一部のみ表示を更新したいのです。
Visual Basic(VBA)
-
6
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
7
FlexGridで複数選択したセル、行、列を取得
Visual Basic(VBA)
-
8
「指定されたキャストは有効ではありません。」とエラーが出てしまいます。
Microsoft ASP
-
9
VB.NETでコンボボックスの1行目を空白にしたい
Visual Basic(VBA)
-
10
MSFlexGridのデータ表示位置の設定
Visual Basic(VBA)
-
11
CloseとDisposeの違い
Visual Basic(VBA)
-
12
チェックボックスを操作できないようにしたいです VB.NET
Visual Basic(VBA)
-
13
タブキー押下時のイベントをひろいたい。
Visual Basic(VBA)
-
14
VB.NET2005 TextBox 高さ(Height) 変更
Visual Basic(VBA)
-
15
DateTimePickerでに年月までしか選択できないようにしたいです。
Visual Basic(VBA)
-
16
配列の重複する値とその個数を取得したい
Visual Basic(VBA)
-
17
vb6のVSFlexGridで選択行、列の値を取得し構造体に入れたい
Visual Basic(VBA)
-
18
VB.net
Visual Basic(VBA)
-
19
クリスタルレポート(8.5)の書式設定
Visual Basic(VBA)
-
20
VB6.0 でメニューを作りたいんですが・・・
Visual Basic(VBA)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
i=cells(Rows.Count, 1)とi=cel...
-
Excelで指定した日付から過去の...
-
【Excel VBA】指定行以降をクリ...
-
任意フォルダから画像をすべて...
-
EXCELのVBA-フィルタ抽出後の...
-
特定のセルが空白だったら、そ...
-
ExcelVBAを使って、値...
-
【Excel】指定したセルの名前で...
-
VBAコマンドボタンを押すたびに...
-
Excel VBA、 別ブックの最終行...
-
vb.netによるEXCEL値取得
-
VBAで自動集計(特定セルコピー...
-
VBからEXCELのセルの値を取得す...
-
VBA実行後に元のセルに戻りたい
-
Excel VBAで セル内の値を1づ...
-
エクセルvbaで、別シートの最下...
-
Excel2003 複数セル1列の入力済...
-
screenupdatingが機能しなくて...
-
【VBA】指定したセルと同じ値で...
-
EXCELで変数をペーストしたい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
ExcelVBAを使って、値...
-
Excelで指定した日付から過去の...
-
エクセルvbaで、別シートの最下...
-
i=cells(Rows.Count, 1)とi=cel...
-
特定のセルが空白だったら、そ...
-
Excelのプルダウンで2列分の情...
-
【Excel VBA】指定行以降をクリ...
-
任意フォルダから画像をすべて...
-
VBAでセルをクリックする回...
-
”戻り値”が変化したときに、マ...
-
VBA実行後に元のセルに戻りたい
-
Excel vbaで特定の文字以外が入...
-
【VBA】シート上の複数のチェッ...
-
Excel VBA マクロ ある列の最終...
-
Excel VBAで、 ヘッダーへのセ...
-
DataGridViewの各セル幅を自由...
-
VBからEXCELのセルの値を取得す...
-
EXCELのVBA-フィルタ抽出後の...
-
VBAでセル同士を比較して色付け
-
Application.Matchで特定行の検索
おすすめ情報