• 締切済み

アクセスで件数指定

現在つくっているデータベースのフィールドとして、氏名、家賃、支払月、とあります。 これを帳票フォーム方式にしています。 帳票フォームにすると、1件入れ終わると、下に1件ずつ追加されていきますよね? その分見えるレコードも増えていきますが、これを前もって何件、と決めて出すことはできないでしょうか? 例えば、Noというフィールドを作成して、そこに1-15と自動で入れば、帳票フォームも15件のレコードができあがるかとおもうのですが・・・。 このようなことはできるのでしょうか? よろしくお願いします。

みんなの回答

  • stork
  • ベストアンサー率34% (97/285)
回答No.1

なかなか回答がつかないようですので、ズバリの回答ではないのですが失礼します。 ご使用ソフトはACCESSでよろしいですね。 下のコードは、15件以上はレコードの挿入をキャンセルするものです。これを応用すればレコードの挿入件数を任意の数で制限することが出来ると思います。 Private Sub Form_BeforeInsert(Cancel As Integer) Dim intRecordCount As Integer intRecordCount = Me.Recordset.RecordCount If intRecordCount >= 5 Then Cancel = True End Sub それとももっと違ったやり方をご希望ですか?

関連するQ&A

  • Accessのフォームでデータの更新や、新規登録ができません

    Accessのフォームについての質問です。 単票形式のフォームを作成したところ、内容の更新もできず、新しいレコードを追加するためのボタン(▲と*のボタン)も無効になっているので、レコードの新規追加ができません。 フォームに入れるフィールド(氏名や商品番号など)を変えると、上記のような状況にはなりません。 何がまずいんでしょうか?

  • Access2003 クエリのトップ値を使って指定件数より多く表示される

    Access2003で、フィールドを昇順に並べ替え、上位10件を表示するクエリを作成しています。 11件目以降の対象フィールドにも10件目と同じ値があるのですが、上位10件の指定に対して11件目以降も表示されます。 別のファイルでも同じようなクエリを作成していますが、そちらは指定した10件のみが表示されます。 どこかに設定があるのでしょうか? ご存知の方がいらっしゃいましたらご教授ください。 <状況> 最寄り駅からの所要時間(徒歩の分数)を格納したフィールドがあります。 単純に所要時間を昇順に並べ替えると、分数毎のレコード件数は下記の通りになります。 ・1分のレコード → 2件 ・2分のレコード → 5件 ・3分のレコード → 6件 クエリで「所要時間」の《並べ替え》を《昇順》にし、ツールバーにある「トップ値」の値を10にして実行すると、上記の1分~3分の13件が表示されてしまいます。 ※他のフィールドについては、条件等なにも設定していません。 なぜ指定件数を超えるレコードが表示されるのでしょうか? 指定件数のみの表示にするにはどうすればよいのでしょうか? 以上、よろしくお願いいたします。

  • アクセスで自動でレコードを増やす

    お世話になります。アクセスでデータを入力するフォームを作っているのですが、月とNoと内容というフィールドがあったときに、今までは、その月に使用する分のレコードをエクセルで作成し、テーブルに貼り付けていました。この作業をボタンを押すと「月を入力して下さい」、「No(始まり)を指定してください」、「NO(終わり)を指定してください」とメッセージを表示し、自動でその分のレコードが追加されるというようにしたいのですが、どうすればよいですか? ご指導のほど、よろしくお願いします。 <テーブルイメージ> 月 No 内容 5月 1 (空欄。入力者がその都度、Noを指定して開き、入力) 5月 2 5月 3 ↑ボタンを押すと自動でレコードと追加したい。

  • ACCESSのレポートでの表示について

    1つのレコードに複数のフィールドを作り、帳票フォームを作成し、それをレポートにしました。 レポートで表示すると、1ページに複数のレコードの内容が表示されています。 そこで、それぞれのレコードには空欄のフィールドが多くあるので、データが入力されてあるフィールドのみを表示させていきたのですがどうすればよいでしょうか。 そうやってつめる事によって1ページに表示されるレコード数を増やしていきたいのですが・・・・・。 よきアドバイスお願いいたします。

  • ACCESSでのデータ削除について

    XP&ACCESS2003 メインフォーム/サブフォーム形式のフォームで、受注番号で連結しています。 メインフォームが受注、サブフォームが受注明細です。(1対多) サブフォームに削除ボタンをつけて、受注明細のレコードを1件削除するようにしています。以下が削除ボタンのクリック時のプロシージャーです。 DoCmd.DoMenuItem acFormBar, acEditMenu, 8, , acMenuVer70 DoCmd.DoMenuItem acFormBar, acEditMenu, 6, , acMenuVer70 クリックした段階で、クエリーで見てみると確かに削除されています。 ただ、フォームを再度開くと空のデータが追加されています。(=削除前とレコード件数は同じ) このサブフォームでは、レコード追加時にフィールド「行」に行ナンバーを入力させるために、隠しで [行NO]テキストボックスを持たせて、自動的に行NOをいれています。 サブフォームの挿入前処理は以下です。 [行NO] = Val(DMax("[行NO]", "Q_受注_工程_明細_行NO") & ".0") + 1 削除してもこの行NOが自動的に別のレコードを追加しているようです。 何か、よい方法をご存知の方、よろしくお願いします。

  • Accessからmail送信の本文作成について

    Access2000でデータベースを作っています。 入力フォームに担当者、内容、などのフィールドがあるのですが、 その他にサブフォームとして商品名や個数、金額のフィールドが入っていてサブフォームは帳票フォームになっています。 メールの本文を作るのに 担当者: 内容: 商品名: 個数: 金額: (もし2~3件ある場合は) 更に、下に商品名: 個数: 金額: と出るようにしたいです。 商品が2~3件登録のあるものは 一番最初に入力した1件分しか出すことができません。 フォームとサブフォームはmailnoでつながっているのですが、どのようにしたら出てくるのでしょうか? 教えてください。 よろしくお願いします。

  • ACCESS 追加クエリでレコード数の指定したい

    Win XP Access2003 見積伝票を作成しております。サブフォーム(帳票フォーム)の登録方法でご教授お願い致します。 "伝票明細テーブルW"(伝票番号,行番号,内容、数量、単価、・・・)を基にした "伝票明細クエリW"を作成し、入力しやすいようにフォームを開いた時に行番号(連番)を振り、30行表示するようになっています。 入力確認後に登録ボタンをクリックして追加クエリを開き"伝票明細テーブルW"から"伝票明細テーブル"に30件レコード保存するようになっているのですが、 場合によって内容が2~3行で終わる時があります。 このような時に無駄に30行のレコードを保存せず"内容"(フィールド)が入力されているの最終レコードまでで伝票明細テーブルに追加したいのですが、よい方法がありましたら宜しくお願い致します。 "内容"(フィールド)は途中に空白の時があります。 行番号    内容        数量  1     オイル交換      3.0  2  3     タイヤ交換       4.0

  • アクセスについて教えてください。

    アクセス2002 XP使用 Aテーブル ID 氏名 電話番号 住所  などの個人情報入力 Bテーブル ID (リレーションするためのID主キー) 管理ID 購入商品 上記のように今作っているのですが、AテーブルIDとBテーブルは1対多でのリレーションしてます。 フォームで帳票形式で見たとき、 管理NOの数だけレコード表示されるのはいいのですが、 AテーブルID 1に対し、管理IDが111と三件分あるとして、(勿論BテーブルIDには123となってます) AテーブルID1にひとつ、受付NOを追加して、   ID  受付NO  管理ID   1   1    1   1   2    1   1   3    1   2   1    2   2   2    2   3   1    3 見たいに受付NOがIDごとに123。。。と自動入力されル洋にしたいのですがどのようにすればできますか?素人なので説明もうまくできなくわけが変わらないかもしれませんがおしえてください。よろしくお願いします。

  • ACCESS2000の帳票フォームでテキストボックスの入力値を取得したい

    こんにちは。ACCESS2000でツールを作成しています。 テーブルはExcelにリンクさせ、クエリを介して帳票フォームで データを表示しています。 帳票フォームのレコード毎にテキストボックスを追加して それぞれ入力できるようにし、その値をVBAで取得したいのですが どうすればよいでしょうか。 テキストボックスを追加して実行すると、一つのテキストボックスに 入力した値が全てのレコードに反映されているようです。 帳票フォームのしくみがよく分かりません。 どなたか教えていただけないでしょうか。 宜しくお願いします。

  • Access2000での質問!!

    フォーム1、フォーム2とあり、フォーム1にチェックボックスがあり、そこでチェックされたかどうかによってフォーム2にあるサブフォームのレコードを追加できるかできないかをしたいのですがどうすればいいですか? もしチェックボックスでチェックされているならサブフォームのレコードを追加できるようにし、 チェックボックスがチェックされていない場合サブフォームのレコードを追加できなくしたいのです! サブフォームの既定のビューは帳票フォームです! なにとぞアドバイスお願いします!