[Resolvido]ajuda - como pôr foco no controlo

Olá amigos,

Tenho um formulário que ao abrir pretendo que o cursor fique no controlo desejado (no caso [diafim])
Tenho o seguinte código no ao abrir formulário, mas o cursor não fica ativo no controlo para poder inserir a data do fim do dia.
Não sei se estou a fazer bem, mas preciso de ajuda.
É possível abrir o formulário e ir diretamente para o campo desejado?
O código que tenho é o seguinte:


Private Sub Form_Open(Cancel As Integer)
DoCmd.Maximize
DoCmd.GoToControl "[diafim]"

End Sub


Obrigado

Private Sub Form_Open(Cancel As Integer)
DoCmd.Maximize
Me.diafim.Setfocus ' o campo recebe o foco

End Sub

Abraco

Obrigado Óscar pela ajuda.
Só que agora acontece o seguinte:

Tenho o seguinte código num formulário que fecha depois de abrir o que pretendo, ou seja, tenho um formulário (menu_dt1_fecho) que seleciono o registo que pretendo abrir no formulário "dt1_fecho", até aqui tudo bem, só que depois de abrir o formulário e fechar os outros fico sem o foco no formulário entretanto aberto e daí ter de clicar com o botão do mouse no formulário para depois ficar com o focus no campo pretendido, para inserir a data do fim do dia no qual o Óscar ajudou com o código.

O código é o seguinte:

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "dt1_fecho"

DoCmd.OpenForm stDocName, , , stLinkCriteria
DoCmd.Close acForm, "menu_dt1_fecho"
DoCmd.Close acForm, "menuprincipal"



Devo estar a fazer alguma coisa mal.
Pode ajudar?

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "dt1_fecho"
StLinkCriteria = "seucampo= " & campoform     ' aqui faz a ligacao entre o campo num form e o campo no form a abrir

DoCmd.OpenForm stDocName, , , stLinkCriteria

DoCmd.Close acForm, "menu_dt1_fecho"
DoCmd.Close acForm, "menuprincipal"

Forms!dt1_fecho!seucampo.setfocus
Abraco

Se nao der amanha faco teste. Agora estou no tablet.

Abraco

obrigado pela ajuda Óscar,

Mas podia ser mais especifico, para que eu possa entender.
O formulário que pretendo abrir é o dt1_fecho e o campo é o diafim.

StLinkCriteria = "seucampo= " & campoform ' aqui faz a ligacao entre o campo num form e o campo no form a abrir

Como faço a ligação do campo no form a abrir?

Óscar
deixo aqui link da base dados teste para verificar e se puder ajudar agradeço imenso.


https://www.dropbox.com/s/v6zxaqw0i5ofwn9/teste.zip?dl=0


Obrigado

rui peço desculpa, mas no serviço so tenho access 2003.

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "dt1_fecho"
StLinkCriteria = "diafim= " & Me.diafim ' aqui faz a ligacao entre o campo num form e o campo no form a abrir

DoCmd.OpenForm stDocName, , , stLinkCriteria

DoCmd.Close acForm, "menu_dt1_fecho"
DoCmd.Close acForm, "menuprincipal"

no form dt1_fecho fazes no

ao abrir form()

Me.diafim.SetFocus


abraço

Boa noite Óscar,

Consegui, graças à sua ajuda.
Estou-lhe muito grato.

Abraço.

De nada rui, e ainda bem que conseguiste.
Estamos ca para isso, como tambem para aprender.


Abraco