[Resolvido]Setfocus em Campo no cabeçalho do Formulario

Olá saudações a todos, tenho um campo no form chamado Vendedor ele se encontra no Cabeçalho do formulário, percebi que ao digitar no botão novo me.vendedor.setfocus ele não atende ao comando, mais se eu colocar o campo dentro de detalhes funciona ok, como faço para o setfocus funcionar no cabeçalho ?

Pitaco. Faz um setfocus para outro campo e em seguida para o que queres para ver se funciona.

me.outrocampoqualquer.setfocus
me.vendedor.setfocus

Espero que funcione

Abraços

Fiz esse procedimento mais continua, se eu mover o campo do cabeçalho do formulário para parte de detalhe funciona.

Olá senhores,
poste aqui o código completo do botão novo, para analisarmos.

Código:

Me.Cliente.Enabled = True
Me.Datavenda.Enabled = True
Me.Vendedor.Enabled = True
Me.Numeronotafiscal.Enabled = True
Me.Vendasproduto_sub.Enabled = True
Me.Desconto.Enabled = True
Me.Valorfrete.Enabled = True
Me.Motorista.Enabled = True
Me.Observacao.Enabled = True


Me.salvar.Enabled = True
Me.cancelar.Enabled = True
Me.novo.Enabled = False
Me.excluir.Enabled = False
Me.Alterar.Enabled = False
Me.proximo.Enabled = False
Me.anterior.Enabled = False
Me.ultimo.Enabled = False
Me.primeiro.Enabled = False
Me.localizar.Enabled = False
Me.finalizarvenda.Enabled = False
Me.imprimir.Enabled = False


Me.Vendedor.SetFocus





On Error GoTo Novo_Click_Err


 DoCmd.GoToRecord acForm, "Vendas", acNewRec

Novo_Click_Exit:
    Exit Sub

Novo_Click_Err:

    MsgBox Error$
    Resume Novo_Click_Exit

Código:

Me.Cliente.Enabled = True
Me.Datavenda.Enabled = True
Me.Vendedor.Enabled = True
Me.Numeronotafiscal.Enabled = True
Me.Vendasproduto_sub.Enabled = True
Me.Desconto.Enabled = True
Me.Valorfrete.Enabled = True
Me.Motorista.Enabled = True
Me.Observacao.Enabled = True


Me.salvar.Enabled = True
Me.cancelar.Enabled = True
Me.novo.Enabled = False
Me.excluir.Enabled = False
Me.Alterar.Enabled = False
Me.proximo.Enabled = False
Me.anterior.Enabled = False
Me.ultimo.Enabled = False
Me.primeiro.Enabled = False
Me.localizar.Enabled = False
Me.finalizarvenda.Enabled = False
Me.imprimir.Enabled = False



On Error GoTo Novo_Click_Err


 DoCmd.GoToRecord acForm, "Vendas", acNewRec
 Me.Vendedor.SetFocus

Novo_Click_Exit:
    Exit Sub

Novo_Click_Err:

    MsgBox Error$
    Resume Novo_Click_Exit
   

Deu certo coloquei nessa sequencia e foi

Show, parabéns. Gratos pelo retorno!