200件のデータがありまして、ある条件に合致したデータのみを連票形式で表示したいのですが、上手くいきません。ご教授願います。
例えば、名前で検索する時に「鈴木一郎」で検索すると該当データは1件ですので単票形式で表示させても問題無いわけですが、「鈴木*」とワイルドカードを使って検索した場合には該当データが5件とかあるわけです。この場合に、該当する5件を連票形式で単一のビューで表示したいのですが、いきづまってます。どなたか教えてください。お願いします。
マクロを実行させるボタンは単票形式のフォーム上に貼り付けてあります。
No.1ベストアンサー
- 回答日時:
はじめまして。
表示させたい項目はフォームでしょうか?レポートでしょうか?
フォームでの組み方ならSQL(クエリ)との組み合わせがよいでしょう。
あとでレポートの表示にも役立ちます。
▼こんなデータ例で説明します。
----------------------------------------------
○テーブル名 [名前データ]
○フィールド名 [コード] [名前]
----------------------------------------------
コード データ
001 山田 一郎
002 鈴木 太郎
003 佐藤 花子
004 鈴木 良子
005 坂本 久太郎
:
:
▼用意するもの
1)名前データのデータシート型フォーム [FORM02]
2)上記をサブフォームとして表示させる単票フォーム[FORM01]
▼名前データのデータシート型フォーム[FORM02]の作成
1.普通にデータシート型のフォームを作ります。
2.レコードソースを書き換えます。
---例-----------------------------------------------------------
SELECT 名前データ.コード AS コード, 名前データ.名前 AS 名前
FROM 名前データ
WHERE ((名前データ.名前) Like IIf(IsNull([Forms]![FORM01]![名前]),"*","*" & [Forms]![FORM01]![名前] & "*"));
#Like IIf(~が重要!
▼単票フォーム[FORM01]の作成
1.先に作った[FORM02]をサブフォームとして埋め込みます。
名前を[SubForm]としてつけておきます。
3.検索用フィールドのテキストボックスを非連結で作って
おきます。このとき、名前は「名前」としてください。
4.「名前」の更新後処理に、以下プロシージャを組み込みます。
-------------------------------------
Private Sub 名前_AfterUpdate()
DoCmd.Requery "SubForm"
End Sub
-------------------------------------
これでFORM01を開いた時は全登録データが表示され、名前フィールド
になにか検索文字列が入り、更新されたタイミングで、SubForm に該当
分のみが表示される仕組みのできあがりです。
これを応用すれば、レポートも同様に検索分のみを表示させることが
できますよね。(フォーム内にレポートをオープンするコマンドボタン
をつくっておき、オープンするレポートのレコードソースを、検索ソー
スと同様にする)
がんばってください。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VLOOKUP が機能しない、その原因は何 ? 8 2022/10/19 12:06
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/02/21 09:28
- Excel(エクセル) Excelについて教えてください。 帳票データがあります。 アクセスに取り込むため、 データ形式にし 1 2022/06/08 19:59
- Excel(エクセル) エクセルの表示形式について教えてください あるセルの「A」という値と、別のセルの「B」という値を組み 4 2023/02/21 21:55
- Excel(エクセル) エクセルのマクロについて教えてください。 1 2023/01/26 09:50
- Access(アクセス) Accessでセレクタをダブルクリックで別フォームで詳細表示 3 2022/12/20 10:36
- その他(Microsoft Office) Outlookメール 連絡先の検索について 〈 ご説明 〉 Windows PC の Outlook 1 2022/09/23 14:43
- Visual Basic(VBA) ユーザーフォーム「frm_基本❶」を立ち上げると新規で入力する行数を右下のNoとして表示しています。 1 2023/03/16 19:02
- Excel(エクセル) エクセルの数式で教えてください。 2 2023/02/10 17:07
- Excel(エクセル) 製品番号での整列と、検索に関して 3 2023/06/28 19:20
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
【C#】DataGridViewの最大列数...
-
DTOとEntityの差は何ですか。
-
WordでExcelデータを差込...
-
ActiveReportのサブレポート機...
-
wordの差し込み印刷で文字...
-
VBA内でのGetPixelを使用した時...
-
excel access連携 このテーブル...
-
★お手上げ状態です。助けてくだ...
-
json_encodeが表示しない
-
小数点以下を含む計算でバグが...
-
WEBページの保存
-
CD-R作成時の題名書き込みについて
-
INIファイルに一括書き込みを行...
-
長い1枚ページを無限スクロール...
-
ASPからExcelのデータを読む方法
-
JavaからPHPへの値の受け渡し
-
エクセル オートフィルタ プ...
-
switch()文で値の大小比較
-
「取得先」という表現について
-
Dosブロンプトでtabを出力したい
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
wordの差し込み印刷で文字...
-
DTOとEntityの差は何ですか。
-
【C#】DataGridViewの最大列数...
-
excel access連携 このテーブル...
-
WordでExcelデータを差込...
-
ActiveReportのサブレポート機...
-
GridViewからチェックボックス...
-
★お手上げ状態です。助けてくだ...
-
VBA内でのGetPixelを使用した時...
-
表を表示するコントロールについて
-
Windowsのマクロプログラムで、...
-
INIファイルに一括書き込みを行...
-
MSFlexGridのデータを初期化し...
-
C#でのForm間のデータ受け渡し...
-
「外部データの取り込み」とい...
-
C言語で地図を描きたい
-
小数点以下を含む計算でバグが...
-
エクセルVBAで楽天証券に注...
-
CSVのインポート【ASP.NET】
-
画像の読み込み&白黒判別プロ...
おすすめ情報