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]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    avatar
    Sérgiovieira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 19/11/2012

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Sérgiovieira 18/9/2016, 22:23

    Olá Todos
    No meu sistema de Pedidos tenho uma caixa de combinação para selecionar o Produto. Digito em parte e o produto não existe, então o sistema abre um novo formulário mais detalhado do estoque, não consigo colar a parte digitada em uma caixa de Texto do novo formulário.
    Não sei se deu para entender mas luto com isso a anos.
    Se Alguém puder me ajudar, agradeço.
    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

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Cláudio Machado 19/9/2016, 15:52

    Bom dia.
    Seja bem vindo ao Fórum.

    Veja se é isso que quer.

    https://www.maximoaccess.com/t2962-resolvidoincluir-cadastro-na-tabela-se-nao-existe-na-combobox#25279

    No aguardo.


    .................................................................................
    " 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 [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção 90dssg para agradecer a dica que solucionou seu problema.
    avatar
    Sérgiovieira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 19/11/2012

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Sérgiovieira 19/9/2016, 22:48

    Estou enviando um arquivo de Imagem do Sistema
    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

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Cláudio Machado 19/9/2016, 23:02

    O ideal seria a parte do seu sistema, ou um exemplo do que quer, imagem não ajuda muito amigo.
    Mas vamos lá. Envie pra gente analisar e ver o que pode ser feito.


    .................................................................................
    " 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 [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção 90dssg para agradecer a dica que solucionou seu problema.
    avatar
    Sérgiovieira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 19/11/2012

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Sérgiovieira 20/9/2016, 01:19

    O Código Funciona digitando o "Item não cadastrado"

    Private Sub Genérico_NotInList(NewData As String, Response As Integer)
    If MsgBox("Item não cadastrado: '" & NewData & "'" & vbCrLf _
    & "Deseja Cadastrar?", 32 + vbYesNo) = 6 Then
    DoCmd.OpenForm "Busca de Produto", , , , acFormAdd, _
    acDialog, NewData
    End If
    Response = acDataErrContinue ' Inibe msg padrão do Access.

    End Sub

    Agora
    Gostaria de Colar o "Item não cadastrado" em uma caixa de texto no Formulário "Busca de Produto" que servirá para nova pesquisa
    Esse é o maior problema!

    para abrir o Formulário uso esse Código e evito Caixamsg ou MsgBox
    Private Sub Genérico_NotInList(NewData As String, Response As Integer)
    DoCmd.OpenForm "Busca de Produto"
    End Sub



    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Celso Roberto 20/9/2016, 15:27

    Olá..

    Verifique este exemplo,
    Tem um formulário clientes que cadastra uma cidade que não esta na lista.
    O formulário Cidade que vai ser chamado tem um evento ao abrir, este evento é que vai copiar e colar o que foi digitado na lista do formulario clientes.

    veja se consegue adaptar ao seu.

    Aguardo
    Anexos
    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção AttachmentNaoEstaNaLista.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (50 Kb) Baixado 20 vez(es)


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    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

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Cláudio Machado 20/9/2016, 16:33

    Simples:

    DoCmd.OpenForm "Busca de Produto"
    Forms![Busca de Produto]!SeuCampoPesquisa = Genérico



    .................................................................................
    " 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 [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção 90dssg para agradecer a dica que solucionou seu problema.
    avatar
    Sérgiovieira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 19/11/2012

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Sérgiovieira 22/9/2016, 02:27

    Caro mestre Cláudio Machado
    Aprendi como mandar anexo
    Segura esse
    Se puder me ajudar, de uma olhada
    Obrigado


    study study study study
    Anexos
    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção AttachmentCopiar_colar.zip
    Copiar depois Colar
    Você não tem permissão para fazer download dos arquivos anexados.
    (150 Kb) Baixado 7 vez(es)
    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Celso Roberto 23/9/2016, 16:41

    Olá,  verifique se esta correto

    Abraços
    Anexos
    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção AttachmentCopiar_colar.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (149 Kb) Baixado 29 vez(es)


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    Sérgiovieira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 19/11/2012

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Sérgiovieira 23/9/2016, 18:20

    Celso Roberto
    Não estou nem acreditando
    Vou verificar o código depois com calma
    Muito Obrigado
    Celso Roberto
    Celso Roberto
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1076
    Registrado : 01/03/2014

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Celso Roberto 23/9/2016, 19:37

    Olá...

    Ok..


    .................................................................................


    Você fica satisfeito ao ter sua dúvida solucionada?.
    Quem te ajuda também fica quando você da o tópico por "Resolvido".
    Veja como neste Link: https://www.maximoaccess.com/t860-resolucao-de-topicos



    A Única coisa que sei é que ainda nada sei, Mas em breve Saberei.....
    avatar
    Sérgiovieira
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 12
    Registrado : 19/11/2012

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Sérgiovieira 24/9/2016, 00:29

    Nâo sei como agradecer a:
    JP Paulo, Moderador / Claudio Machado, VIP / Celso Roberto, Avançado
    O Código ficou melhor que eu esperava
    O exemplo vai me ajudar em várias etapas do meu Sistema
    Até uma Próxima vês
    Very Happy
    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

    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Cláudio Machado 24/9/2016, 01:03

    O fórum agradece o retorno.
    Abraço


    .................................................................................
    " 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 [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção 90dssg para agradecer a dica que solucionou seu problema.

    Conteúdo patrocinado


    [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção Empty Re: [Resolvido]Copiar digitado em Caixa de Seleção e Colar em outra caixa de Seleção

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 19/3/2024, 11:36