ACCESS2000の帳票フォームでカーソルのあるレコードの他のフィールドの書式変更のモジュール

ACCESS2000の帳票フォームで、一番左のフィールドが得意先名、
間にいくつかのフィールドがあり、一番右のフィールドが金額を入金フィールドとして、
入金フィールドにカーソルがある場合、今どの得意先にいるか分かるように、今いるレコードの得意先フィールドの色を変えたいと思ってます。
この場合のモジュールの書き方を教えて頂けますでしょうか？
条件付書式設定でも無理なので、今はレコードセレクタを使ってます。
でもフィールドが多いため、右のほうに行けばどのレコードにいるのか分からなくなってしまうのです。
宜しくお願いいたします。

No.4 ベストアンサー 回答者： CHRONOS_0 回答日時： 2007/11/21 18:51

>"テキスト72"="SHIIRE_CD"

これじゃ文字列の比較式です
[テキスト72]=[SHIIRE_CD]

この回答へのお礼

有難うございます。
直したら上手く行きました。
感謝いたします。

お礼日時：2007/11/22 08:42

No.3 回答者： bonaron 回答日時： 2007/11/21 18:19

> "テキスト72"="SHIIRE_CD"と入れて背景の色を変えました。

[テキスト72]=[SHIIRE_CD]
にしてください。

この回答へのお礼

有難うございます。
直したら上手く行きました。
感謝いたします。

お礼日時：2007/11/22 08:42

No.2 回答者： CHRONOS_0 回答日時： 2007/11/21 16:22

>非連結のフィールドのイベントに「レコード移動」が無いのですが？

例にアップしたコードにも書かれているように
フォームのレコード移動時です

>非連結テキストと主キーは、各々そのフィールド名を入れればよいのですね？
非連結テキストはコントロール名ね

>詳細部分の色を変えたいフィールドに設定すればよいのですか？
そうです、全部のフィールドに設定することもできますよ

この回答へのお礼

続いての回答有難うございます。

フォームヘッダーに「テキスト72」と言う非連結のテキストボックスを置き
フォームプロパティの「レコード移動時」のプローシージャに
Private Sub Form_Current()
Me.テキスト72 = Me.SHIIRE_CD
End Sub
と書きました。（[SHIIRE_CD]が主キー）
詳細のSHIIRE_RNと言うフィールドの条件付書式設定で、条件を「式」にし
"テキスト72"="SHIIRE_CD"と入れて背景の色を変えました。
結果
カーソルをレコード間移動したとき、テキスト72ボックスには、選択したレコードのSHIIRE_CDが代入されてますが
SHIIRE_RNの背景色は変わりませんでした。
どこかおかしいでしょうか？
明日、もう一度自分なりに確認してみますが何かお気づきの点があれば教えてください。
お手数かけてすみません。

お礼日時：2007/11/21 17:29

No.1 回答者： CHRONOS_0 回答日時： 2007/11/21 15:17

条件付書式でできますよ

レコードに主キーフィールドはあるでしょうか?
あれば簡単です

フォームヘッダーに非連結のテキストボックスを置き
レコード移動イベントに下のコードを書きます

Private Sub Form_Current()
Me.非連結テキスト = Me.主キー
End Sub

条件付書式には
非連結テキスト=主キーフィールド

無ければも続けて質問してください

この回答へのお礼

早速の回答有難うございます。
ちなみに主キーはあります。
回答に関する質問ですが、
(1)フォームヘッダーに置いた非連結のフィールドのイベントに「レコード移動」が無いのですが？
(2)Private Sub Form_Current()
Me.非連結テキスト = Me.主キー
End Sub
の式の部分は、非連結テキストと主キーは、各々そのフィールド名を入れればよいのですね？
(3)条件付書式設定は、詳細部分の色を変えたいフィールドに設定すればよいのですか？

モジュールをあまり詳しくないもので、すみませんが宜しくお願いしまうS。

お礼日時：2007/11/21 15:58