• 締切済み

MS-ACCESSのサブフォームの表示条件を「常に新規レコードの追加」の状態を維持する方法について

サブフォームの表示条件を「常に新規レコードの追加」の状態を維持する方法を探しています。 レコードにデータ入力後、ボタンをクリックでレコード追加と画面上は新規レコードの入力画面が表示されている動作、或いは「レコード追加」のみのサブ・フォームなのですが・ ご存知の方、教えてください。

みんなの回答

  • Gin_F
  • ベストアンサー率63% (286/453)
回答No.1

> 或いは「レコード追加」のみのサブ・フォームなのですが・ サブフォームの元となっているフォームでは、 レコードの追加プロパティを "はい" にしているけど、サブフォームでは入力済みのレコードも見れる状態ということでしょうか?

関連するQ&A

  • Accessのサブフォーム上で常に新規レコードの追加(単票か帳票)の状態を維持する方法

    サブフォームの表示条件を「常に新規レコードの追加」の状態を維持する方法を探しています。 レコードにデータ入力後、ボタンをクリックでレコード追加と画面上は新規レコードの入力画面が表示されている動作、或いは「レコード追加」専用のサブ・フォームなのですが・ ご存知の方、教えてください。

  • Access2007 サブフォームの新規レコードをすぐにフォームに表示させる方法

    サブフォーム上で適当なレコード(IDと商品名)を選択して、そのレコードにある入力ボタンを押すと、フォームのコンボボックス上にその商品名が出るようなフォームがあります。 すでに入力済みのIDと商品名は表示されます。 ところが、サブフォーム上でIDと商品名を新規入力して入力ボタンを押すと、フォームのコンボボックスは空白となり、商品データが表示されません。 しかし、一旦フォームを閉じて開くと、データは表示されています。 IDと商品名を新規入力して、そのままフォームのコンボボックスに反映させたいと思います。 入力ボタンはこのようにやってみました。 Private Sub 入力_Click() DoCmd.DoMenuItem acFormBar, acRecordsMenu, acSaveRecord, , acMenuVer70 Forms!フォーム!ID = Me.ID End Sub または、 Private Sub 入力_Click() DoCmd.RunCommand acCmdSaveRecord Forms!フォーム!ID = Me.ID End Sub ご教授いただければ幸いです。よろしくお願いいたします。

  • アクセス2003 - レコード追加について

    同期の代理質問です↓ 新規レコードを入力するフォーム(サブフォームも作成)を作り、コマンドボタンを押すと、サブフォーム(全レコード表示させている)に入力したレコードを追加させる場合、どうしたらいいのでしょうか?   ちなみに、サブフォームに追加されたレコードは、 自動的に昇順に並べ変わるしくみにしたいのですが・・・ 宜しくお願い致します☆

  • Access2000 サブフォームで選択したレコードをコピーするには?

    フォームにサブフォームとボタンを配置しています。 サブフォームには複数のデータが表示してあります。 コピーしたいレコードを1つ以上選択して、ボタンを押下したときに現在表示しているレコードの下に 選択したレコードをコピーして追加したいのですが、その方法が分りません。 ご存知の方がいらっしゃいましたら、教えてください。 宜しくお願い致します。

  • Access2000でフォームを開くときに常に新規レコードで開きたいのですが

    Access2000で、あるイベントに参加した人のデータベースを作りました。 検索用フォームで「氏名」と「生年月日」で検索し、その人の情報を別の フォームで見ることができるようになっています。 該当者がいない場合は、新しいレコードにそのデータを追加します。 検索結果を表示するフォームに個人情報を表示・書き込みできる画面を開く ためのボタンがあるのですが、このボタンをクリックした時に、常に新規 レコードで開きたいのですが、コードはどのように記述すればよろしいの でしょうか? ちなみに、いまは下記のようなコードになっています。 「新規登録ボタン」は個人情報を表示・書き込みできる画面を開くためのボタン 「応募者」は個人情報を表示・書き込みできるフォーム です。 Private Sub 新規登録ボタン_Click() On Error GoTo Err_新規登録ボタン_Click Dim stDocName As String Dim stLinkCriteria As String stDocName = "応募者" DoCmd.OpenForm stDocName, , , stLinkCriteria Exit_新規登録ボタン_Click: Exit Sub Err_新規登録ボタン_Click: MsgBox Err.Description Resume Exit_新規登録ボタン_Click End Sub

  • access サブフォームにリストを表示させたいが一件しかレコードが表示されない

    現在、アクセス(ver 2000)でデータベースを作っています。 その中で、入力フォームの下に、 サブフォームを使って 入力データのリストを作成しようとしています。 サブフォームによるリスト表示は、サブフォーム作成ウィザードを使用し 入力フォームと同じテーブルを使用しています。 しかし、どうしてもレコードが一件しか表示されません。(左図)。 理想としては右図のような、複数レコードを表示をしたいのですが どうしてもやり方がわかりません。 どうすれば、右図のような複数レコードを表示できるのでしょうか。 アドバイスお願い致します。

  • アクセス サブフォームのレコードの値が変更したら

    フォームの中にテーブルに基づいたサブフォームを入れています。 サブフォームはデータシートビューで表示しています。 そのサブフォームのレコードの値が変わったら msgboxを表示させるにはどのイベントで行なえば良いですか? サーブフォームのコントロールに Private Sub ページ名_AfterUpdate() MsgBox "" End Sub としたら確かにメッセージボックスは表示されるのですが 全てのコントロールにつけないとだめですか? 「サブフォームのレコードの値が変更したら」 とするにはどうすればいいでしょうか?

  • サブフォームの条件について(アクセス2003)

    アクセス2003で入力フォームを作成しています。入力フォーム上には、売上日「2009/07/30」とその詳細を入力します。このフォーム上にサブフォームの過去6回分の売り上げデータも表示します。ここで、このサブフォーム上に同じ売り上げ日「2009/07/30」が表示されるのですが、この日の分は2重表示になるので省きたいと考えています。クエリの条件のところで、売上日:<Date()としてとりあえず、今日入力して今日のうちに印刷すれば、サブフォーム上は「7/30」分は表示されないのですが、これが明日「7/31」になると入力フォームの売上日は「7/30」でサブフォーム上の売上日も「7/31」より前の「7/30」なので両方表示されてしまいます。当日中に印刷までしてしまえばよいといわれればそれまでなのですが、それでは不便です。フィルタの非選択フィルタを使おうとも思ったのですが、いろいろな人が入力操作するので、なるべく簡単にできたらと思います。 どなたかよい方法を教えてくださいませんか?よろしくお願いいたします。

  • Accessサブフォームの表示について

    はじめまして、yossy136kgと申します。 Microsoft Access2003のメインフォーム、サブフォームに関して下記の件、ご教授願います。 メインフォーム、サブフォームを作成しリンクして、あるテーブルのレコードをサブフォームに表示されることが確認できている状況です。 サブフォームのRecordSourceに設定しているテーブルに【複数件レコードがある】状態に対して、検索条件に満たない場合空の状態でサブフォームは表示出来ています。 確認したいことは、サブフォームのRecordSourceに設定しているテーブルが【0件(レコードがない)】の状態に対して、サブフォームを空の状態で表示することは出来ますでしょうか? 現状、サブフォームは非表示となっています。 ※ダミーデータを入れてそれを表示対象とするしかないのでしょうか? 何かご不明な点がありましたご指摘ください。 以上、宜しくお願い致します。

  • ACCESSで条件によってサブフォームを非表示に

    Accessの初心者です。よろしくお願いします。 Accessで住所録を作っています。 メインフォームは主に本人のデータを表示し、サブフォームで家族の データを表示するようにしました。 その時、家族がいない人についてはサブフォーム自体を表示しないようにしたいと思います。 そこで下記のようにしましたがうまくいきませんでした。 (1)サブフォーム内で家族の人数をカウントする。 (2)このカウント結果をメインフォームに表示する。(メインフォーム にテキストボックスを配置し、コントロールソースをサブフォームの 人数カウントにする。)     ここまではうまくいきました。 (3)ここでメインフォームのイベントの「開くとき」に以下のように記 述しました。(メインフォームのテキストボックスにカウントという  名前をつけました。) Private Sub Form_Open(Cancel As Integer) If Me!カウント = 0 Then サブフォーム.Visible = False Else サブフォーム.Visible = True End If End Sub この記述の仕方がまずいと思うのですが、どのようにすればよいか 分りません。よろしくお願いします。