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]Repetição de linhas

    avatar
    jayder
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 11/09/2015

    [Resolvido]Repetição de linhas Empty [Resolvido]Repetição de linhas

    Mensagem  jayder 16/10/2015, 18:17

    Boa tarde!
    Cá estou, mais uma vez, perguntando pra quem sabe! Pois bem.

    Possuo um formulário de controle de faltas, no qual o mesmo possui certas linhas a serem preenchidas dentre elas, além de nome e matrícula, possui data e motivo da falta. E esse formulário alimenta uma tabela que é posteriormente exportada para excel.

    Com tudo funcionando perfeitamente, esbarramos num problema, que é a inserção de números de faltas. Ex: o funcionário que faltou 10 dias, teria que ser alimentado 10 vezes no formulário.

    Quero saber como faço para inserir linhas na tabela de acordo com o número preenchido no campo. Ou seja, criarei um campo a ser preenchido com o número de dias faltados e esse número será o mesmo número de linhas que a tabela receberá as informações de quem faltou.
    Noobezinho
    Noobezinho
    Moderador
    Moderador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 4140
    Registrado : 29/06/2012

    [Resolvido]Repetição de linhas Empty Re: [Resolvido]Repetição de linhas

    Mensagem  Noobezinho 16/10/2015, 19:41

    Olá Jayder

    Digamos que a caixa de controle que irá receber o número de faltas
    seja: txtFaltas.

    No evento Após Atualizar dessa textbox ou num botão coloque:

    Dim i as integer, rs as recordset

    set rs = currentdb.OpenDatabase("NomeDaTabala")

    with rs
    For i = 1 to me.txtfaltas
    .AddNew
    !NomeDeUmCampodaTabela
    .Update
    Next i
    end with

    Entenda que só inserir linha em branco na tabela, não será possível,
    precisa preencher um campo nessa tabela.

    [ ]'s


    .................................................................................
    A pergunta que não quer calar:
    Por quê quando alguém vem pedir ajuda e conforme o caso pedimos
    para enviar parte do projeto, não temos mais continuidade do tópico?  
    Crê que temos bolas de cristal ou está com medo que "roubemos"  a
    idéia/projeto dele?  Twisted Evil
    Se é tão bom assim...


    Ajude a ser ajudado:
    Seja objetivo na dúvida, dê os detalhes do que precisa, sem rodeios.
    Quando anexar teu projeto, diga onde está o problema, ganhamos mais tempo
    sem precisar procurar o mesmo.
    avatar
    jayder
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 14
    Registrado : 11/09/2015

    [Resolvido]Repetição de linhas Empty Re: [Resolvido]Repetição de linhas

    Mensagem  jayder 8/12/2015, 17:00

    Obrigado Noobezinho,

    Me perdoe a grande demora, pois estava em outro projeto e agora voltei a esse.

    Obrigado mais um vez...foi de grande valia!

    Conteúdo patrocinado


    [Resolvido]Repetição de linhas Empty Re: [Resolvido]Repetição de linhas

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 8/11/2024, 01:50