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

    Transferir valor de campo texto não associado para outro formulário

    avatar
    Junior1415
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 24/08/2015

    Transferir valor de campo texto não associado para outro formulário Empty Transferir valor de campo texto não associado para outro formulário

    Mensagem  Junior1415 29/9/2015, 15:02

    Bom dia caros colegas

    Preciso transferir o campo Texto54 de um formulário para outro. Já consegui por meio de código mas os dois formulários precisam estar abertos e isso é inviável.

    Recebi dicas sobre utilizar a função INSERT INTO (que acredito ser SQL) para gravar em uma tabela e depois passar para o formulário... Pesquisei um pouco sobre mas não sei onde e como inserir esse código SQL.

    Por favor me ajudem

    Obrigado!!
    Cláudio Machado
    Cláudio Machado
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1633
    Registrado : 17/03/2011

    Transferir valor de campo texto não associado para outro formulário Empty Re: Transferir valor de campo texto não associado para outro formulário

    Mensagem  Cláudio Machado 29/9/2015, 20:31

    Veja se ajuda:

    'By JPaulo ® Maximo Access

    Campos numericos
    CurrentDb.Execute "INSERT INTO SuaTabela (SeuCampo1, SeuCampo2) VALUES (" & SuaCaixaTexto1.Value & ", " & SuaCaixaTexto2.Value & ")"

    Campos Texto
    CurrentDb.Execute "INSERT INTO SuaTabela (SeuCampo1, SeuCampo2) VALUES ('" & SuaCaixaTexto1.Value & "', '" & SuaCaixaTexto2.Value & "')"

    Campos Data
    CurrentDb.Execute "INSERT INTO SuaTabela (SeuCampo1, SeuCampo2) VALUES (#" & Format(SuaCaixaTexto1.Value,"mm/dd/yyyy") & "#, #" & Format(SuaCaixaTexto2.Value,"mm/dd/yyyy") & "#)"


    .................................................................................
    " Nunca cruze os braços diante de qualquer problema ou dificuldade, pois o maior homem do mundo Jesus,  morreu de braços abertos."

    Agradeça e feche o tópico clicando no botão Resolvido. Se não sabe como, veja  AQUI.
    Não esqueça de clicar no Joinha Transferir valor de campo texto não associado para outro formulário 90dssg para agradecer a dica que solucionou seu problema.
    avatar
    Junior1415
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 24/08/2015

    Transferir valor de campo texto não associado para outro formulário Empty Re: Transferir valor de campo texto não associado para outro formulário

    Mensagem  Junior1415 29/9/2015, 20:44

    Eu cheguei a ver este código, mas ao digitar naquela consulta da fonte de controle da erro. Alguma coisa escrito "caracteres encontrados após o final da instrução SQL". Vou tentar postar o banco.


    Última edição por Junior1415 em 29/9/2015, 22:39, editado 1 vez(es)
    avatar
    Junior1415
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 21
    Registrado : 24/08/2015

    Transferir valor de campo texto não associado para outro formulário Empty Re: Transferir valor de campo texto não associado para outro formulário

    Mensagem  Junior1415 29/9/2015, 21:14

    https://www.dropbox.com/s/664safkohc2yo4d/reprodutivo.accdb?dl=0

    Segue parte do banco em dropbox.

    Queria passar o texto54 do formulário reprodutivo para o texto126 do formulário formstransferencia... Se puderes fazer isso eu utilizo de exemplo para os outros campos.


    Obrigado!
    Cláudio Machado
    Cláudio Machado
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1633
    Registrado : 17/03/2011

    Transferir valor de campo texto não associado para outro formulário Empty Re: Transferir valor de campo texto não associado para outro formulário

    Mensagem  Cláudio Machado 29/9/2015, 23:27

    Bem pra que o código funcione, seu form "Controle Reprodutivo" não poderá ser Folha de Dados e sim "Formulário Contínuo".

    Coloque um botão ao lado do campo Texto 54 e no evento ao clicar do botão coloque este código abaixo.

    Código:


    DoCmd.OpenForm "formstransferencia"
    Forms![formstransferencia].Texto123 = Me.Texto54
    DoCmd.Close acForm, "Controle Reprodutivo"


    Conteúdo patrocinado


    Transferir valor de campo texto não associado para outro formulário Empty Re: Transferir valor de campo texto não associado para outro formulário

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/3/2024, 06:55