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


3 participantes

    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form.

    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3946
    Registrado : 21/04/2011

    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Empty Capturar valor de um campo cbo de um form e inserir em outro campo de outro form.

    Mensagem  Marcelo David 5/8/2011, 14:06

    Amigos, sei que ficou meio obscuro o título. Vou explicar-lhes:
    Tenho uma cbo que busca valores em uma determinada tabela. Quando inserido um nome
    que não está previamente gravado na tabela de origem da cbo, temos aquela mensagem "O ítem informado não faz parate da lista". Essa mensagem eu personalizei, ficou assim: O ítem inserido não está cadastrado, deseja cadastrá-lo?.
    Se clicar em sim, ele abre um formulário para cadastro do ítem. Isso funciona perfeitamente. Gostaria que além disso, ele ja capturasse o texto inserida na cbo e adcionasse no respectivo campo do outro formulário, agilizando assim a inserção de dados. Caso eu não tenha sido claro, posso detalhar um pouco mais.

    Grato!
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009

    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Empty Re: [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form.

    Mensagem  criquio 5/8/2011, 14:17

    Tente assim, logo após a linha que abre o formulário:

    Forms!NomeDoForm!NomeDoCampo = Me.NomeDoCampo


    .................................................................................
    Meu novo site: www.vcssistemas.com.br

    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.


    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)


    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.

    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Empty Re: [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form.

    Mensagem  JPaulo 5/8/2011, 14:27

    *
    Se está a utilizar o evento se não estiver na lista.

    Exemplo;

    Private Sub SuaCBO_NotInList(NewData As String, Response As Integer)
    Response = acDataErrContinue ' Inibe msg padrão do Access.
    If MsgBox("Nome não cadastrado: '" & NewData & "'" & vbCrLf _
    & "Deseja Cadastrar?", 32 + vbYesNo) = 6 Then
    DoCmd.OpenForm "SeuFormCadastro", , , , acFormAdd, _
    acDialog, NewData
    Response = acDataErrAdded
    Else
    Response = acDataErrContinue
    End If
    End Sub




    É o simples no 2º formulario no evento VBA ao carregar,

    Me.SeuCampo=Me.openArgs





    .................................................................................
    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]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Folder_announce_new Instruções SQL como utilizar...
    Marcelo David
    Marcelo David
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3946
    Registrado : 21/04/2011

    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Empty Re: [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form.

    Mensagem  Marcelo David 5/8/2011, 14:54

    JPaulo, funcionou perfeitamente seu exemplo.

    Muito obrigado ao criquio e ao JPaulo pela ajuda.

    Forte abraço


    .................................................................................
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Favicon-16x16   Domine Access e VBA Criando Um Incrível Sistema Financeiro - [Passo a passo]
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Favicon-16x16   Access e VBA - Formulário Desacoplado - [Passo a passo]
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Yt_16x10 Conheça meu canal no Youtube e se inscreva.
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Marcel11
    JPaulo
    JPaulo
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Empty Re: [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form.

    Mensagem  JPaulo 5/8/2011, 15:19

    Obrigado pelo retorno o fórum agradece.


    .................................................................................
    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]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Folder_announce_new Utilize o Sistema de Busca do Fórum...
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Folder_announce_new 102 Códigos VBA Gratuitos...
    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Folder_announce_new Instruções SQL como utilizar...

    Conteúdo patrocinado


    [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form. Empty Re: [Resolvido]Capturar valor de um campo cbo de um form e inserir em outro campo de outro form.

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 7/11/2024, 19:09