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]Expressão Dcontar para campos(não acoplado) diferentes em form

    Fabricia
    Fabricia
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 24
    Registrado : 27/08/2014

    [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form Empty [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form

    Mensagem  Fabricia 30/9/2014, 09:52

    Estou desenvolvendo um sistema de performance de grupo.
    Um dos formulários exige uma formula com os seguintes critérios:

    Regras:
    NIVEL 1
    Se alguem ficar pendente(execto INSS, afastado) Nota= 2
    100% da equipe concluir pesquisa                Nota= 3

    NIVEL 2 e 3
    Não responder pesquisa       Nota= 2
    Respondeu no prazo Nota= 3


    Então criei a formula em excel:
    Campos:
    Respondeu= SIM;NÃO
    No Prazo= OK;NOK
    Não responderam: Total=CONT.SE(C2:C8;"NÃO")

    Nivel 1:=SE(C10>0;2;SE(C10<=0;3))

    Nivel 2 e 3: =SE(E(SE(C2="SIM";SE(D2="OK";2)));3;2)

    O Nivel 2 e 3 deram certo na expressao de campo, mas a contagem de não respondido e a expressão 1 não deram certo.

    Preciso juntar as duas formulas em um resultado de campo Nota.

    Existem o seguintes campos diferentes não acoplados:

    CampoNota1
    CampoResp1          
    CampoPrazo1

    CampoNota2
    CampoResp2
    CampoPrazo2


    Alguém tem uma sugestão?
    avatar
    biaterra
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 133
    Registrado : 29/10/2013

    [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form Empty Re: [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form

    Mensagem  biaterra 30/9/2014, 15:46

    Boa tarde Fabricia, vc precisa de ajuda para access ou excel?
    Fabricia
    Fabricia
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 24
    Registrado : 27/08/2014

    [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form Empty Expressão Dcontar para campos(não acoplado) diferentes em form.

    Mensagem  Fabricia 30/9/2014, 16:07

    Em ACESS...
    avatar
    biaterra
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 133
    Registrado : 29/10/2013

    [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form Empty Re: [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form

    Mensagem  biaterra 30/9/2014, 16:15

    Vc já tem alguma coisa começada? Form, tabela?
    Porém, poderia usar o if, elseif...

    If Resultado = Condição1 Then
        Retorno 1
    ElseIf Resultado = Condição2 Then
        Retorno 2
    Else
        Retorno 3
    End If
    Fabricia
    Fabricia
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 24
    Registrado : 27/08/2014

    [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form Empty Expressão Dcontar para campos(não acoplado) diferentes em form.

    Mensagem  Fabricia 1/10/2014, 08:11

    Obrigado colega, algumas dessa forma atenderam, mas oq ue realmente resolveu essa minha pendência foi esse código que consegui construir:

    Campo TotalFunc (conta resultado da minha caixa de listagem): Private Su b tlSource_Click()
    Dim lngItens As Long
    lngItens = tlSource.ListCount
    TextCont = lngItens

    Campo diferentes - TotalCad (Conta linhas preenchidas):

    Dim Linha As Integer, I As Integer

    For I = 1 To 10
    If Len("" & Me("TxtID" & I)) > 0 Then
    Preenchidos = True
    Me.ContF = I

    End If
    Next

    End Sub


    Campos no formulario para preenchimento:

    Caixa de combinação "Prazo":SIM ou NÃO.



    If Me.TxtNivel1 = "OPERADORES DE CAMPO" And Me.Prazo1 = "SIM" Then Me.Txtnota1 = 3
    If Me.TxtNivel1 = "OPERADORES DE CONTROLE" And Me.Prazo1 = "SIM" Then Me.Txtnota1 = 3
    If Me.TxtNivel1 = "OPERADORES DE CAMPO" And Me.Prazo1 = "NÃO" Then Me.Txtnota1 = 2
    If Me.TxtNivel1 = "OPERADORES DE CONTROLE" And Me.Prazo1 = "NÃO" Then Me.Txtnota1 = 2
    If Me.TxtNivel1 = "TECNICOS DE PRODUÇÃO" And Me.TotalFunc.Value = Me.TotalCad.Value Then Me.Txtnota1 = 3
    If Me.TxtNivel1 = "TECNICOS DE PRODUÇÃO" And Me.TotalFunc.Value > Me.TotalCad.Value Then Me.Txtnota1 = 2

    If Me.TxtNivel2 = "OPERADORES DE CAMPO" And Me.Prazo2 = "SIM" Then Me.Txtnota2 = 3
    If Me.TxtNivel2 = "OPERADORES DE CONTROLE" And Me.Prazo2 = "SIM" Then Me.Txtnota2 = 3
    If Me.TxtNivel2 = "OPERADORES DE CAMPO" And Me.Prazo2 = "NÃO" Then Me.Txtnota2 = 2
    If Me.TxtNivel2 = "OPERADORES DE CONTROLE" And Me.Prazo2 = "NÃO" Then Me.Txtnota2 = 2
    If Me.TxtNivel2 = "TECNICOS DE PRODUÇÃO" And Me.TotalFunc.Value = Me.TotalCad.Value Then Me.Txtnota2 = 3
    If Me.TxtNivel2 = "TECNICOS DE PRODUÇÃO" And Me.TotalFunc.Value > Me.TotalCad.Value Then Me.Txtnota2 = 2


    abraços!
    avatar
    biaterra
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Feminino
    Localização : Brasil
    Mensagens : 133
    Registrado : 29/10/2013

    [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form Empty Re: [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form

    Mensagem  biaterra 1/10/2014, 19:50

    Que bom que conseguiu!
    Não esqueça de marcar como "Resolvido" Wink

    Conteúdo patrocinado


    [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form Empty Re: [Resolvido]Expressão Dcontar para campos(não acoplado) diferentes em form

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 11/5/2024, 08:40