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]Critérios de Sorteio

    avatar
    fermoraisc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/08/2017

    [Resolvido]Critérios de Sorteio Empty [Resolvido]Critérios de Sorteio

    Mensagem  fermoraisc 20/9/2017, 12:05

    Bom dia pessoal, eu estou criando um bd que realiza sorteios aleatórios de peças uma vez ao mês, porém estou com um problema para inserir alguns critérios neste sorteio. O sorteio funcionara da seguinte maneira: serão 100 peças sorteadas ao mês sendo estas peças separadas em diferentes classes: A,B,C,D e E. Dentre estas peças serão sorteadas 9 do tipo A, 43 do tipo B, 29 do tipo C, 10 do tipo D e 9 do tipo E.  O outro critério é, por exemplo, eu tenho 27 peças A, então terei sorteios sem números repetidos durante 3 meses, e depois que estes 3 meses acabassem teria que voltar a repetir os números. Alguém consegue me ajudar ? Obrigada.


    Última edição por fermoraisc em 3/10/2017, 13:45, editado 2 vez(es)
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 979
    Registrado : 09/11/2012

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  =>Nois 20/9/2017, 12:17

    Comece a Pesquisar pela função Randon


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    fermoraisc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/08/2017

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  fermoraisc 20/9/2017, 12:39

    Já pesquisei, não achei nada parecido.
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 979
    Registrado : 09/11/2012

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  =>Nois 20/9/2017, 13:13

    Leia este artigo usandoaccess.com.br/tutoriais/sons-no-access-bingo.asp?id=1


    Última edição por =>Nois em 20/9/2017, 14:41, editado 2 vez(es)


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    fermoraisc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/08/2017

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  fermoraisc 20/9/2017, 13:24

    Obrigada mas meu problema não é com a função rnd, e sim com os critérios que eu descrevi, acredito que voce não entendeu meu problema.
    Administrador
    Administrador
    Administrador
    Administrador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 425
    Registrado : 02/11/2009

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  Administrador 20/9/2017, 14:27

    Item Nº 14 violado;
    Deve remover o "http://www."


    REGRAS DO FÓRUM

    1. Tenha paciência com quem coloca aqui as suas duvidas.
    2. Clareza nos títulos dos tópicos e duvidas, evite a linguagem MSN.
    3. Não colocar diversas vezes a mesma dúvida.
    4. Explicar detalhadamente o problema e informar a versão do seu Office + Sistema Operativo.
    5. Retorne sempre se deu certo, esse retorno é muito importante.
    6. Respeite toda a equipe Staff e demais membros deste fórum.
    7. Use sempre o botão Busca, sempre que tiver uma dúvida e antes de abrir tópicos.
    8. Não usar palavras como "Urgente". O fórum é livre e ninguém é obrigado a responder com urgência.
    9. A publicidade é proíbida e só pode ser feita pelo Administrador ou depois de aprovada pelo Administrador.
    10. Se o seu tópico não for respondido, tem o direito de fazer um Up ao final de 24horas!
    11. A colocação de Códigos ou Exemplos, devem constar sempre os créditos de quem o elaborou.
    12. Fale, não GRITE!   Só letras Maiúsculas, na Internet é o mesmo que gritar!
    13. É proibido tirar duvidas nas Salas de Repositório, devem abrir um novo tópico nas salas de duvidas, relacionando o Exemplo em causa.
    14. É proibido adicionar links externos nos tópicos, que redirecionem para outros sites ("backlinks").
    15. É permitido adicionar links externos, nos códigos VBA dentro das Base de Dados.


    .................................................................................
    Admin
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 979
    Registrado : 09/11/2012

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  =>Nois 20/9/2017, 14:43

    OK Meu caro.

    eu vou para de participar deste forum, valeu.


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    Administrador
    Administrador
    Administrador
    Administrador


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 425
    Registrado : 02/11/2009

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  Administrador 20/9/2017, 15:19

    Não necessita de parar, apenas tem de compreender que se todos os 51 mil usuários registrados postassem links externos, o sistema de monitorização da Google fazia com que este fórum encerra-se as portas.

    São apenas regras do fórum, que minimamente devem ser cumpridas.

    Você já se imaginou no meio de uma festa com 51 mil pessoas ? Quem dá pela sua presença ?
    Aqui fazemos de tudo para sermos uma comunidade e concerteza que você faz falta.
    Ajudar e ser ajudados é o lema deste fórum.

    "Eu não procuro saber as respostas, procuro compreender as perguntas."
    Confúcio


    .................................................................................
    Admin
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 979
    Registrado : 09/11/2012

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  =>Nois 20/9/2017, 17:12

    Em uma festa de 51 mil passo despercebido, mas do todo só uma pequena parte esta disponível a ajudar ai faço a diferença.

    apenas usei ctrl + c ctrl + v daqui: maximoaccess.com/t28289-randomize-com-quantidades da uma olhada la que tambem ta fora do padrao.



    Minha sugestão a pergunta da colega é que utilize a função randomize para sortear e que faça grosseiramente dizendo (clusters) tabelas / formulários dos grupos para sorteio e a cada sorteio faça a baixa do resultado para não se repetir e seus respectivos relatorios.




    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    fermoraisc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/08/2017

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  fermoraisc 20/9/2017, 17:27

    Obrigada pela resposta, eu já estou usando o randomize para sortear, porém preciso inserir estes critérios junto a ele, minha duvida é apenas esta.
    =>Nois
    =>Nois
    Super Avançado
    Super Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 979
    Registrado : 09/11/2012

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  =>Nois 20/9/2017, 17:58

    a tarefa exige muito raciocionio, muito trabalho e estou a cegas por nao ter postado nada do que ja tem.

    vou te dar algumas sugestoes

    crie consultas separadas pelas classes que precisa filtrada por algum campo data que te retorne apenas o mes vigente

    faço o sorteio como falei pelo grupo e ao dar a Baixa va abatendo na consulta de referencia

    utilize dcount para contar a quantidade de registros baixados

    imagine em um formulario com um subformulario voce selecionar o grupo e carrega a consulta da classe algo assim

    e ao final uma caixa de texto soma os itens baixados.

    no evento de um botão do sorteio faz a seguinte verificação

    Código:
    if me.suaCaixaTxt = "A" then

       if dcount("*","minha_consultaA")<9 then

          'faz o sorteio      
          'faz a baixa
          

       Else

          exit sub

       end if

    elseif me.suaCaixaTxt = "b" then

       if dcount("*","minha_consultaA")<43 then

          'faz o sorteio
          'faz a baixa

       Else

          exit sub

       end if

    'e assim sucessivamente....


    .................................................................................
    Att. Nois

    Se tudo não der certo... tente de novo drunken
    avatar
    fermoraisc
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 23
    Registrado : 03/08/2017

    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  fermoraisc 29/9/2017, 15:19

    Obrigada pela resposta, porém deste modo não deu certo.

    Conteúdo patrocinado


    [Resolvido]Critérios de Sorteio Empty Re: [Resolvido]Critérios de Sorteio

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 28/3/2024, 17:12