Agravina,
No meu eu fiz assim:
Criei uma caixa de combinação e na origem da linha eu coloquei minha consulta. Após atualizar.
DoCmd.ApplyFilter , "[SuaTabela ] = '" & Me.cboSuaCxCombinação & "'" 'Filtro por combobox.
Criei também um botão e ao clicar eu acrescentei o código abaixo;
CurrentDb.Execute "DELETE * FROM SuaTabela WHERE SueCampoNaTabela = '" & Me.cboSuaCxCombinação & "'"
E funcionou bem.