MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

Obrigado

Administração do MaximoAccess

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

    [Resolvido]Replicando Dados

    avatar
    Belobo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 55
    Registrado : 12/07/2014

    [Resolvido]Replicando Dados Empty [Resolvido]Replicando Dados

    Mensagem  Belobo em 3/7/2020, 04:56

    Ola tenho uma tabela com dados de estoque
    Sao diversos produtos com suas qtdes
    gostaria de replicar os dados conforme a qtde de cada produto
    em anexo foto de uma planilha que possui o exemplo dos dados "antes" e "depois" que seria a maneira que desejo fazer via VBA
    Solicito que seja passado o VBA usando o nome de meus campos pois nao sou desenvolvedor ainda e estou estudando por aqui meus futuros conhecimentos
    Peco quem puder montar usando os campos expostos em anexo
    Resumindo se um produto tem 6 unidades fazer com que tenhamos 6 linhas
    exemplo
    Codigo Qtde
    10000 6

    Ficaria
    10000 1
    10000 1
    10000 1
    10000 1
    10000 1
    10000 1
    Anexos
    [Resolvido]Replicando Dados AttachmentLEO MAXIMO.png
    Você não tem permissão para fazer download dos arquivos anexados.
    (119 Kb) Baixado 5 vez(es)
    Finformática
    Finformática
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 591
    Registrado : 23/03/2010

    [Resolvido]Replicando Dados Empty Re: [Resolvido]Replicando Dados

    Mensagem  Finformática em 4/7/2020, 19:14

    Caro Amigo,

    Se ainda não resolveu sua dúvida, veja anexo. Criei duas tabelas: TbEstoque baseado nos campos e dados que você informou e TbEstoqueSeparado conforme sua solicitação (idêntica TbEstoque). Abra o formulário, clique no botão. Inicialmente irá apagar o conteúdo da tabela TbEstoqueSeparado e em seguida irá atualizar para modelo solicitado.


    Abraços
    Anexos
    [Resolvido]Replicando Dados AttachmentSeparaEstoque.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (28 Kb) Baixado 5 vez(es)
    avatar
    Belobo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 55
    Registrado : 12/07/2014

    [Resolvido]Replicando Dados Empty Re: [Resolvido]Replicando Dados

    Mensagem  Belobo em 4/7/2020, 21:16

    Obrigado vou dar uma estudada e te respondo em breve
    Aproveito para te perguntar se e viável fazer isso via VBA direto atraves de módulo
    Assim eu não preciso abrir formulário etc !!
    Finformática
    Finformática
    Super Avançado
    Super Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 591
    Registrado : 23/03/2010

    [Resolvido]Replicando Dados Empty Re: [Resolvido]Replicando Dados

    Mensagem  Finformática em 4/7/2020, 21:41

    Caro Belobo

    Todo código VBA (do módulo que você refere) tem que ser chamado de algum local para ser executado. Nesse nosso caso é chamado pelo botão do formulário.
    É um modo viável. O que você tem desse BD?

    Abraços. Boa sorte.


    Última edição por Finformática em 4/7/2020, 22:45, editado 1 vez(es)
    avatar
    Belobo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 55
    Registrado : 12/07/2014

    [Resolvido]Replicando Dados Empty Re: [Resolvido]Replicando Dados

    Mensagem  Belobo em 4/7/2020, 22:19

    Beleza
    Como ainda não testei sua sugestão vou avaliar antes !!
    Te agradeço mesmo a ajuda
    Depois eu respondo aqui se deu tudo certo
    avatar
    Belobo
    Intermediário
    Intermediário

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 55
    Registrado : 12/07/2014

    [Resolvido]Replicando Dados Empty Re: [Resolvido]Replicando Dados

    Mensagem  Belobo em 21/7/2020, 05:45

    Obrigado
    deu certo
    assunto resolvido

      Data/hora atual: 10/8/2020, 05:37