Microsoft Access 掲示板

サブフォームのレコードに削除ボタンを設定する

1 コメント
views
4 フォロー

画像1

画像のようにサブフォームのレコードに対してそれぞれに削除ボタンをつけて削除することはできますか?

金魚
作成: 2020/07/03 (金) 17:16:37
最終更新: 2020/07/04 (土) 12:45:38
通報 ...
1

サブフォームのデザインビューで詳細セクションにコマンドボタンを配置して、そのクリック時のイベントプロシージャを下記のように記述すればいいでしょう。(コマンド1 は実際のコマンドボタン名に変更)

Private Sub コマンド1_Click()
    DoCmd.RunCommand acCmdDeleteRecord  
End Sub

「削除しますか?」の確認メッセージを出したくないときは、

Private Sub コマンド1_Click()
    DoCmd.SetWarnings False
    DoCmd.RunCommand acCmdDeleteRecord
    DoCmd.SetWarnings True
End Sub