[Resolvido]Abrir guia especifica de

Num formulário após clicar no botão editar, o formulário é recarregado em modo edição. Porém gostaria que o objeto e a guia que estivesse selecionada continuasse selecionada. Isso por que, atualmente após recarregar o formulário em modo de edição a seleção muda para o primeiro campo da primeira guia.

Nome do seu controle guia.Value = 0
ou
Nome do seu controle guia.Value = 1
ou
Nome do seu controle guia.Value = 2

Depende do número da aba que deseja colocar o foco;

Seu campo na guia que deseja o foco.setfocus;

Ex: ao clicar, aocarregar ou ao abrir;

Private Sub cmdAlterar_Click()
On Error GoTo m
CtlGuia01.Value = 1
Me.txtNome.SetFocus
m:
End Sub

Atenciosamente.

Esqueci de mencionar, deve especificar a sequencia de página na propriedade (formato índice da página=0,1,2,3,etc.)da guia.

Olá luissiscone, não consegui descobrir qual guia e qual objeto estava selecionado antes de recarregar o formulário.

Tenho interesse em reabrir a guia que estava aberta, antes de clicar em editar, para que o usuário não tenha que selecionar novamente a guia e campo que estava consultando.

Amigo,qual metodo esta utilizando para recarregar o formulario? Se for o Me.Requery aee esta o problema, pois ele recarrega, mas sai do registro Atual.



Use o Me.Recalc pois ele permanesce no Registro e guia atual...

Private Sub BtEdit_Click()
Form_Form_AssistDet.AllowEdits = True
Form_SubForm_AssistenciaDefSol.AllowAdditions = True
Form_SubForm_AssistenciaDefSol.AllowEdits = True
Form_SubForm_AssistenciaAcessorio.AllowAdditions = True
Form_SubForm_AssistenciaAcessorio.AllowEdits = True
Me.SubForm_AssistenciaImei.Form.AllowAdditions = True
Me.SubForm_AssistenciaImei.Form.AllowEdits = True
Form_Form_AssistDet.Form!SubForm_DefSol.Form!SubForm_AssistenciaStatus.Form.AllowAdditions = True
'Form_Form_AssistDet.Form!SubForm_DefSol.Form!SubForm_AssistenciaStatus.Form.AllowEdits = True
Form_Form_AssistDet.Form!SubForm_DefSol.Form!SubForm_AssistenciaDefSolObs.Form.AllowAdditions = True
Form_Form_AssistDet.Form!SubForm_DefSol.Form!SubForm_AssistenciaDefSolObs.Form.AllowEdits = True
Form_Form_AssistDet.Form!SubForm_DefSol.Form!SubForm_AssistContat.Form.AllowAdditions = True
Form_Form_AssistDet.Form!SubForm_DefSol.Form!SubForm_AssistContat.Form.AllowEdits = True
Me.SubForm_AssistenciaSituacao.Form.AllowEdits = True
Me.SubForm_AssistenciaSituacao.Form.AllowAdditions = True
Me.SubForm_ConsulCaixa.Form.AllowAdditions = True
Me.SubForm_ConsulCaixa.Form.AllowEdits = True
Me.Atendente.SetFocus
'Form_Form_AssistDet.Form.Atendente.Locked = True
'Form_Form_AssistDet.Form!SubForm_DefSol.Form!SubForm_AssistenciaStatus.Form.AtendenteSituacao.Locked = True
End Sub

Ve se este exemplo ajuda !

Amigo, tem certeza que nao tem nenhum .Requery em algum lugar aee nao? pois so o Comando
.AllowEdits = True nao recarrega o formulario, e nao muda de registro ou guia...

Muito estranho...

Mas teste o Exemplo do Amigo a cima, veja se resolve.

Obrigado a todos, principalmente ao luissiscone que desenvolveu o exemplo que resolveu meu problema.