Exclusão de vários registros ao mesmo tempo

Galera,

Tenho um SubFormulario no estilo "vários Itens" que gostaria de fazer exclusão a partir dos registros selecionados mas nao tenho nem ideia de por onde começar.
Estou fazendo um sistema para controle de um grupo de dancas de uma escola publica, mas estou meio enferrujado, o sistema vai ser doado e quando estiver finalizado vou postar para todos!

No botão de excluir, ira colocar esse codigo, no evento ao Clicar:

CurrentDB.Execute"DELETE * FROM NomeTabela WHERE NomeCampoMarcado = -1"
Me.Recalc


NomeTabela Aqui vc muda para o nome da tabela que sera excluído os registros
NomeCampoMarcado Aqui é o nome daquele Campo que vc marca o registro para ser Excluido.

Assim, ele apaga todos os registros quando o Campo estiver marcao (-1).

Obrigado!

Se puder olhar meu BD, fiz "uma gambiarra", deu certo, mas não sei se foi o melhor jeito. Queria colocar um if antes de executar a exclusão, onde caso o resultado da consulta fosse zero retornasse mensagem dizendo "por favor selecione um registro a ser excluido"

Consulta Exclusão também funciona Amigo e não quebra galho...



Utilizando apenas Codigo:

Mude o Comando do Botão excluir para esse:

Private Sub Comando183_Click()

Dim F As Integer
DoCmd.RunCommand acCmdSaveRecord
F = Nz(DCount("*", "Caixa", "Exclui = -1"), 0)
If F > 0 Then
   If MsgBox("Deseja realmente excluir os registros selecionados?", vbYesNo + vbCritical) = vbYes Then
   CurrentDb.Execute "DELETE * FROM caixa WHERE exclui = -1"
   Me.Requery
   MsgBox "Registros excluídos com sucesso!", vbInformation
   Else
   CurrentDb.Execute "UPDATE caixa set exclui = 0"
Me.Requery
   MsgBox "Registros Nao apagados", vbInformation
   End If
Else
MsgBox "Voce deve selecionar ao menos um Registro para ser excluido!!!", vbCritical, "Atenção"
End If

End Sub

Ok galera! Obrigado! Alguém pode me dizer como encerrar o tópico?