Macro para excluir um registro de um subformulário?

editar

Eu queria criar um botão excluir que apagasse o registro selecionado na grid, mas não sei como fazer

É possível criar este botão excluir sem usar macro. O controle botão de pressão vem com algumas ações disponíveis. Uma delas, inclusive, permite excluir o registro atual (selecionado) do form ou subform onde o controle se encontra.

Para funcionar corretamente, é preciso certificar-se no Navegador de Formulários que o botão "excluir" esteja dentro do subformulário desejado . Depois, clique com o botão direito nele. E na janela propriedades, use a barra de rolagem para chegar na propriedade Ação e escolha "Excluir registro".

Não consigo fazer referência a esses controles, na documentação do access2base tá confuso referenciar a um controle de um subformulário, alguém pode me explicar detalhadamente?

Realmente é confuso, pois, pelo que entendi, o framework Access2Base não suporta a hierarquia de formulários do Base. Ao invés disso, trata os subformulários como controles comuns dentro de um formulário. Então, primeiro é preciso acessar o subform como um controle (método Controls) e depois invocar sua propriedade Form:

Sub ValorColunaSF
Dim oForm as Object, oSubForm As Object, oColuna As Object
Dim ValorCol As String


    'Form
    oForm = Forms( "Form1" )
    'SubForm
    oSubForm = oForm.Controls( "SubForm" ).Form
    'Coluna (campo) do Controle Tabela do SubForm
    oColuna = oSubForm.Controls( "SubForm_Grid" ).Controls( "Nome" )
    'Valor atual (selecionado) da coluna (campo)
    ValorCol = oColuna.Value

    Print oColuna.Name & ": " & ValorCol
End Sub

Atte,
Grafeno