Aktuellen Datensatz per Schaltfläche löschen

Frage:Wie kann ich den aktuellen Datensatz in einem Formular per Schaltfläche löschen? Der Steuerelemente-Assistent scheint mit dieser einfachen Aufgabe überfordert zu sein.

Antwort: Dazu verwenden Sie in der Ereignisprozedur „Beim Klicken“ der Schaltfläche zum Beispiel folgende Anweisungen:

Private Sub btnDSLoeschen_Click() If MsgBox(„Datensatz wirklich löschen?“, _ vbExclamation + vbYesNo) = vbNo Then
Exit Sub
End If
DoCmd.RunCommand
acCmdSelectRecord
DoCmd.RunCommand
acCmdDeleteRecord
End Sub

Diese Anweisungen zeigen zunächst eine mit Ja oder Nein zu beantwortende Sicherheitsabfrage an, markieren dann den aktuellen Datensatz und löschen ihn.
Wenn Sie die Sicherheitsabfrage nicht benötigen, lassen Sie die ersten drei Zeilen weg.