Microsoft Access 掲示板

Microsoft Access 掲示板

複数レコードを選択して同じテーブルに一度に新規コピーしたい

2 コメント
views
4 フォロー

お世話になっております。

帳票フォームにおいて、テーブルデータをフィルターによって絞って表示させたのち、その状態でそのテーブルがもつYES/NO型のフィールドでチェックボックスにユーザーがチェックを入れ、そのチェックが入っているものだけを同じテーブルの新規レコードにまとめてコピーする、といったボタンを作りたいと考えています。

フィルターは検索用テキストボックスと別ボタンでできるようになったのですが、そこからユーザーが任意にチェックボックスにチェックをいれた後の処理をボタンに埋め込みたいのですが、vbaでどう書いたらよいのかわかりません。

ご教授お願い致します。

nanana
作成: 2022/03/11 (金) 17:24:49
通報 ...
1
りんご 2022/03/12 (土) 00:38:34 c564b@0e907

　ほにゃららテーブルに、ほにゃららフィールド(YES/NO型)を作る。
　ほにゃららテーブルからほにゃららクエリを作る。
　ほにゃららクエリをコピペ、ほにゃらら追加クエリに変更。
　　ほにゃららフィールドの抽出条件:True、追加先のテーブル:ほにゃららテーブル。
　ほにゃららクエリをコピペ、ほにゃらら更新クエリに変更。
　　ほにゃららフィールドの抽出条件:True、レコードの更新:False。
　ほにゃららクエリからにほにゃららフォームを作る。
　　ほにゃららボタンを配置。

Private Sub ほにゃららボタン_Click()
 DoCmd.GoToRecord , , acNext
 CurrentDb.QueryDefs(“ほにゃらら追加クエリ”).Execute
 CurrentDb.QueryDefs(“ほにゃらら更新クエリ”).Execute
 Me.Requery
End Sub
2
nanana 2022/04/11 (月) 16:03:13 e48ae@6eb0c

お世話になります。
別業務が多忙となり随分時間がたってしまいました。申し訳ございません。

りんご様、ありがとうございます！
やりたいことが完璧にできました！
こちらのサイトには非常にお世話になっています。
いつも的確なご回答非常に感謝致します。