Como mudar de pagina em um formulario sem ter que utilizar o mouse?
3 participantes
[Resolvido]mudar de pagina
tauron- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1416
Registrado : 07/12/2011
- Mensagem nº1
[Resolvido]mudar de pagina
Silvio- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 5120
Registrado : 20/04/2011
- Mensagem nº2
Re: [Resolvido]mudar de pagina
Bom dia....usado o teclado
Normalmente, utiliza-se o código abaixo:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF2 ' formulário pedido.
DoCmd.Close
DoCmd.OpenForm "frmpedido"
Case vbKeyF3 ' consulta ao estoque normal.
DoCmd.Close
DoCmd.OpenForm "frmConsEstNormal"
Case vbKeyF4 ' formulário orçamentos
DoCmd.Close
DoCmd.OpenForm "frmorcamento"
Case vbKeyF6 ' consulta ao estoque mínimo.
DoCmd.Close
DoCmd.OpenForm "frmconsEstMin"
Case Else
End Select
End Sub
Bons estudos.
Normalmente, utiliza-se o código abaixo:
Private Sub Form_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode
Case vbKeyF2 ' formulário pedido.
DoCmd.Close
DoCmd.OpenForm "frmpedido"
Case vbKeyF3 ' consulta ao estoque normal.
DoCmd.Close
DoCmd.OpenForm "frmConsEstNormal"
Case vbKeyF4 ' formulário orçamentos
DoCmd.Close
DoCmd.OpenForm "frmorcamento"
Case vbKeyF6 ' consulta ao estoque mínimo.
DoCmd.Close
DoCmd.OpenForm "frmconsEstMin"
Case Else
End Select
End Sub
Bons estudos.
.................................................................................
Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
tauron- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1416
Registrado : 07/12/2011
- Mensagem nº3
mudar de pagina
Obrigado silvio mas, com certeza não expressei meu obejtivo com precisão. O que espero eh que em um formulario com controle de guias eu possa mudar de aba (pagina) após atualizar (ou perder o foco) do ultimo campo da aba em destaque.
- Anexos
- TesteGuia1.zip
- Você não tem permissão para fazer download dos arquivos anexados.
- (15 Kb) Baixado 11 vez(es)
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
- Mensagem nº4
Re: [Resolvido]mudar de pagina
Boa noite
Teste
Private Sub T7_AfterUpdate()
Me.T9.SetFocus
End Sub
Depois de preencher os campo o T7 é o ultimo da Page1 ,,, dá Enter :
Teste
Private Sub T7_AfterUpdate()
Me.T9.SetFocus
End Sub
Depois de preencher os campo o T7 é o ultimo da Page1 ,,, dá Enter :
.................................................................................
*** Só sei que nada sei ***
Silvio- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 5120
Registrado : 20/04/2011
- Mensagem nº5
Re: [Resolvido]mudar de pagina
Amigo Assis, como tens tu passado ?
Tauron, a dica do Assis funfa !
Tauron, a dica do Assis funfa !
.................................................................................
Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
- Mensagem nº6
Re: [Resolvido]mudar de pagina
Bem obrigado
E o Amigão Silvio ?
Obrigado pelo comentário, qualquer coisa ando por aqui em frente ao PC
E o Amigão Silvio ?
Obrigado pelo comentário, qualquer coisa ando por aqui em frente ao PC
.................................................................................
*** Só sei que nada sei ***
tauron- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1416
Registrado : 07/12/2011
- Mensagem nº7
mudar de pagina
obrigado Assis e Silvio, coloquei o comando no evento ao perder o foco pois, pode ser que o campo em questão não seja atualizado.
Assis- Maximo VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 4772
Registrado : 06/11/2009
- Mensagem nº8
Re: [Resolvido]mudar de pagina
Obrigado pelo retorno.
Se resolvido, falta marcar com resolvido
Se resolvido, falta marcar com resolvido
.................................................................................
*** Só sei que nada sei ***
tauron- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1416
Registrado : 07/12/2011
- Mensagem nº9
Re: [Resolvido]mudar de pagina
Amigo Assis, se reparar no Título, já está definido como [Resolvido] mas, muito obrigado mesmo assim.
Silvio- Developer
- Respeito às regras :
Sexo :
Localização :
Mensagens : 5120
Registrado : 20/04/2011
- Mensagem nº10
Re: [Resolvido]mudar de pagina
Tauron...
Veja esse link aqui do fórum http://maximoaccess.forumeiros.com/t860-resolucao-de-topicos
Mesmo alterando o título do tópico para resolvido, o mesmo permanece em aberto no sistema.
Abraços.
Veja esse link aqui do fórum http://maximoaccess.forumeiros.com/t860-resolucao-de-topicos
Mesmo alterando o título do tópico para resolvido, o mesmo permanece em aberto no sistema.
Abraços.
.................................................................................
Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
www.maximoaccess.com/t860-resolucao-de-topicos
"Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
tauron- VIP
- Respeito às regras :
Sexo :
Localização :
Mensagens : 1416
Registrado : 07/12/2011
- Mensagem nº11
Re: [Resolvido]mudar de pagina
Amigo Silvio, não quero causar problemas nem delongas. a expressão [Resolvido], surgiu apos meu click no botao especifico para este fim. Mais uma vez muito obrigado pela ajuda.