• ベストアンサー

アクセスのチェックボックス

教えて下さい。 フォーム上に「性別」のチェックボタンを作って、男か女かどちらかにチェックを入れて入力したいのです。 「男」にチェックが入ったら(当然ながら)「女」にはチェックが入れられないようにするにはどうすれば宜しいでしょうか?(その逆もありますね) どなたかよろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
  • ema_0222
  • ベストアンサー率34% (63/185)
回答No.3

フォームをデザインで開き、チェックボックスの名前を決めます。 例えば、性別の男は「CH01」女は「CH02」としたとします。 コードを表示させ、 Private Sub CH01_Click() If CH01 = -1 Then CH02 = 0 'CH01がクリックされたとき、CH01にチェックが入っていればCH02のチェックを消す End Sub Private Sub CH02_Click() If CH02 = -1 Then CH01 = 0 'CH02がクリックされたとき、CH02にチェックが入っていればCH01のチェックを消す End Sub このように記述します。(ここままコピーして貼り付けてもOKです) すると片方チェックされれば片方が消えるという動きをします。 チェックボックスが増えても同様の記述で対応できます。

jetstream
質問者

お礼

ありがとうございました! 大変参考になりました。

その他の回答 (2)

  • urovy
  • ベストアンサー率33% (7/21)
回答No.2

そのような場合はチェックボックスよりラジオボタンをオススメします。 簡単に制御できますよ。

jetstream
質問者

補足

早速ありがとうございます。 初心者なものですから、いろいろ勉強中です。 ラジオボタンについて、参考になるサイト等ありましたら教えて下さい。

  • selenity
  • ベストアンサー率41% (324/772)
回答No.1

「オプショングループ」をフォーム上に張りつけ、その中に「オプションボタン」アイテムを追加する事で出来ます。 どうしても「チェックボックス」がよければ、VBAを使ってON/OFFの排他制御をする事になると思います。

jetstream
質問者

補足

ありがとうございます。 排他制御の具体的記述方法などについて、参考になるサイトがあれば教えて下さい。

