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


    [Resolvido]Campo contador total

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Campo contador total Empty Campo contador total

    Mensagem  OLDRIVG Dom 06 maio 2012, 17:58

    Prezados do fórum,

    estou precisando de um campo no formilário que me informe o número total de registros em uma tabela.
    Veja bem; não quero um contador que me informe "1 de xxxxx", como o botão de navegação do formulário. Preciso de um campo que, ao abrir o formulário, ela já informa somente o número total de registros.
    Será que há condições de criar? Aguardo alguma sugestão.
    Tentei adaptar o código abaixo na Fonte de controle do campo, mas não consegui fazer funcioar.

    =[CurrentRecord] & " de " & Contar(*)

    No aguardo agradeço.
    avatar
    Convidad
    Convidado


    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  Convidad Dom 06 maio 2012, 18:18


    Considerando que o formulário retorne todos os registros da tabela:
    Crie um campo não acoplado no formulário, e
    No evento Form_Load() ou Form_Current():
    Me.NomeCampo = Nz(DCount("*", Form.RecordSource))

    Ou use DCount para contar os registros da tabela.
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  OLDRIVG Dom 06 maio 2012, 19:08

    Norberto Rost, obrigado pela a ajuda e atenção.

    Funcionou no Form_Current(). Tá beleza.

    A única falha é que tem que fechar e abrir o formulário para que o campo atualize caso insira um novo registro. Há alguma forma da atualização ocorrer sem ter que fechar e abrir o formulário?
    Obrigado
    avatar
    Convidad
    Convidado


    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  Convidad Dom 06 maio 2012, 19:19


    Estranho, no Current devia atualizar, pois a função é executada a cada registro.
    Tem certeza que não atualiza quando muda de registro?
    Senão, tente adicionando a linha Form.Refresh antes da função, ou após atualizar determinado campo.
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  OLDRIVG Dom 06 maio 2012, 20:48

    Não deu Norberto.
    Usei como você sugeriu mas não funciou.
    Fiz um teste implementando no evento Após atualizar do formulário e ele atualiza ao inserir novo registro sem precisar fechar o formulário. Mas tem um inconveniente: a contagem fica um registro a menos. Ou seja, se tiver 50 registro, o campo mostra 49.
    Se tiver mais alguma sugestão, vamos tentar.
    Agradeço
    avatar
    Convidad
    Convidado


    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  Convidad Dom 06 maio 2012, 20:58


    A experiência demostra que o erro quase sempre deve-se a uma particularidade no aplicativo, pois aqui funciona tanto em form ou subform, simples ou contínuo.

    Poderia postar o BD (em mdb) para verificação?
    Por obséquio, informe o nome do form em questão.
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  OLDRIVG Dom 06 maio 2012, 21:46

    Fiz teste em outro formulário e está registrando somente após o segundo novo registro.
    Segue BD e o formulário é Frm_Cadastro_Geral.
    avatar
    Convidad
    Convidado


    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  Convidad Dom 06 maio 2012, 22:45


    A contagem está sendo exibida corretamente: quando muda de registro atualiza a contagem.

    Ocorre que o Access exibe na barra de navegação uma contagem "falsa" quando se está em um registro novo. A tabela tem, digamos 6 registros, mas quando vc vai par um novo a barra exibe 7 de 7, já contando junto o novo registro.

    E o seu form está salvando os registros direto. Deve colocar código que impeça de salvar se determinados campos não estiverem preenchidos. Senão ele vai salvando registros em branco, e vc terá que excluí-los.

    Obs: Quando fui depurar/compilar o código vba deu erro. Deve ir depurando e corrigindo os erros indicados.
    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  OLDRIVG Dom 06 maio 2012, 23:15

    Ok.
    Ainda estou construindo o BD e a medida que vão surgindo erros, dificuldades, etc. vou tentando solucionar, seja com o meu parco conhecimento ou com ajuda deste forum. Assim sendo, quando estiver terminando o BD é que vou implementar campos requeridos e/ou indexados. Ainda não o fiz por questão de comodidade para realizar testes.
    De qualquer forma, agradeço a sua ajuda. Vou continuar a construção e no final vamos ver o que pode ser feito com os erros, bug, etc.
    Obrigado
    avatar
    Convidad
    Convidado


    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  Convidad Dom 06 maio 2012, 23:34


    Ok. Fiz os comentários na intenção de ajudar. Por favor, não interprete como uma crítica.
    Quanto à contagem de registros, espero que tenha esclarecido.

    OLDRIVG
    OLDRIVG
    Avançado
    Avançado


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 374
    Registrado : 20/07/2010

    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  OLDRIVG Seg 07 maio 2012, 00:12

    Esclareceu sim. Não interpretei como crítica. Todo comentário construtivo ajuda na didática.
    Inclusive já compilei o BD e estou tentando resolver os erros.
    Quando estiver terminando o BD vou tentar solucionar o problema do campo contador.
    Mais uma vez agradeço-lhe.
    avatar
    Convidad
    Convidado


    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  Convidad Seg 07 maio 2012, 00:15


    Beleza, qualquer coisa estamos aí.

    O Fórum agradece o retorno.

    Conteúdo patrocinado


    [Resolvido]Campo contador total Empty Re: [Resolvido]Campo contador total

    Mensagem  Conteúdo patrocinado


      Data/hora atual: Qui 07 Nov 2024, 20:42