• ベストアンサー

Access2010について教えてください。

フォームを開くとき、チェックボックスに自動的にチェックが入っている設定をしたいです。 コントロールのプロパティの規定値にTrueをいれたら、確かに開いたときはチェックが入っていますが、例えば表形式のフォームで最初のデータを入力しようとすると、入っていたチェックが消えます。 続けて2番目以降のデータを入力するときは、チェックが入ったままです。 仕方がないので、最初だけ手入力をしていますが、自動的にチェックが入る方法を教えてください。 私は簡単なVBAがわかる程度ですので、なるべくむずかしくない言葉で教えてください。

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

  • ベストアンサー
  • shinkami
  • ベストアンサー率43% (179/411)
回答No.2

>ただ、テーブルの規定値を設定するとすべてのデータにチェックがはいってしまいますよね? フォームから入力したデータのみチェックを入れたいのです。 テーブルで入力、フォームで入力 いずれも追加入力のときだけ規定値が初期値となり修正可能ですが 既にあるデータには影響しません。 >Access2007では、フォームのコントロールのプロパティにTrueをいれたら大丈夫だったのですが、2010になると、最初だけチェックが外れてしまいます。 2番目以降のデータは、規定値の設定が効くのですが・・・。 おかしいですね! こちらAccess2007なので2010での再現は出来ません

その他の回答 (1)

  • shinkami
  • ベストアンサー率43% (179/411)
回答No.1

規定値をテーブルのフィールドプロパティーで設定してください。 ※テーブル定義でフィールドの設定を丁寧に設定すると 後のクエリー、フォーム、レポートに反映され、開発効率が上がります。 特にルックアップ定義は感激ものです。

maato_maat
質問者

補足

ありがとうございます。 ただ、テーブルの規定値を設定するとすべてのデータにチェックがはいってしまいますよね? フォームから入力したデータのみチェックを入れたいのです。 あとで、チェックのはいったものだけ抽出したりするので。 検査室で使うデータベースで、もととなるテーブルには、すべての項目の検査があり、項目ごとのチェックで、血液検査、生理検査などにわかれるようにしたいです。 Access2007では、フォームのコントロールのプロパティにTrueをいれたら大丈夫だったのですが、2010になると、最初だけチェックが外れてしまいます。 2番目以降のデータは、規定値の設定が効くのですが・・・。

