Accessのチェックボックス

質問

こんにちは。AccessのVBAについてお教えください。

下記URLに質問内容の画像を配置しました。
http://kie.nu/tli

フォーム1にテキストボックス1というコントロールを配置しました。テキストボックス1に名簿IDの数値を入力して、ボタン１をクリックします。

もしチェックボックス1に既にチェックが入っていたらメッセージ「チェックが既に入っています。」といったメッセージを表示したいと思います。

そこで、ボタンを押した時に、

If フォーム1!サブフォーム1!チェックボックス1.Value = -1 Then
msgbox "チェックが既に入っています。"
end if

とやりましたが、うまく動きません。どうやれば、うまく動くようになりますかご教授頂けませんでしょうか。よろしくお願いいたします。

回答No.1

nag0720 · ベストアンサー

If Me!サブフォーム1!チェックボックス1.Value = -1 Then

ではどうですか。

お礼

頂きましたように変更したらできました！勉強不足でした。ありがとうございます！！