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


    [Resolvido]Contar registros no access com data de hoje

    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 29/7/2019, 14:25

    Amigos, quem pode me ajudar?

    Fiz uma base de cadastro no access, conforme PDF em anexo para cadastrar alguns itens.
    Eu preciso que na caixa de texto "CUBAGEM DO DIA" mostre a quantidade de registros do dia de "HOJE", mas não sei como fazer isso.
    Para contar todos os registros, independente da data estou usando a expressão abaixo e deu certo:
    =DContar("[ITEM]";"Relatório de Cubagem Peças")

    Agora não sei qual expressão usar para que conte apenas os registros inseridos no dia de hoje.

    Tabela:
    DATA CADASTRO    CATEGORIA    TIPO EMBALAGEM    ITEM
    15/07/2019            FLEXÍVEL        PLÁSTICO BOLHA    71102-TEM-M00  
    15/07/2019            FLEXÍVEL        PLÁSTICO BOLHA    74157-T7T-M00
    15/07/2019            FLEXÍVEL        PLÁSTICO BOLHA    71102-TEM-M10
    16/07/2019            SÓLIDA           CAIXA PLÁSTICA      51621-T7T-M01
    16/07/2019            FLEXÍVEL        PLÁSTICO BOLHA    71125-TRY-M00
    22/07/2019            FLEXÍVEL        PLÁSTICO BOLHA    71103-TM6-M00
    22/07/2019            FLEXÍVEL        PLÁSTICO BOLHA    71103-T9L-M00

    No aguardo da ajuda dos amigos...


    Construtor de expressões:
    =DContar("[ITEM]";"Relatório de Cubagem Peças")
    Anexos
    [Resolvido]Contar registros no access com data de hoje Attachmentcadastro.pdf
    Você não tem permissão para fazer download dos arquivos anexados.
    (167 Kb) Baixado 4 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 791
    Registrado : 13/12/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Alexandre Fim em 29/7/2019, 15:01

    Olá RGomes, tente isso:

    =DCount("[InformeAquiOCódigo]", "InformeAquisuaTabela", "[InformeAquioCampoQuedesejaPesquisar] = 'InformeAquioValorQueDesejaPesquisar'")


    Espero ter ajudado.

    boa sorte !!




    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 29/7/2019, 15:19

    Alexandre, fiz o código conforme abaixo, mas não conta os registro inseridos hoje.

    =DContar("[ITEM]";"Relatório de Cubagem Peças";"[TxtDtCadastro]='hoje()'")

    O campo fica zerado.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 791
    Registrado : 13/12/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Alexandre Fim em 29/7/2019, 15:59

    Informe a data, conforme abaixo:

    =DContar("[ITEM]";"Relatório de Cubagem Peças";"[TxtDtCadastro]=#29/07/2019#")


    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 29/7/2019, 16:13

    Amigo, não deu certo.

    quando uso =DContar("[ITEM]";"Relatório de Cubagem Peças";"[TxtDtCadastro]='#DATA()#'") o campo fica zerado.

    quando uso =DContar("[ITEM]";"Relatório de Cubagem Peças";"[TxtDtCadastro]='#15/07/2019#'") o campo fica zerado.

    quando uso =DContar("[ITEM]";"Relatório de Cubagem Peças";"[TxtDtCadastro]=#29/07/2019#") o campo mostra o total sem considerar a data especifica.

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 791
    Registrado : 13/12/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Alexandre Fim em 29/7/2019, 17:31

    RGomes,

    Particularmente, não utilizo essas funções do Access, mas acredito que vc deve colocar a data no formato "mm/dd/yyyy".

    TxtDtCadastro é o campo da sua tabela?


    Exemplo:

    =DContar("[ITEM]";"Relatório de Cubagem Peças";"[TxtDtCadastro]=#07/29/2019#")


    Tente isso.

    Você tá usando a função na propriedade do campo?


    boa sorte


    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 791
    Registrado : 13/12/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Alexandre Fim em 29/7/2019, 17:46

    Faça o seguinte, no campo "DATA CADASTRO", na propriedade Após Atualizar, coloque o seguinte código:

    Call ContarDias


    No mesmo formulário, copie e cole o código abaixo:

    Código:


    Function ContarDias() As Variant
    On Error GoTo trata_erro
    Dim db          As DAO.Database
    Dim rs          As DAO.Recordset
    Dim sSQL        As String

        Set db = CurrentDB
       
        sSQL = "SELECT COUNT(ITEM) as TOT_REG FROM [Cubagem Pecas] WHERE [DATA CADASTRO] = #" & Format(Date, "mm/dd/yyyy") & "#"
        Set rs = db.OpenRecordset(sSQL)
       
        Me.[SeuCampoDaTela] = rs("TOT_REG").Value
       
        rs.Close
        Set rs = Nothing
       
        Exit Function
       
    trata_erro:
        MsgBox "Erro gerado: " & Err.Number & " - " & Err.Description & "", vbCritical, "Erro!!!"
        Exit Function

    End Function



    Boa Sorte




    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 29/7/2019, 20:16

    Infelizmente não deu certo!
    Sou muito fraco em programação!



    TxtDtCadastro é o campo da sua tabela?
    SIM, ELE É UM CAMPO COM VALOR PADRÃO "=Data()" , POIS QUERO QUE AO ABRIR O FORMULÁRIO OS CADASTROS JÁ FIQUEM COM A DATA DO DIA.


    Você tá usando a função na propriedade do campo?
    ESTOU USANDO ESSA FUNÇÃO DIRETAMENTE NA FONTE DO CONTROLE DE UM CAMPO CRIADO NO FORMULÁRIO DO ACCESS

    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 791
    Registrado : 13/12/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Alexandre Fim em 29/7/2019, 20:29

    Ok Rogério,

    Para resolver seu problema é simples, mas tem algum enrosco ai.
    Por gentileza, se possível poste aqui seu banco de dados (somente partes envolvidas) para solucionarmos.

    Grato

    []'s


    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 29/7/2019, 20:39

    Agradeço a tentativa em ajudar, mas o arquivo access está com quase 8 mb e aqui tem limitação de tamanho para envio.

    Vou tentar arrumar de outras formas.
    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 30/7/2019, 13:04

    Alexandre, Bom dia.

    Segue base zipada para avaliação do amigo.

    Quero que no campo cubagem do dia conte os registros do dia de hoje e no campo cubagem total conte todos os registros.

    Se puder me ajudar eu agradeço.
    Anexos
    [Resolvido]Contar registros no access com data de hoje AttachmentTeste.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (60 Kb) Baixado 10 vez(es)
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 791
    Registrado : 13/12/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Alexandre Fim em 30/7/2019, 19:51

    Olá Rgomes,

    Não conseguir mexer no seus sistema pq aqui no cliente não tem Access na máquina que eu trabalho.
    Posso fazer em casa e em seguida te mandar, ok !!

    Mas nada impede que os amigos aqui do fórum também possam te ajudar.

    []'s


    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/11/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  IvanJr. em 30/7/2019, 22:36

    Resolvido usando
    Código:
    =DContar("[item]";"Relatório de Cubagem Peças";"[DATA CADASTRO]=#" & Format(Data();"mm/dd/yyyy") & "#")


    .................................................................................
    Sempre tente entender o código, não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.
    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 31/7/2019, 12:21

    Muito obrigado Ivan e todos que me ajudaram.

    FUNCIONOU!!!
    avatar
    Rgomes71
    Novato
    Novato

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 9
    Registrado : 11/07/2017

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Rgomes71 em 31/7/2019, 12:22

    GRUPO SHOW!!!
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 791
    Registrado : 13/12/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Alexandre Fim em 31/7/2019, 14:53

    Valeu Rgomes !!!
    boa sorte !!

    Grande IvanJR,
    Como sempre, a postos em ajudar !!!


    .................................................................................
    "Aprender é a única coisa de que a mente nunca se cansa, nunca tem medo e nunca se arrepende." (Leonardo da Vinci)
    "O impossível existe até que alguém duvide dele e prove o contrário." (Albert Einstein)
    IvanJr.
    IvanJr.
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 834
    Registrado : 22/11/2016

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  IvanJr. em 31/7/2019, 23:32

    O fórum agradece o retorno. Sucesso.

    Alexandre: Very Happy


    .................................................................................
    Sempre tente entender o código, não somente copie e cole.
    Positive as mensagens que achar útil clicando no '+' no canto superior direito delas.

    Conteúdo patrocinado

    [Resolvido]Contar registros no access com data de hoje Empty Re: [Resolvido]Contar registros no access com data de hoje

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 21/8/2019, 13:30