関連するQ&A

  • Access コントロールの種類の変更について

    いつもお世話になっております。 Accessのフォームに関して教えて下さい。 クエリを元にフォームを作って単表形式で表示させています。 新規データをフォームで入力して登録しようと思いました。フォーム上のテキストボックスをコンボボックスに変更して、入力をより簡略化しようとしました。 コンボボックスに変更することはできたのですが、データシートビューにしてコンボボックスの▼をクリックしても登録してあるデータ(○○マスタとしてリレーションシップを組んであるものです)が表示されません。 そのコンボボックスのプロパティのどこかを変更しなければいけないのでしょうか?また、根本的に考え方が間違っているのでしょうか? ぜひ教えて下さい。よろしくお願いします。

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

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

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

    Access2002を使用しています。 表形式で作成したフォームで、 Aというチェックボックスに、チェックが入っている場合  Bのコントロールは入力可能、  Cのコントロールは入力不可 チェックが入っていない場合、  Bのコントロールは入力不可、  Cのコントロールは入力可能 というふうにしたいのですが、 Private Sub A_AfterUpdate()   If A = -1 Then     B.Locked = False     B.Enabled = True     C.Locked = False     C.Enabled = False   Else     B.Locked = False     B.Enabled = False     C.Locked = False     C.Enabled = True   End If End Sub 上記のように設定すると、すべてのレコードに対しての設定になってしまいます。 1件ずつのレコードに対して、条件を設定するにはどのようにすればよいでしょうか? よろしくお願いいたします。

  • ACCESSで

    まず始めに。 私はAccess初心者なので、何をどう質問して良いかもはっきりは分かりません。何か、足りない部分があれば書いて下さい。 喫茶店の売り上げ集計(メニュー別&顧客別)等のシステムをAccess2002で作っています。 と言っても、まだ始めのほうで詰まってしまっての質問です。 商品テーブル、商品の中分類テーブル、大分類テーブル、売上伝票テーブル、明細テーブルと在り、商品登録クエリ&フォーム、売り上げ登録クエリ&フォーム、明細登録クエリ&フォームがあります。 売り上げ登録フォームは、売り上げ伝票としています。 明細登録フォームは売り上げ登録フォーム(メイン)のサブフォームとしてあります。 メインフォーム上に入力日、販売日、顧客名(IDからクエリで引いてきます。)等をテキストボックスやコンボボックスなどで入力します。 伝票IDはオートナンバー型で指定し、それをサブフォーム上のIDに代入して登録しています。 大分類で飲み物と食べ物を分け、中分類で、『ホット系・アイス系・生ジュース系・カレー系・・・・軽食系・ケーキ系』等と分かれており、カレー系から軽食系までは、大盛小盛が指定出来るのですが、これを明細フォームでチェックボックスで入力しています。 問題はここからで、帳票形式の明細フォームで入力しているのですが、大盛、小盛が指定出来ない物の行のチェックボックスの『visible』を「false」にし、大盛、小盛が指定出来る物の行のチェックボックスの『visible』は「true」にしたいと想い、VBAで組みました。が、レコードセットを使わないとメインフォーム中の全ての行のチェックボックスの『visible』が同時に変わってしまいます。 windowsXPのコントロールパネルのODBCの設定もおかしいかもしれませんがどうしても分かりません。 基本的な事なのかもしれませんが、よろしくお願いします。

  • Access 自動ふりがな入力について

    お世話になります。 Access2010 フォーム上に「氏名」及び「フリガナ」のテキストボックスを設置しました。 「氏名」のふりがなプロパティで「フリガナ」を指定し、ふりがなの文字種は 半角カタカナとしてます。 「氏名」を入力すると自動的に「フリガナ」にふりがなが入力されます。 ここまではよいのですが、いったん「フリガナ」テキストボックスを選択し 再度「氏名」に入力すると文字変換できなくなってしまいます。 例えば氏名に「山田 太郎」と入力したいのに変換されず半角カタカナで 「ヤマダ タロウ」となります。要するに、「フリガナ」のIME入力モードが そのまま引き継がれている感じです。 「氏名」に限らず他のテキストボックスでも半角カタカナ入力になって しまいます。 いったんこうなってしまうとフォームを開きなおしてもダメで、Access自体を 開きなおすと変換できるようになります。 結果的には、氏名のプロパティにある「IME入力モード保持」を、"いいえ"から "はい"に変えたところ、変換できるようになりました。 当該フォームは実際にはテキストボックスが沢山あり、さらにサブフォームも 沢山あります(サブフォームにもテキストボックスが沢山。。) これらすべてのプロパティで「IME入力モード保持」を"はい"に変更しなけ ればならないのでしょうか。 それともプロパティで自動入力させず、VBAでやった方がよいのでしょうか。 VBAでのやり方は分かるのですが、せっかく自動でふりがな入力できる プロパティがあるので使ってみたらうまくいかない・・って感じです。 ご教示の程、宜しくお願い致します。

  • Accessフォームの並び替えが出来ません。

    Access超初心者です。 仕事でリースの最終日と残回数をAcsessで表示させようとしています。 事前にテーブルで回数とリース開始日を入力しています。 フォームで、テキストボックス(非連結)を作成し、コントロールソースを =DateAdd("m",[回数]-2,[リース開始日]) と入力し、リース最終日を自動表示するようにしました。 フォームは表形式で作成です。 このリース最終日で並び替えをしようとすると、その部分だけフィルターがかかっているようで 選択することも出来ない状態で困っています。 どうすれば、並び替えが出来るようになるでしょうか? VBAも全くの素人です。 こんな私に詳しくお教えください。どうかよろしくお願いします。

  • 【Access2003】

    お世話になります。 前回の質問で説明が足りませんでした。 申し訳ありませんでした。 検索フォーム(帳票フォーム)にて各レコードにチェックボックスを設けています。 クエリにて抽出した全レコードをボタンクリックで全チェックボックスを選択(Yes)したいのですが うまくいません。 ボタンのプロパティの『クリック時』にどういうVBAをしたら良いのでしょうか? 宜しくお願い致します。

  • Accessのチェックボックス

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

  • [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のフォームについて

    Accessで、テーブルへのデータ入力を簡易化するための、フォームを作成しています その中で、コンボボックスのなかから項目を入力したら 別に用意されているテーブルから 一致する項目をテキストボックスに 自動的に値を入力できるようにしたいのですが、 どのようにしたらいいのか、わかりません。 ~フォームに入力する項目~ 氏名、年齢、地区(コンボボックス)、地区コード、地区番号、住所、電話番号  等 ~地区テーブル~ 地区コード、地区、地区番号 調べてみたところ、プロパティのコントロールソースというところで、 値を持ってくるための式を作成するということでしたが・・・ 実践してみたのですが、初心者ゆえ、あまりよく理解できませんでした どうかよろしく御願いします。

専門家に質問してみよう