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

    Contar Registros com critério em formulario

    avatar
    odaweb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4
    Registrado : 27/05/2014

    Contar Registros com critério em formulario Empty Contar Registros com critério em formulario

    Mensagem  odaweb 11/4/2018, 16:12

    Bom dia.
    Sou fraco em Access, estou tentando criar uma formula para contar registros de acordo com um critério no formulário, por exemplo:
    Tenho um arquivo morto com cadastro de funcionários dentro de uma caixa, cada caixa tem seu numero e com no máximo 20 fichas, quero montar a formula para ir contando os registros de acordo com o numero da caixa:
    Ex.
    Caixa 100 tantos registros.

    Se poder avisar quando chegar a 20 seria ótimo, mas tudo que vi neste fórum e testei não consegui fazer funcionar.
    Se alguém poder ajudar....

    Atenciosamente.

    (Estou mandando o arquivo para tentarem entender melhor)
    https://we.tl/ChVPocrWRr
    Anexos
    Contar Registros com critério em formulario AttachmentArquivo Morto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (333 Kb) Baixado 5 vez(es)
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    Contar Registros com critério em formulario Empty Re: Contar Registros com critério em formulario

    Mensagem  Silvio 11/4/2018, 18:31

    Boa tarde, seja bem vindo ao fórum.

    Copie e cole essas funções no evento após atualizar da caixa de texto com o nome: caixa.

    Código:
    Private Sub Caixa_AfterUpdate()
    Call Contagem
    End Sub

    Private Sub Contagem()
    Dim x As Integer
    Dim y As String
    y = Nz(DLookup("Caixa", "Tab_dados", "caixa = Forms!Cad_dados!Caixa"))
    x = Nz(DCount("Caixa", "Tab_dados", "caixa = Forms!Cad_dados!Caixa"))
    If x > 20 Then
    DoCmd.CancelEvent
    Me.Undo
    Me.Caixa.SetFocus
    MsgBox ("Limite de 20 registros atingidos, mude de caixa"), vbInformation, "Aviso"
    End If
    End Sub

    A função faz a contagem baseada no texto digitado na caixa de texto " caixa"

    Teste e nos informe.

    Abraços.


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    odaweb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4
    Registrado : 27/05/2014

    Contar Registros com critério em formulario Empty Contar Registros com critério em formulario - Parte 2

    Mensagem  odaweb 11/4/2018, 19:35

    Boa tarde Silvio
    Muito Obrigado pelo rápido retorno e simplesmente fantástico, ele faz a contagem certinho pelo numero da caixa e me avisa quando chega ao limite.
    Antes de eu receber a resposta do Post eu estava testando uma formula para ir contando de acordo com a quantidade dentro da caixa, tudo que achei no fórum eu tentei, porem acho que pela minha inabilidade com o Access não consigo fazer certo, se tiver tempo e puder ajudar no erro que esta dando eu agradeço.
    E Obrigado pela força que deu.

    Atenciosamente

    Segue arquivo com o erro que esta dando
    Anexos
    Contar Registros com critério em formulario AttachmentArquivo Morto.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (336 Kb) Baixado 8 vez(es)
    Silvio
    Silvio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 5120
    Registrado : 20/04/2011

    Contar Registros com critério em formulario Empty Re: Contar Registros com critério em formulario

    Mensagem  Silvio 11/4/2018, 19:39

    Que bom que está resolvido.

    Mas, regras são regras....Nova duvida é um novo tópico !


    .................................................................................
    Caso tenha resolvido a tua duvida, coloque o tópico como resolvido.
    www.maximoaccess.com/t860-resolucao-de-topicos

    "Quase tudo é possível quando se tem determinação e força de vontade. Não desista tão rápido."
    avatar
    odaweb
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4
    Registrado : 27/05/2014

    Contar Registros com critério em formulario Empty Contar Registros com critério em formulario - Parte 2

    Mensagem  odaweb 11/4/2018, 19:41

    Ola Silvio.
    Melhor eu aprender a ler as regras.

    Desculpe e obrigado

    Conteúdo patrocinado


    Contar Registros com critério em formulario Empty Re: Contar Registros com critério em formulario

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/11/2024, 20:33