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 informações de uma tabela para outra

    avatar
    birabenante
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 12/12/2016

    [Resolvido]Copiar informações de uma tabela para outra Empty [Resolvido]Copiar informações de uma tabela para outra

    Mensagem  birabenante 30/1/2017, 12:20

    Olá Bom dia!

    Sou novo em bancos de dados access.

    Minha dúvida é o seguinte:

    Tenho dois formulários, que são "Form_cadastro" e "Form_nota", com suas tabelas vinculadas.

    Preciso criar um botão que quando clicado ele copie do "Form_cadastro" os dados do registro atual que é "codigo" e "nomedoaluno" para o formulário "Form_nota", que também possui os dados "codigo" e "nomedoaluno".

    Que o "Form_nota" estará aberto em modo pop-up.

    Obrigado!
    CassioFabre
    CassioFabre
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 18/01/2013

    [Resolvido]Copiar informações de uma tabela para outra Empty Copiar informações de uma tabela para outra

    Mensagem  CassioFabre 30/1/2017, 15:57

    Boa tarde,

    Voce pode utilizar o recordset. Vou supor que os dados que voce quer passar para a tabela do subformulário, estejam em um campo do formulário principal no momento do clique do botão, então no evento Ao Clicar do botão, coloque:

    Código:
    Dim bd as Database
    Dim rs as recordset

    set db = Currentdb
    set rs = db.openrecordset("tblSubFormulario")

    rs.addnew
        rs("codigo") = codigo
        rs("nomedoaluno") = nomedoaluno
    rs.update

    Agora os dados estão na tabela do subformulário, e por consequencia, estão disponíveis neste.

    Obviamente voce tem que fazer as verificações de segurança, como impedir o procedimento caso os campos estejam vazios (pois se estiverem dará erro), etc etc.

    Qualquer duvida, basta perguntar.

    Abraço.
    avatar
    birabenante
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 12/12/2016

    [Resolvido]Copiar informações de uma tabela para outra Empty [RESOLVIDO] Copiar informações de uma tabela para outra

    Mensagem  birabenante 4/3/2017, 03:14

    Deu Certo! Valeu!

    Resolvido!

    Obrigado!
    CassioFabre
    CassioFabre
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 731
    Registrado : 18/01/2013

    [Resolvido]Copiar informações de uma tabela para outra Empty Copiar informações de uma tabela para outra

    Mensagem  CassioFabre 6/3/2017, 11:16

    Bom dia,

    O fórum agradece o retorno.

    Abraço
    FabioPaes
    FabioPaes
    Maximo VIP
    Maximo VIP


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3914
    Registrado : 14/08/2013

    [Resolvido]Copiar informações de uma tabela para outra Empty Re: [Resolvido]Copiar informações de uma tabela para outra

    Mensagem  FabioPaes 6/3/2017, 12:37

    Se a duvida foi solucionada, por favor marque o tópico como resolvido:

    Veja como Fazer



    .................................................................................
    _____________________________________________________________________
    Achou a solução para sua dúvida? Não seja Egoísta, Compartilhe com todos!
    A dica do Colega foi útil? Agradeça!

    O importante não saber tudo, mas sim a Onde procurar!
    avatar
    birabenante
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5
    Registrado : 12/12/2016

    [Resolvido]Copiar informações de uma tabela para outra Empty Re: [Resolvido]Copiar informações de uma tabela para outra

    Mensagem  birabenante 7/3/2017, 00:01

    Obrigado!

    Conteúdo patrocinado


    [Resolvido]Copiar informações de uma tabela para outra Empty Re: [Resolvido]Copiar informações de uma tabela para outra

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 00:36