MaximoAccess

Caro Usuário, não tire as suas duvidas nas Salas de Repositório, abra sempre um novo tópico relacionado, nas salas destinadas para o efeito, como Sala de Tabelas, Consultas, Formulários, Relatórios, Macros, Módulos e VBA.

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Código de botões registro não funcionam em campos invisíveis?

    Compartilhe

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 479
    Registrado : 23/08/2010

    Código de botões registro não funcionam em campos invisíveis?

    Mensagem  Mylton em Seg 03 Ago 2015, 19:57

    Boa tarde
    Alguns botões de registro não estão funcionando da forma como gostaria.
    Na aplicação existem muitos campos invisíveis.
    Todos os código foram retirados deste fórum.

    Nos registros atuais o código funciona bem. Contudo, quando fecho e reabro a aplicação os botões não funcionam.
    Somente a partir de um determinado numero de registros.

    1) Botão registro posterior e anterior.
    Quando clico no botão de registro posterior ou anterior dá erro na segunda linha.
    Abaixo o código

    Private Sub CommandoPosterior_Click()
       DoCmd.GoToRecord , , acNext
    Exit_ComandoPosterior_Click:
       Exit Sub
    Err_ComandoPosterior_Click:
       MsgBox Err.Description
       Resume Exit_ComandoPosterior_Click
    End Sub


    Private Sub CommandoAnterior_Click()
       DoCmd.GoToRecord , , acPrevious
    Exit_ComandoAnterior_Click:
       Exit Sub
    Err_ComandoAnterior_Click:
       MsgBox Err.Description
       Resume Exit_ComandoAnterior_Click
    End Sub



    2 - Quando acrescento um novo código na tela inicial da certo, o código funciona, e o foco vai para o primeiro item.
    Quando entro em outros campos que são invisíveis, o registro da informação no um comando novo não funciona.
    A mensagem que dá é que o access não pode mover o foco para este controle.
    com erro na 4 linha abaixo.


    Private Sub ComandoNovo_Click()
       DoCmd.RunCommand acCmdSaveRecord
       DoCmd.GoToRecord , , acNewRec
       Me.TxtCboUnidadeRequisitante.SetFocus
    Exit_ComandoNovo_Click:
       Exit Sub
    Err_ComandoNovo_Click:
       MsgBox Err.Description
       Resume Exit_ComandoNovo_Click
    End Sub


    3 ) Os outros botões também não rodam bem.

    Alguém poderia explicar o porque?
    Obrigado

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: Código de botões registro não funcionam em campos invisíveis?

    Mensagem  JPaulo em Ter 04 Ago 2015, 09:47

    Olá;

    Faça o tratamento de erro desta forma;

    Código:
    Private Sub CommandoPosterior_Click()
      DoCmd.GoToRecord , , acNext
     
    Exit_CommandoPosterior_Click:
        Exit Sub

    Err_CommandoPosterior_Click:
        MsgBox "Atenção: Você já chegou ao ultimo registo.", , "  Atenção"
        Resume Exit_CommandoPosterior_Click
    End Sub

    Private Sub CommandoAnterior_Click()
      DoCmd.GoToRecord , , acPrevious
     
    Exit_CommandoAnterior_Click:
        Exit Sub

    Err_CommandoAnterior_Click:
        MsgBox "Atenção: Você já se encontra no primeiro registro.", , "  Atenção"
        Resume Exit_CommandoAnterior_Click
    End Sub

    O SetFocus não funciona para campos ocultos, ou seja, se está oculto jamais pooderá enviar o foco.
    Nestes casos, cria-se uma caixa de texto desvinculada, reduza as dimensões até ficar oculta e envie o foco para ela.


    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 479
    Registrado : 23/08/2010

    Re: Código de botões registro não funcionam em campos invisíveis?

    Mensagem  Mylton em Sex 07 Ago 2015, 23:35

    Boa noite
    desculpe a demora.
    Vou testar hj.
    Poderia explicar porque ocorre aquilo que perguntei no item 2.
    Obrigado

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: Código de botões registro não funcionam em campos invisíveis?

    Mensagem  JPaulo em Sab 08 Ago 2015, 10:54

    Nenhum campo oculto pode receber o foco, normalmente adiciona-se uma caixa de texto desvinculada com as dimensões reduzidas ao máximo para ficar oculta e envia-se o foco para lá.


    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

    Mylton
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 479
    Registrado : 23/08/2010

    Re: Código de botões registro não funcionam em campos invisíveis?

    Mensagem  Mylton em Sab 08 Ago 2015, 20:54

    Entendo.
    Mas e o fato que ocorre onde os registros novos e a rotina que enviou só funcionarem naquele momento.
    Ou seja, se fecho o programa ontem e abro hj não consigo visualizar os antigos.
    saberia o porque disso?
    Obrigado

    JPaulo
    Moderador
    Moderador

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 8907
    Registrado : 04/11/2009

    Re: Código de botões registro não funcionam em campos invisíveis?

    Mensagem  JPaulo em Seg 10 Ago 2015, 13:04

    Deve ter algum criterio defenido nas suas consultas ou no SQL do formulario.



    .................................................................................
    Sucesso e Bons Estudos
    Success and Good Studies

    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]
    [Você precisa estar registrado e conectado para ver esta imagem.] [Você precisa estar registrado e conectado para ver este link.]

      Data/hora atual: Dom 04 Dez 2016, 06:01