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

    [Resolvido]Replicando Dados

    avatar
    Belobo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

    [Resolvido]Replicando Dados Empty [Resolvido]Replicando Dados

    Mensagem  Belobo Sex 03 Jul 2020, 05: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 6 vez(es)
    Finformática
    Finformática
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  Finformática Sáb 04 Jul 2020, 20: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 10 vez(es)
    avatar
    Belobo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  Belobo Sáb 04 Jul 2020, 22: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
    VIP
    VIP


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  Finformática Sáb 04 Jul 2020, 22: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 Sáb 04 Jul 2020, 23:45, editado 1 vez(es)
    avatar
    Belobo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

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

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

    Mensagem  Belobo Sáb 04 Jul 2020, 23: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 : Respeito às Regras 100%

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

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

    Mensagem  Belobo Ter 21 Jul 2020, 06:45

    Obrigado
    deu certo
    assunto resolvido

    Conteúdo patrocinado


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

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qua 08 maio 2024, 13:51