
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で質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) 昨日、質問した件『VBA にて、条件付き書式で背景色を設定しているセルの範囲で、背景色付きのセルをカ 4 2022/04/07 14:39
- Visual Basic(VBA) マクロ実行時、自動で背景色を変えたい。 C列にあるチェックボックスをチェックするとB列に「TRUE」 4 2022/11/08 11:14
- Excel(エクセル) エクセルの条件付き書式について教えてください。 3 2022/04/23 10:00
- その他(Microsoft Office) エクセル 表の移動 2 2023/04/05 20:29
- Excel(エクセル) こんなことできますか?例えば、sheetに貼り付けた図形のタイトルを、セルA1の文字で表示する。 5 2022/04/22 15:25
- Visual Basic(VBA) VB DataGridViewについて 3 2022/06/08 17:20
- Visual Basic(VBA) Excel VBA マクロ ある列の最終行迄を参照し、別の列の空白セルに値を入力したいです 2 2023/03/05 02:44
- Visual Basic(VBA) エクセルのマクロについて教えてください マクロを実行して 作業フォルダの中にある PDFファイル名を 3 2023/07/01 15:16
- その他(Microsoft Office) スプレッドシートにて、条件付き書式で複数の単語に合致するセルを着色したいです。 2 2023/04/06 13:25
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/11 13:29
この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
CloseとDisposeの違い
Visual Basic(VBA)
-
7
VB.NETで DataRow()を利用して、値からコードを取得したい。
Visual Basic(VBA)
-
8
FlexGridで複数選択したセル、行、列を取得
Visual Basic(VBA)
-
9
「指定されたキャストは有効ではありません。」とエラーが出てしまいます。
Microsoft ASP
-
10
VB.NETでコンボボックスの1行目を空白にしたい
Visual Basic(VBA)
-
11
クリスタルレポート(8.5)の書式設定
Visual Basic(VBA)
-
12
VB.NET2005 TextBox 高さ(Height) 変更
Visual Basic(VBA)
-
13
MSFlexGridのデータ表示位置の設定
Visual Basic(VBA)
-
14
チェックボックスを操作できないようにしたいです VB.NET
Visual Basic(VBA)
-
15
vb6のVSFlexGridで選択行、列の値を取得し構造体に入れたい
Visual Basic(VBA)
-
16
VB.netでメソッドからコントロールを取得
Visual Basic(VBA)
-
17
配列の重複する値とその個数を取得したい
Visual Basic(VBA)
-
18
DATE型変数を初期化する方法
Visual Basic(VBA)
-
19
VB6.0 でメニューを作りたいんですが・・・
Visual Basic(VBA)
-
20
エクセルで折り返しと縮小の同時設定は無理?
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
エクセルvbaで、別シートの最下...
-
Excelで指定した日付から過去の...
-
ExcelVBAを使って、値...
-
セルに貼り付けた画像の上から...
-
特定のセルが空白だったら、そ...
-
VBA初心者です。結合セルを保持...
-
エクセルvbaのワークシート関数...
-
最後のデータ行の任意のセルの...
-
【VBA】シート上の複数のチェッ...
-
【Excel VBA】指定行以降をクリ...
-
TODAY()で設定したセルの日付...
-
指定文字以外のカウント
-
【Excel】指定したセルの名前で...
-
エクセルvba:自己セルの情報取...
-
VBA実行後に元のセルに戻りたい
-
Excelに保存されているユーザー...
-
excelで置換をしたいんですが
-
”戻り値”が変化したときに、マ...
-
Excle VBA Findメソッドについて
-
Excel2003 複数セル1列の入力済...
マンスリーランキングこのカテゴリの人気マンスリー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で特定行の検索
おすすめ情報