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

2 participantes

    Operar campos de um sub-formulário de outro formulário

    avatar
    Sgsamuka
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 30
    Registrado : 03/12/2020

    Operar campos de um sub-formulário de outro formulário Empty Operar campos de um sub-formulário de outro formulário

    Mensagem  Sgsamuka 17/3/2021, 17:50

    Olá amigos,

    Estou com seguinte problema
    Tenho um formulário (Saida_Prod) e dentro dele tenho um sub-formulário (Relacao_Prod_Saida). Realizando um tipo de venda especial eu clico em um botão do formulário (Saida_Prod) que me leva a outro formulário (Saida_Anotada), deste formulário eu configuro os padrões dessa saída e concluo a venda. Ao clicar em concluir a venda no formulário (Saida_Anotada) ele roda um código (códibo abaixo), que deveria acessar o formulário (Saida_Prod) que já esta aberto, depois acessar o sub-formulário (Relacao_prod_Saida), focar no campo indicado pelo código (Att_Saida_Prod_Estoque) e depois pular para a próxima linha deste sub-formulário.
    Este campo ao qual estou tentando acessar (Att_Saida_Prod_Estoque), possui um código que roda ao executar o evento (ao sair) e por meio deste código ao dou baixa no estoque dos produtos. O código deste campo está funcionando, quando faço as vendas direto do formulário (Saida_Prod) ele roda perfeitamente, porém ao tentar realizar o procedimento que descrevi acima, é como se ele não conseguisse acessar esse campo do subformulário.

    Vocês poderiam me ajudar?

    Código que roda ao concluir a venda do formulário (Saida_Anotada):

    If MsgBox("Deseja concluir a venda armazenando o débito ao respectivo cliente?", vbInformation + vbYesNo, "Aviso") = vbYes Then
    Forms![Saida_Prod]![Mostrar_Cliente] = Me.Cliente_Venda_Referente
    Forms![Saida_Prod]![Soma_Preco_Prod_Venda] = Forms![Saida_Prod]![Relacao_Prod_Saida]![Soma_Valor_Saida]
    Forms![Saida_Prod]![BC_ICMS_Venda] = Forms![Saida_Prod]![Relacao_Prod_Saida]![Soma_BC_ICMS]
    Forms!Saida_Prod!Relacao_Prod_Saida.SetFocus
    DoCmd.GoToRecord , , acFirst
    Do While Forms!Saida_Prod!Relacao_Prod_Saida!Quant_Prod_Saida > 0
    Forms!Saida_Prod!Relacao_Prod_Saida.SetFocus
    Forms!Saida_Prod!Relacao_Prod_Saida!Att_Saida_Prod_Estoque.ColumnHidden = 0 'Exibir coluna com o campo de atualização
    Forms!Saida_Prod!Relacao_Prod_Saida!Att_Saida_Prod_Estoque.SetFocus
    DoCmd.GoToRecord , , acNext 'Vai para o próximo registro no subformulário
    Forms!Saida_Prod!Relacao_Prod_Saida!Att_Saida_Prod_Estoque.ColumnHidden = -1 'Não exibir coluna com o campo de atualização
    Loop
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4144
    Registrado : 29/06/2012

    Operar campos de um sub-formulário de outro formulário Empty Re: Operar campos de um sub-formulário de outro formulário

    Mensagem  Noobezinho 21/3/2021, 13:57

    Samuel

    É necessário referenciar o sub formulário:

    Forms!Saida_Prod!Relacao_Prod_Saida.Form!SetFocus

    Onde tiver que referênciar o subformulário de um formuário, coloque a palavra Form após

    nome do sub formulário.

    Experimente, se não funfar retorne.

    { }'s

    Balem


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.

      Data/hora atual: 26/1/2023, 22:28