MaximoAccess

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

Obrigado

Administração do MaximoAccess

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]Relatório não soma valores contatenados

    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Relatório não soma valores contatenados Empty [Resolvido]Relatório não soma valores contatenados

    Mensagem  crysostomo em 28/8/2020, 21:45

    Boa tarde amigos preciso de entregar um relatorio , mas não posso entregar sem valor.
    fiz essa linha onde junta hora concatena com minutos
       
    Código:
    Me.txtCobrançaDeHorasEminutos = Me.Texto38 + Me.txtEntreDatas * Me.txtValorCobrado & ";" & Me.Texto36 ' juntar horas com minutos cobrado
    eu fiz na tabela im campo calculado e aparece o valor normal, mas no relatório da problema de expressão
    ja tentei as possibilidade.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3589
    Registrado : 04/04/2010

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Avelino Sampaio em 28/8/2020, 21:59

    Olá!

    Escreva aqui valores de entrada e o resultado esperado.  Exemplo:

    Me.Texto38 = 10
    Me.txtEntreDatas  = 5
    Me.txtValorCobrado = 15,00
    Me.Texto36 = 30

    =Me.Texto38 + Me.txtEntreDatas * Me.txtValorCobrado & ";" & Me.Texto36 :::> 10 + 4 * 15,00 ; 30 :::> 70,00;30


    Aguardamos


    .................................................................................
    Quer aprender a montar ribbons ?  
    Clique AQUI e conheça o meu aplicativo.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  crysostomo em 28/8/2020, 22:34

    Me.txtFinal = Me.txtHoras
       Me.minF = Minute(Now())
       Me.hF = Hour(Now())
       Me.txtDiaF = Me.Texto54 ' data do pc
       Me.txtEntreDatas = DateDiff("h", txtDiaI, txtDiaF + Abs(txtDiaF > txtDiaI))
       Me.txtCobrançaDeHorasEminutos = Val(Me.Texto38 + Me.txtEntreDatas * Me.txtValorCobrado) & ";" & Me.Texto36 ' juntar horas com minutos cobrado
      'Me.txtCobrancaDeDia = Me.calcDia * Me.txtValorCobrado ' cobrar dia

       Me.txtValorTotal = txtCobrançaDeHorasEminutos

    O que atrapalha é  a concatenação do ; que faz com horas e minutos

    Estava dando certo e derrapante deu erro


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Alexandre Fim em 28/8/2020, 22:50

    Crysostomo? Uma curiosidade.

    Qual a finalidade de você formatar os dados deste jeito?



    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  crysostomo em 29/8/2020, 22:17

    Boa noite, o cliente deseja cobrar a horas, dias e minuto.
    Para não fazer um campo de hora e outro de minutos para não juntar os campo , coloquei tudos no vba para concatenar.
    Não tive outra ideia de criação.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Alexandre Fim em 29/8/2020, 23:39

    Crysostomo,

    Já existe campo específico no banco de dados para data e hora e o cálculo é simples.

    Sugestão:
    Com a função DateDiff vc consegue calcular dias, horas, minutos e segundos.

    Talvez vc tenha trabalho desnecessário para esta atividade.

    Espero ter ajudado

    Att,





    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  crysostomo em 30/8/2020, 18:38

    Vou dar uma estudada sobre diff .
    voce diz o campo "calculando " , ele não soma se eu concatenar ";" a tabela tem que guarda a data Inicial e depois calcula com a final.
    pois o sistema atualiza a tabela para colocar a data e hora final na mesmo Id.
    Eu vou refazer essa janela. tentar enxugar os códigos e envio o bd


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  crysostomo em 30/8/2020, 21:33

    Boa tarde Alexandre, deixando um pouco o meu serviço de design enxugue uma parte para esses códigos , mas tentando formatar com 4 casas decimal após a virgula,  pelo cb, format DecimalPlase, val, CInt não está dando certo, não que formatar eles formata um de deixa outro
    Anexos
    [Resolvido]Relatório não soma valores contatenados Attachmentdiff separação.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (112 Kb) Baixado 3 vez(es)


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    FranklinJSP
    FranklinJSP
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Anónimo
    Mensagens : 373
    Registrado : 25/02/2016

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  FranklinJSP em 31/8/2020, 02:09

    Boa noite Gilliard!

    Veja se é isso que precisa
    Em anexo

    Saludos!
    Anexos
    [Resolvido]Relatório não soma valores contatenados AttachmentTempo - FranklinJSP.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (354 Kb) Baixado 6 vez(es)


    .................................................................................
    Meu Português não é muito bom,
    mas eu gosto de colaborar... em qualquer idioma
    Smile "Access... minha paixão"
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  crysostomo em 31/8/2020, 19:43

    O tempo está ok, vou guarda esse arquivo, mas como está na mensagem 8 está calculando perfeito o tempo e o valor do tempo , so não consigo formatar ele para 2 casas após a virgula , ja tentei formatar de vários tipos, mas não funciona
    quando é cobrado pelo tempo o resultado sai 6,1833333333333 quero formatar para 6,18 se eu fizer pelo round ele vai arredondar , mas eu não quero arredondamento messe caso
    [Resolvido]Relatório não soma valores contatenados Sem_tz76


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Alexandre Fim em 1/9/2020, 00:04

    Crysostomo,

    Fiz um pequeno exemplo:

    [Resolvido]Relatório não soma valores contatenados Calcho10

    Segue exemplo em anexo.

    Espero ter ajudado.

    Boa sorte
    Anexos
    [Resolvido]Relatório não soma valores contatenados AttachmentCalcHoras.zip
    Você não tem permissão para fazer download dos arquivos anexados.
    (29 Kb) Baixado 5 vez(es)


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4223
    Registrado : 06/11/2009

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Assis em 1/9/2020, 11:33

    Bom dia Alexandre

    E criar uma máscara de digitação de dados para os campos data e hora ?

    Tipo para hoje - 01092020 113230 --> 01/09/2020 11:32:30

    [Resolvido]Relatório não soma valores contatenados Sem_t160


    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Alexandre Fim em 1/9/2020, 14:11

    Bom dia Assis, meu caro !!

    Eu fiz o exemplo e faltou esse detalhe.

    Coloque a seguinte máscara no campo da tabela e no formulário:

    00"/"00"/"0000\ 00":"00":"00;0;

    Boa sorte

    Espero ter ajudado


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    Assis
    Assis
    Maximo VIP
    Maximo VIP

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 4223
    Registrado : 06/11/2009

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Assis em 1/9/2020, 19:40

    Obrigado Alexandre

    Perfeito ...


    .................................................................................
    *** Só sei que nada sei ***
    Alexandre Fim
    Alexandre Fim
    Developer
    Developer

    Respeito às Regras 100%

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

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  Alexandre Fim em 1/9/2020, 19:56

    Valeu Assis !!!

    Sucesso!!

    Aguardando o @crysostomo pra encerrar ou não o tópico.

    Abs


    .................................................................................
    - Procure sempre anexar seu projeto para análise do problema/dúvida.
    - Ao copiar/colar um código VBA, procure entender seu funcionamento.
    - Se o problema foi resolvido, não se esqueça de marcar o tópico como RESOLVIDO.
    crysostomo
    crysostomo
    VIP
    VIP

    Respeito às Regras 50%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 1340
    Registrado : 23/01/2018

    [Resolvido]Relatório não soma valores contatenados Empty Re: [Resolvido]Relatório não soma valores contatenados

    Mensagem  crysostomo em 3/9/2020, 15:12

    Meu amigos bom dia.
    @Alexandre obrigado demorei a responder pois estava estudando seus código, pela dificuldade de entender códigos novos ficou focado nele as vesses até esqueço ele Very Happy, continuo estudando ele, mas fecho esse tópico pois a adaptei ele para formatar.


    .................................................................................
    Uma mão ajuda a outra.
    Feliz aquele que transfere o que sabe e aprende o que ensina.

      Data/hora atual: 28/9/2020, 09:25