サブフォームにクエリ集計から作成したフォームを表示し、メインのフォームで選択すると、サブフォームに選択したものだけの表が表示されるようなフォームを作りたいのです。
例をあげると・・・
メインフォーム→名簿
サブフォーム→成績表(行:名前 列:科目 値:点数)
メインフォームの名簿をリストBOXで選択できるようにして、選択した名前をテキストBOXで表示させるまではできています。
そのテキストBOXに表示された人の成績だけをサブフォームの表に表示したい。
説明が下手で申し訳ないのですが、分かる方ぜひ教えてください。お願いします。
また、複数の人を選択したとき、必要な表だけ表示する方法も教えてください。
宜しくお願いします。
No.3ベストアンサー
- 回答日時:
>サブフォームをクロス集計に指定すると、「パススルー クエリまたは日固定列のクロス集計クエリを、サブフォームまたは、サブレポートのレコードソースとして使うことはできません
サブフォームのレコードソースはクロス集計クエリなのでしょうか?クロス集計クエリを元に作ったフォームですか?
サブフォームとクロス集計クエリの結合が合っていないと思います。確認してみてください。
サブフォームのプロパティのレコードソースの右ボタンでソースとして指定したクエリを表示できますのでColumnheadingsプロパティだとグループ化されているフィールドで列見出しに設定されているフィールドがあります。そのフィールドとフォームが適合しない状態と思うのですが情報が少ないためそのくらいしか回答できません。
メインホームのリストを選択してクエリ自体がちゃんと抽出できるか確認しそのクエリを元にフォームをつくりサブフォームに配置しなおしてみてはどうですか。
No.2
- 回答日時:
>「”forms![メインフォーム名]![リストBOX名]”を有効なフィールド名、または式として認識できません」というエラー
これはフォーム名やリストボックス名が合っていない場合などに出ますが・・。
メインフォーム名やリストBOX名名は合っていますでしょうか?
例えばAフォームにあるリスト1というリストボックスの値をクエリの抽出条件にしたい場合は
=Forms![Aフォーム]![リスト1]
となります。
フォーム名やリストボックス名は作ってある名前と合っていますでしょうか。
またはクエリの名前のフィールドの抽出条件の欄でビルドを使いフォームの中のメインフォームを選択しリストボックスを指定してください。
クエリのみの状態で抽出条件を上記のように設定しメインフォームを開きリストボックスを選択しクエリで抽出できるか確認してください。
リストボックスで複数選択しないのならこれで出来ます。
>テキストBOXの更新後処理のイベントなどで
>Forms![メインフォーム名]![サブフォーム名].Requery
と#1で書きましたがリストボックスの更新後処理でも良いです。テキストボックスの更新後処理だとリストで選択したらテキストボックスをアクティブにしてフォーカスを移動させないとイベントが発生しないのでリストボックスの更新後処理に記述すればリストを選択すれば更新後処理イベントがすぐ発生しますので。
この回答への補足
何度も回答いただいてありがとうございます。
やはり私の入力ミスでした。
しかし、今度はサブフォームをクロス集計に指定すると、「パススルー クエリまたは日固定列のクロス集計クエリを、サブフォームまたは、サブレポートのレコードソースとして使うことはできません サブフォームまたはサブレポートをクロス集計と連結する前にクエリの”Columnheadings/クエリ列見出し”プロパティを設定してください」というエラーがでます。
クエリ列見出しのプロパティの何を設定していいのか分かりません。何度も申し訳ないのですが教えてくださいおねがいします。
No.1
- 回答日時:
サブフォームのソースになっているクエリにリストBOXで選択した名前で抽出をする条件を加えてRequeryすれば出来ます。
クエリの名前フィールドの抽出条件に
=Forms![メインフォーム名]![リストBOX名]
とすればリストBOXで選択された値(名前)で抽出します。
テキストBOXの更新後処理のイベントなどで
Forms![メインフォーム名]![サブフォーム名].Requery
などでサブフォームを再表示させれば出来ます。
>複数の人を選択したとき、必要な表だけ表示する方法
これはクエリに抽出条件をちょっと書き込むでは出来ないのでちょっと記述の作り込みが必要になります。
複数選択した場合はItemsSelectedなど使い
Dim Var条件 As Variant
Dim varItm As Variant
strSQL = "Select * From テーブル名"
For Each varItm In リストBOX名.ItemsSelected
Var条件 = 'ここにリストボックスで複数選択された値を代入します。
Next
DoCmd.RunSQL strSQL & " WHERE テーブル名.フィールド名 In ( " & Var条件 & " );" '作っておいたSQLに条件を追加して抽出する
こんな感じでやらないと抽出できません。
この回答への補足
回答ありがとうございます。
教えていただいた通りにすると、「”forms![メインフォーム名]![リストBOX名]”を有効なフィールド名、または式として認識できません」というエラーが出るのです。
私の作り方が悪いとは思いますが、もし解決方法がありましたら宜しくお願いします
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Access(アクセス) AccessVBAで降順にするテーブル作成クエリを使用して作成したテーブルを削除し同一のテーブル作成 1 2023/01/06 11:17
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Access(アクセス) Accessにインポートした複数のテーブルを表示させる方法が分かりません。 1 2023/01/30 20:22
- JavaScript テーブルの中のセレクトボックスの値が0のとき、非表示にしたい 3 2022/05/29 10:13
- Access(アクセス) Accessの参照フィールドの列がずれてしまいます 1 2023/07/19 15:00
- JavaScript ラジオボタンによるフォームの開閉を行いたい 3 2022/03/31 21:30
- HTML・CSS HTMLのフォームについてお尋ねします 1 2022/12/03 21:47
- Access(アクセス) Access 登録ボタンからサブフォームの更新 1 2022/07/22 10:23
- Access(アクセス) Accessフォーム 一部のレコードだけを抽出する方法について 1 2022/06/28 18:45
- Access(アクセス) Accessテーブルの結合で別々のテーブルのフィールドを組み合わせて値を出す方法について 2 2022/07/20 19:43
このQ&Aを見た人はこんなQ&Aも見ています
-
性格の違いは生まれた順番で決まる?長男長女・中間子・末っ子・一人っ子の性格の傾向
同じ環境で生まれ育っても、生まれ順で性格は違うものなのだろうか。家庭教育研究家の田宮由美さんに教えてもらった。
-
Accessのレポート上のテキストボックス値を設定したい
その他(データベース)
-
Accessフォームにクロス集計クエリを表示させるとき
Access(アクセス)
-
レコードを保存するコード アクセスvba
その他(Microsoft Office)
-
-
4
Access レポート印刷するときに1ページに収める方法
Access(アクセス)
-
5
AccessVBAで作成したExcelファイルを削除する方法は?
Visual Basic(VBA)
-
6
Accessのレポートの文字にカッコを追加したい。
Access(アクセス)
-
7
Returnに対するGoSubがありません
Access(アクセス)
-
8
Accessでフォームから別フォームのテキストボックスの値を設定する
Visual Basic(VBA)
-
9
Accessを開きなおすとテキストボックスの値がエラー#Name?になる
その他(データベース)
-
10
ACCESSのBookmarkプロパティの使い方
その他(データベース)
-
11
Access コンボボックスの値をクリアしたい。
PowerPoint(パワーポイント)
-
12
Access 最後のレコードに到達するまでループ処理を行う方法
Access(アクセス)
-
13
「Access」で、式が入っているテキストボックスに直接入力したい。
Access(アクセス)
-
14
Accessレコードの追加や変更が出来ません。
その他(データベース)
-
15
Accessでテーブルの値をテキストボックスに代入するには?
Access(アクセス)
-
16
ACCESS フォームをそのまま印刷について
その他(データベース)
-
17
ACCESSで2つフィールドの日付を比較して新しい日付を表示するには。
Access(アクセス)
-
18
AccessのフォームのテキストボックスにLOOKUPで表示したい
Access(アクセス)
-
19
Accessのテーブル、クエリをCSV形式でエクスポートしたい
Access(アクセス)
-
20
access テキストボックスの値取得
Access(アクセス)
関連するカテゴリからQ&Aを探す
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
サブフォームに対してGoToRecor...
-
クエリで出来た表にチェックボ...
-
ACCESS──メインフォームでサブ...
-
ACCESSサブフォームにデータ反...
-
ACCESSにて
-
親・子リンクフィールドの設定...
-
【Access】サブフォームのソー...
-
親フォームからサブフォームの...
-
サブフォームを非表示させる方...
-
Access 登録ボタンからサブフォ...
-
accessサブフォームでのパラメータ
-
アクセス2003のサブフォームの...
-
ACCESSのフォームで列固定?
-
アクセスのサブフォームでのト...
-
Accessでサブフォームのボタン...
-
サブフォームからメインフォー...
-
サブフォームに変数を代入し、R...
-
Access 2003でサブフォームが更...
-
Access VBA には Gridはないで...
-
VBAでサブフォームに自動的にデ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
サブフォームに対してGoToRecor...
-
クエリで出来た表にチェックボ...
-
親フォームからサブフォームの...
-
ACCESS──メインフォームでサブ...
-
皆さん使っているブラウザを教...
-
親・子リンクフィールドの設定...
-
サブフォームを非表示させる方...
-
Accessで埋め込んだサブフォー...
-
Access フォームで条件抽出し...
-
ACCESSのサブフォームコピーに...
-
ACCESSのフォームで列固定?
-
ACCESS VBA メインフォーム及び...
-
Access 登録ボタンからサブフォ...
-
サブフォームに変数を代入し、R...
-
ACCESSサブフォームにデータ反...
-
Access2007 ラベルの削除がで...
-
ACCESS 帳票フォームとデータ...
-
全てのサブフォーム名を取得したい
-
サブフォームのあるフォームか...
-
【Access】サブフォームのソー...
おすすめ情報