Accessにて、コントロールの編集可能、使用可能の設定

質問

Access2002を使用しています。
表形式で作成したフォームで、

Ａというチェックボックスに、チェックが入っている場合
　Ｂのコントロールは入力可能、
　Ｃのコントロールは入力不可
チェックが入っていない場合、
　Ｂのコントロールは入力不可、
　Ｃのコントロールは入力可能
というふうにしたいのですが、

Private Sub Ａ_AfterUpdate()
　　If Ａ = -1 Then
　　　　Ｂ.Locked = False
　　　　Ｂ.Enabled = True
　　　　Ｃ.Locked = False
　　　　Ｃ.Enabled = False
　　Else
　　　　Ｂ.Locked = False
　　　　Ｂ.Enabled = False
　　　　Ｃ.Locked = False
　　　　Ｃ.Enabled = True
　　End If
End Sub

上記のように設定すると、すべてのレコードに対しての設定になってしまいます。
１件ずつのレコードに対して、条件を設定するにはどのようにすればよいでしょうか？
よろしくお願いいたします。

回答No.3

snoopy64

＃１です。
すいません、表形式ですね！？
でしたらはずしてました。
できるのかもしれませんが、僕にはわかりません(>_<)
いい加減な回答をして申し訳ありません。
でも以前ここで、「現在のレコードの行だけ色を変える」というのを見た事がありますので、
行毎に設定を変えることはきっとできるのだと思います。
頑張ってくださいヽ(^。^)ノ

お礼

早速のご回答ありがとうございました。
勉強してみますね。

回答No.2

Gin_F

VBAではムリですね。
条件付書式で、有効・無効の設定をすれば大丈夫だと思います。

お礼

やはり、ＶＢＡでの設定は、無理ですか。。。
ありがとうございました。

回答No.1

snoopy64

LockedやEnabledの一つ一つについて検証していませんが、まずその前に前提として、AfterUpdateはAが手動で更新された場合のイベントなので（だと思う）、これはこれとして、レコードを移動したときにもこのsubを呼んだらいいと思います。
頑張ってくださいヽ(^。^)ノ