関連するQ&A

  • アクセス レポートで表示するには?

    アクセス初心者です。 社員情報のレポートを作成しています。フォームで「性別」という項目があり、オプションボタンで男or女をチェックをします。 テーブルにはテキスト型で「性別」に1or2で入力されています。 その数値をレポートで、1のときは「男」、2のときは「女」と表示するにはどうすればよいのでしょうか?

  • Accessのチェックボックス

    こんにちは。AccessのVBAについてお教えください。 下記URLに質問内容の画像を配置しました。 http://kie.nu/tli フォーム1にテキストボックス1というコントロールを配置しました。テキストボックス1に名簿IDの数値を入力して、ボタン1をクリックします。 もしチェックボックス1に既にチェックが入っていたらメッセージ「チェックが既に入っています。」といったメッセージを表示したいと思います。 そこで、ボタンを押した時に、 If フォーム1!サブフォーム1!チェックボックス1.Value = -1 Then msgbox "チェックが既に入っています。" end if とやりましたが、うまく動きません。どうやれば、うまく動くようになりますかご教授頂けませんでしょうか。よろしくお願いいたします。

  • チェックボックスのチェックした項目の名前を取得したいです。

    チェックボックスのチェックした項目の名前を取得したいです。 HTML+Javascript+CGIでアンケートフォームを作っています。 送信ボタンを押したときに確認画面を表示させたいのですが、チェックボックスの項目をどう扱って良いのかわかりません。 性別を選択するラジオボタンの値の取得(男をチェックしたか、女をチェックしたか)は sex = document.mailform.sex[0].checked ? document.mailform.sex[0].value : document.mailform.sex[1].value このように出来るとのことですが、チェックボックスはどうしたら良いのでしょうか? 好きな食べ物を聞くチェックボックスで、選択項目に ・リンゴ・バナナ・ミカン・イチゴ を用意し、チェックされた項目を 好きな食べ物:リンゴ イチゴ の用に出力したいと思っています。 よろしくお願いします。

  • accessのフォームのチェックボックスを動くようにしたいです。

    accessのフォームのチェックボックスを動くようにしたいです。 あるフォームは起動時、更新の許可を「いいえ」に設定しています。フォームの値をいじらせないようにしているためです。 編集可能釦をおしたときに、この更新許可を「はい」にしています。 起動時(起動後)に、あるチェックボックスだけ、動作するようにしたいのですが、なにか簡単な方法はありますでしょうか? チェックボックスが無理でしたら、他の操作ボックスでもよいです(西暦・和暦を指定しているだけのチェックボックスです) p.s. フォームには、テキストや、コンボなど沢山あるため、できれば更新「いいえ」はそのままにしたいです。

  • [Access97]フォーム上のボタン操作でチェックボックスにチェックが入るようにしたい

    Accessでテーブルを元にしていない単独のフォームを作っています。 クエリで抽出条件をパラメータで入力させるのと同様に、日付を入力してレポートをプレビュー表示させるためのフォームです。 集計表を作成するレポートの名前が入ったチェックボックスがフォームにあり、クリックひとつですべてのチェックボックスにチェックを入れるボタンを設置しています。 (画面図:例) (キャンセルなし集計ボタン)(キャンセルあり集計ボタン) □報告書集計 □キャンセルあり報告書集計 □記録集計  □キャンセルあり記録集計 (キャンセルボタン) (レポート出力ボタン) 上図の左のふたつにはデフォルトでチェックが入っています。 キャンセルあり集計ボタン ・クリックすると右の2つにもチェックが入る。 キャンセルなし集計ボタン ・クリックすると右の2つのチェックが取れる。 これら2つの処理はVBAで Me!報告書キャンセルチェック.Value = True 等としていますが、「プロパティクリック時でエラーが発生しました」となり、うんともすんとも動きません。 レポート出力ボタン ・クリックするとそのときにチェックが入っている集計レポートをプレビュー表示する。ただしキャンセルあり~にチェックがある場合はそのすぐ左の集計は出力しない。 これもVBAで If Me!報告書チェック.Value = True And Me!報告書キャンセルチェック.Value = True Then DoCmd.OpenReport "報告書集計表(キャンセルあり)" ElseIf Me!報告書チェック.Value = True Then DoCmd.OpenReport "報告書集計表" End If 等としてますが、やはりエラーが出ます。 VBが間違ってるのか、設定を変えてもそれをフォーム上に視覚的に反映させてないからか、それともソースとなるテーブルがないからでしょうか?

  • Accessでチェックボックスからの入力を受け付けない

    お世話になります。 Access2003を使い、フォームにチェックボックスを作りました。  チェックボックスの値をテーブルに反映させるために、「チェックボックス」-「プロパティ」-「コントロールソース」より、該当テーブルの列を指定しました。 フォームビューにて、チェックボックスをクリックすると「このフォームは読み取り専用です」と言われ、チェックボックスへの操作は拒否されてしまいます。  どのようにすれば、フォームのチェックボックスから入力した値が、テーブルに反映できるのでしょうか?  なお、該当テーブルの列はyes/no型に指定しています。 よろしくお願いします。

  • Accessテキストボックスの未入力チェック

    いつも参考にさせて頂いております。 Accessテキストボックスの未入力チェックで上手くいかず悩んでいます。過去の情報等調べましたが、わかりませんでした。 どなたか宜しくお願い致します。 フォーム1にテキストボックス1、ボタン1があります。 テキストボックスを何も入力せず、Enter等で移動する時にチェックをかけたいです。 もし、テキストボックスに何も入力がなかったら、メッセージを出し、フォーカスをテキストボックスに戻す。 何か入力があれば、ボタンにフォーカスが移動する。 If IsNull(Me.テキストボックス1) = "" Then msgbox "未入力です。" Me.テキストボックス1.SetFocus End If 宜しくお願い致します。

  • ACCESSのチェックボックスとコンボボックスの作り方

    1. テーブルを作って、そのテーブルからフォームを作るところまでいきました。フォームから入力する時に、いちいちタイプしなくていいようにチェックできるもの(例えば、男女からどちらか選ぶ)をつくりたいのですが、テーブルビューのルックアップから2つチェックボックスを作ることができません。やり方を教えてください。 2. コンボボックスを使って複数から選ぶようにすることはできたのですが、毎回マウスを使わないとできません。マウスを使わないでコンボボックスのアイテムを選ぶようにすることはできますか?

  • チェックボックス access2003

    既存のデータベースからaccessを使って検索を行っています 表示させるテーブルの中でひとつだけ 0と1どちらかが入力されているフィールドがあります それをフォームで表示する際にチェックボックスで表示させたいのですが どのようにすればよいのでしょうか? ご存知の方よろしくお願いいたします

  • マクロ フォームでのチェックボックスについて

    教えてください。 1)フォームでテキストボックス2つ、ボタンで新しい入力フォーム表示 2)入力フォームでチェックボックス6個、コンボボックス6個を作ります。 3)チェックボックスにチェック(1個のみ)したら、1)のフォームのテキストボックスにチェックされた、項目とコンボボックスで選択された内容が転記したい。 例)果物にチェック、コンボでブドウと選択  テキストボックス→果物 ブドウ というようにフォームに転記させたい。 以前、シートでのマクロを教えていただきましたが、フォームだと頭が混乱してしまいました。 簡単で良いので、マクロの記述を教えてください。