MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

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


5 participantes

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  MSoccol 14/4/2011, 18:51

    Boa tarde

    Tenho um fomulário, com um subformulário. Via subformulário executo um consulta adição que insere valores na tabela de origem deste subformulário, no entanto após a consulta o subformulário não exibe os novos dados. Tentei incluir o comando atualizar (via macro) após executar a consulta, mas mesmo assim não funciona. O novo registro é motrado teclando F5 (ou Atualizar Tudo na barrad e ferramentas) ou indo para o formulário principal e executando o comando atualizar.

    Logo gostaria do código desse comando Ataulizar tudo, para executar via macro após executar a consulta.

    Já procurei na internet, e encontrei muita informação desencontrada, além de que, não entendi VBA muito bem, ainda.

    Desde já Grato
    Jungli
    Jungli
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 713
    Registrado : 07/05/2010

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  Jungli 14/4/2011, 19:03

    Boa tarde...

    basta após o código da consulta você colocar:

    seuSubFormulário.requery
    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  MSoccol 14/4/2011, 19:26

    e para criar um módulo e depois chamá-lo em uma macro

    Minha idéia seria mais ou menos assim:

    Public Sub AtualizarForm()
    Editar Escala.Requey
    End Sub

    E depois cchar o código AtualizarForm, em uma macro

    * Editar Escala é o nome do formulário principal.
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  JPaulo 14/4/2011, 20:39

    Public Sub AtualizarForm(ByVal frm As Form)
    Set frm = frm
    frm.Requery
    End Sub


    Para chamar o sub

    Call AtualizarForm(Me)



    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Folder_announce_new Instruções SQL como utilizar...

    napoli gosta desta mensagem

    Jungli
    Jungli
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 713
    Registrado : 07/05/2010

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  Jungli 14/4/2011, 20:46

    boa tarde...

    o requery atualiza o form assim:
    'atualiza o form principal
    DoCmd.RunCommand acCmdRefresh
    'atualiza o subform
    me.MeuSubForm.requery

    as vezes o simples é melhor

    ERM gosta desta mensagem

    avatar
    Convidad
    Convidado


    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  Convidad 14/4/2011, 22:15

    é simples sim jungli, agora veja a diferença

    Me.Requery força os registros por inteiro para o formulário recarregar. Isto significa que todos os registros no seu form atual serão recarregados.
    Me.Requery é essencialmente o mesmo que fechar e reabrir o formulário. Quaisquer novos registros adicionados por outros usuários simultâneos estarão disponíveis. Da mesma forma todos os registros que tenham sido excluídos desapareceram e volta sempre ao primeiro registro existente, não fica no registro atual.


    Me.Refresh irá recuperar quaisquer alterações (mas não acréscimos ou exclusões) para os registros mostrados no form atual. Todos os cálculos (campos não acoplados) são recalculados mas não recarregar o conjunto de registros.

    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  MSoccol 14/4/2011, 23:24

    Boa Noite, as dicas foram ótimas e resolvem o problema. Transformei minha macro em VBA e incluí o Código que o Jungli descreveu para atualizar o subformulário:
    Forms!Teste.Requery
    Funcionou como eu queria. O modelo do JPaulo também funcionou, e será muito útil.

    Disso tudo ficou só uma dúvida como eu faço pra chamar o procedimento AtualizarForm() - postado pelo JPaulo - em uma macro, ou mesmo para chamar a linha de comando Forms!Teste.Requery?

    O problema já tá resolvido só queria ver se existe essa possibilidade.

    Muito obrigado a todos
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  JPaulo 15/4/2011, 11:39

    Obrigado pelo retorno o forum agradece.

    Para o codigo em cima, a chamada está lá escrita em cima, e deve ser inserida no evento VBA dentro do form, ou num botão ou orever.

    Agora uma função publica para uma Macro, seria:

    Public Function AtualizarForm()
    Screen.ActiveForm.Requery
    End Function


    Na linha Ação da Macro, é RunCode e em baixo Função Nome basta colocar AtualizarForm()

    Este tambem funciona no VBA dos formularios ou em botões sempre usando o Call

    Call AtualizarForm()









    .................................................................................
    Contribua com o maximoaccess nos links abaixo, ajude a melhorar este que é o seu site na NET.

    Pay-Pal R$ Aqui
    Pay-Pal € Aqui

    Ou ainda: Aqui (Novo)

    Sucesso e Bons Estudos
    Success and Good Studies

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Folder_announce_new Instruções SQL como utilizar...
    Jungli
    Jungli
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 713
    Registrado : 07/05/2010

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  Jungli 15/4/2011, 12:41

    Grandes mesres Ricardo e JPaulo... obrigado pelas explicações, são de muita ajuda a todos nós do fórum!
    eu exemplifiquei com o refresh no form principal por que entendi que MSoccol queria como ele disse atualizar (como o camando do menu) e atualizar os dados do subformulário (mostrando os registros atualizados).
    Razz No final: conseguimos resolver o problema dele!
    alien e de quebra relembramos informações úteis aos amantes do Acess.
    avatar
    MSoccol
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 74
    Registrado : 24/03/2011

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  MSoccol 15/4/2011, 13:37

    Tudo certo então. Consegui chamar o refresh via macro como JPaulo falou, mas vou fazer em módulos pra aprender um pouco mais sobre isso.

    Valeu pessoal do melhor fórum de access da internet.

    Abraços
    avatar
    durvalbit
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 6
    Registrado : 19/11/2012

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  durvalbit 10/6/2015, 12:10

    Sempre que recorro a este fórum, resolvo minhas dúvidas. Realmente é o MELHOR!!!!
    OBRIGADO.
    grbpereira
    grbpereira
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 148
    Registrado : 11/05/2012

    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  grbpereira 31/12/2015, 18:57

    Carambas!!!

    Valeu, de montão! (Zeca Pagodinho)


    Informações de primeira!!! Smile

    []'s
    Guilherme Pereira

    Conteúdo patrocinado


    [Resolvido] Módulo Atualizar Tudo (igual ao botão F5) Empty Re: [Resolvido] Módulo Atualizar Tudo (igual ao botão F5)

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 12/5/2024, 15:01