MaximoAccess

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

Obrigado

Administração do MaximoAccess

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access

    Distribuição de tarefas automatico

    Compartilhe

    Matheus Bacha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/05/2015

    Distribuição de tarefas automatico

    Mensagem  Matheus Bacha em Qui 30 Jul 2015, 15:06

    Bom dia!

    Estou com um problema onde meu banco tem que distribuir automaticamente as tarefas para os colaboradores de acordo com suas demandas.

    Por exemplo: Tenho 3 colaboradores e cada um recebe 5 notas para atender todo mês, mais se o primeiro colaborador tratou apenas 2, o segundo 4 e o terceiro tratou as 5, no outro mês o banco tem que distribuir uma quantidade para que cada um fique exatamente com a mesma quantidade de notas iguais.

    Estou utilizando Mod para retornar o resto mais não está funcionando.

    [SomaDeNotas]/[Usuario] mod [Usuario]

    Desde já agradeço pela ajuda.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4653
    Registrado : 15/03/2013

    Re: Distribuição de tarefas automatico

    Mensagem  ahteixeira em Sex 31 Jul 2015, 18:51

    Olá, como deveria distribuir 14 notas por 3 utilizadores.
    Abraço

    Matheus Bacha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/05/2015

    Re: Distribuição de tarefas automatico

    Mensagem  Matheus Bacha em Seg 03 Ago 2015, 12:08

    Nesse caso um Usuário vai ficar com uma tarefa a mais, se for 15 notas dois Usuários ficam com um nota a mais e 16 distribui igual.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4653
    Registrado : 15/03/2013

    Re: Distribuição de tarefas automatico

    Mensagem  ahteixeira em Seg 03 Ago 2015, 14:26

    Olá, veja se código ajuda, tendo em consideração os números da mensagem nº 2:

    Código:
    Sub teste()
        Dim iTarefas, iUsuarios, iDivididas, iResto As Integer
       
        iTarefas = 14
        iUsuarios = 3
        iDivididas = iTarefas \ iUsuarios
        iResto = iTarefas - (iDivididas * iUsuarios)
       
        If iResto <> 0 Then
            'Aqui pode fazer o tratamento da distribuição do resto
            MsgBox "Tem " & iResto & " tarefas para distribuir. Actualmente os " & iUsuarios & " usuários tem " & iDivididas & " tarefas cada um."
        End If
    End Sub

    Abraço

    Matheus Bacha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/05/2015

    Re: Distribuição de tarefas automatico

    Mensagem  Matheus Bacha em Seg 03 Ago 2015, 15:00

    ahteixeira, talvez esse mesmo seja o código mais não estou sabendo colocar a ação para que ele execute o código.

    Na verdade eu tenho uma outra tabela de Usuários e preciso que ele pegue os Usuários dessa tabela e distribui as tarefas.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4653
    Registrado : 15/03/2013

    Re: Distribuição de tarefas automatico

    Mensagem  ahteixeira em Seg 03 Ago 2015, 16:42

    Olá, na verdade o código da mensagem nº 4 exemplifica como efectuar a distribuíção e mostra o resto que também terá que ser distribuido.
    Para testar, basta fazer:

    ALT+F11 colar o código e primir a tecla F5

    Para facilitar a ajuda de algum membro aqui do fórum à sua questão, sou da opinião que deve postar base de dados com as tabelas em referencia com dados de amostragem e dizer como pretende o resultado final.

    Abraço

    Matheus Bacha
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 29
    Registrado : 19/05/2015

    Atribuição de atividades automatico

    Mensagem  Matheus Bacha em Ter 18 Ago 2015, 13:45

    Bom dia!

    Já faz muito tempo que estou com problema e não consigo resolver .... tenho uma tabela com os campos [Notas] e [Usuarios], eu preciso que o Access pegue o total de notas (92 notas) e dividi por 3 (Que são a quantidade de de Usuários) e distribua as notas para os funcionários por igual, mais isso tem que ser automático. Criei um botão de Atualizar no formulário e quando clicar no botão o sistema já faz a distribuição das notas.

    Preciso muito de uma ajuda. Desde já agradeço a todos do forum.
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4653
    Registrado : 15/03/2013

    Re: Distribuição de tarefas automatico

    Mensagem  ahteixeira em Sab 29 Ago 2015, 11:38

    Olá Matheus, aconselho a leitura e cumprimento das regras do fórum, veja através do link abaixo, em especial o n.º 3:
    [Você precisa estar registrado e conectado para ver este link.]
    O tópico foi fundido.

    A resposta ao que pretende já foi dada uma sugestão acima, o qual não obtivemos qualquer resposta da sua parte.
    Teste o seguinte:

    1) Crie uma nova base de dados vazia
    2) Prima as teclas ALT+F11
    3) Crie um módulo (clicando com tecla do lado direito em cima do nome do projecto, insert, module) , veja:
    [Você precisa estar registrado e conectado para ver esta imagem.]

    4) Cole o código abaixo:
    Código:
    Sub teste()
        Dim iTarefas, iUsuarios, iDivididas, iResto As Integer
        
        iTarefas = 93
        iUsuarios = 3
        iDivididas = iTarefas \ iUsuarios
        iResto = iTarefas - (iDivididas * iUsuarios)
        
        If iResto <> 0 Then
            'Aqui pode fazer o tratamento da distribuição do resto
            MsgBox "Tem " & iResto & " tarefas para distribuir. Actualmente os " & iUsuarios & " usuários tem " & iDivididas & " tarefas cada um."
        Else
            MsgBox "Os " & iUsuarios & " usuários tem " & iDivididas & " tarefas cada um."
        End If
    End Sub

    5) Prima a tecla F5

    Deverá ver a seguinte imagem:
    [Você precisa estar registrado e conectado para ver esta imagem.]

    Isto é apenas uma sugestão e exemplo, que deverá ser ajustado ao seu projecto.
    Abraço
    avatar
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4653
    Registrado : 15/03/2013

    Re: Distribuição de tarefas automatico

    Mensagem  ahteixeira em Sab 10 Dez 2016, 09:10

    Olá Matheus, como ficou a situação?
    Os utilizadores do fórum merecem e agradecem o retorno.

    Caso seja o caso, não se esqueça de dar o tópico como resolvido, veja link abaixo como fazer:
    [Você precisa estar registrado e conectado para ver este link.]

    Abraço

      Data/hora atual: Sex 15 Dez 2017, 21:28