Novo Registo - SubForm

boas
tenho o seguinte código numa combo e gostaria de ao chamar o Utente atraves da combo este fosse para um novo registo no sub-form
codigo :

DoCmd.ApplyFilter , "ID = " & Me!combOF.Column(0)
Me!NomeUtente.SetFocus
Me!combOF = Null

Obrigado

tentou assim

DoCmd.ApplyFilter , "ID = " & Me!combOF.Column(0)
me.subform,new rec ' não sei se é assim a forma correta da linha de codigo, mas o raciocinio é este
Me!NomeUtente.SetFocus
Me!combOF = Null

boas

Na verdade continuo com esse problema... ou seja... quando chamo um Utente na form deveria aparecer ou ir para um Novo Registo e deixar os restantes " Em Paz"   

e o que se passa é o seguinte

" />

Amigo com o seu Código da o seguinte erro :

[img][/img]

O seu código era :

Private Sub combOF_Click()
DoCmd.ApplyFilter , "ID = " & Me!combOF.Column(0)
Me.SubForm , New rec ' não sei se é assim a forma correta da linha de codigo, mas o raciocinio é este
Me!NomeUtente.SetFocus
Me!combOF = Null
End Sub

a outra imagem era esta

Fiz uma codigo bem simples, segue um exemplo

'Ir para subForm
Me.subEndereco.SetFocus
'adicionar novo registro
DoCmd.GoToRecord , , acNewRec
'espicificando um campo
Me.subEndereco!cidade.SetFocus
MsgBox ("deu certo"), vbInformation, "Parabens"


Basta adicionar ao seu codigo. se for isto. rsrsrsrsrsrs

Boa sorte

Irei testar e retorno breve . . . No entanto muito obrigado.