Accessテキストボックスの背景色の条件の書き方

条件付き書式で、
テキストボックス0が９：００以上であれば背景を赤くする
という設定をしています。

テキストボックス0が赤い表示になっており、
さらにテキストボックス1に゛無゛と入っていた場合、
「いいですか？」というメッセージボックスを出したいのですが、
色の指定の仕方がうまくいきません。

背景が赤くなっているとき、という条件はどのように書けばいいのでしょうか？

No.2 ベストアンサー 回答者： nda23 回答日時： 2009/07/21 16:30

条件が適用されたかどうかを直接知る方法はないようです。

なので、テキストボックスの中身が"９：００"以上かどうかを
調べれば良いのでは？
Private Sub テキスト1_AfterUpdate()
Dim 応答
If Me.テキスト1.Value = "無" Then
　　If Me.テキスト0.Value >= "9:00" Then
　　　　応答 = MsgBox("いいですか？", vbQuestion or vbYesNo)
　　　　・・・その後の処理
　　End If
End If
End Sub

この回答へのお礼

ありがとうございます。

実は条件は9：00以上だけではなく、条件付き書式で３つほど設定してあります。

メッセージボックスはそのどれかに該当する場合に出したいので、

条件付き書式が適用されてるかどうかで判断すれば、分かりやすいかな？
と思ったのですが、無理なのですね。

あきらめて、おとなしく一個ずつ書きます(-.-;

お礼日時：2009/07/22 14:27

No.1 回答者： nda23 回答日時： 2009/07/21 11:27

>背景を赤くするという設定をしています。

何で設定したのですか？条件付書式ですか？
>「いいですか？」というメッセージボックスを出したい
どのタイミング（イベント）で表示するのですか？
>色の指定の仕方がうまくいきません
どこの「色」の話をしているのですか？
>背景が赤くなっているとき、という条件はどのように
どこに記述する条件のことを言っているのでしょう？
プロシージャでの記述方法でしょうか？

この回答への補足

ほんとですね。
自分で読んでも支離滅裂です(-.-;)
携帯からのため、説明不足でスミマセン。

〉背景を赤くするという設定

一番最初に書いてあるとおり、条件付き書式です。

〉どのタイミングで。

テキストボックス１で゛無゛を入力した後です。
更新処理に記述すればよいのだとは思いますが…

〉どこに記述

プロシージャです。

条件付き書式で赤く表示させるのはうまくいっています。
うまくいっていないところは、テキストボックス0が赤く、さらにテキストボックス1に゛無゛をいれた場合、
メッセージがでるようにするのを、プロシージャで記述したいのですが、
その際の゛背景が赤い時゛という条件です。

補足日時：2009/07/21 14:59