[Resolvido]Excluir registro específico em SubFormulário

Olá, gostaria de saber se alguém poderia me ajudar em um problema aqui:
Tenho um Form principal baseado em uma consulta e no mesmo, um SubFormulário em modo de folha de dados associado ao Form.
Gostaria de saber se há a possibilidade de criar um botão no Form que exclua um registro previamente selecionado no SubFormulário.
Desde já agradeço a atenção!

Olá, mas como você mesmo disse, fora de questão.

Se para selecionar o registro especifico, você utilize CheckBox, pode utilizar as dicas deste tópico:
apagar - [Resolvido]Apagar dados de subformulário

Muito obrigado pela atenção mas eu já havia lido este, mas o meu problema é outro.
Assim, Gostaria de selecionar a linha no SubFormulário ( em modo de folha de dados) referente ao registro desejado e ao clicar em um botão no Form Principal, o registro selecionado seja excluído.

Coloque um botão na frente dos campos do registro mesmo com algo assim:

CurrentDb.Execute "DELETE * FROM NomeTabela WHERE Código=" & Me.Código & ""

ou então coloque uma variável no escopo do formulário para receber o número da id do registro quando o usuário clicar no campo e mude o Me.Código para o nome da variável com o código acima no botão do formulário principal. Nesse caso, é aconselhável zerar a variável após a exclusão para não apagar algo por acidente.

Obrigado pela atenção de vocês, mas optei por deixar a opção de excluir registros no SubFormulário, sendo assim, mais uma vez agradeço!

Já havia escrito há um tempo, minha internet caiu e só agora voltou.
Apesar de ter optado por outra forma, deixo o que escrevi. Pode servir para outra pessoa que busque:

Abra um módulo e colque essa função:

Código:

Global nId As Integer
Function SelecionaId(ByRef argId As Integer)
           
            nId = argId
           
End Function


Dê o nome que desejar a esse módulo.


No botão do seu formulário coloque:

Código:

Dim nSql As String

nSql = "DELETE * FROM SuaTabelaOrigemDoSubForm WHERE SuaChavePrimária =" & nId


    If MsgBox("Deseja realmente deletar o registro: " & nId & " ?", vbYesNo, "Atenção") = vbYes Then
          CurrentDb.Execute nSql
          Me.SeuSubformulário.Requery
  End If

No evento ao clicar dos campos de seu subformulário coloque:
Call SelecionaId(Nz(SuaChavePrimária))

Até!