Najprv musíte určiť Index - stĺpec v ktorom chcete vyhľadávať, potom spustiť hľadanie (Seek).
Ak záznam vyhľadávanie nájde, vlastnosť NoMatch = False

Dim db As Database, rs As Recordset
Set db = OpenDatabase("c:\mojadatabaza.mdb")    'otvorenie db
Set rs = db.OpenRecordset("Priatelia", dbOpenDynaset)' otvorenie recordsetu
rs.Index = "Priatelia"
rs.Seek "=", "Martin"
If Not rs.NoMatch Then
   rs.Delete    'nájdený záznam bude odstránený
End If