Este fórum está sendo desativado

[georgedo]

Boa tarde meus amigos, estou enfrentando um problema grave.

Tenho esse Useform da imagem em anexo.



Nela, tenho o numero de dia de estudos, o número de matérias e hora diária.

Eu gostaria de um código para quando clicar no botão calcular, então o textbox das horas fosse multiplicada pelo textbox dos dias de estudos, apresentando o resultado em horas, mesmo que seja mais de 30:00:00 hs.

Ao mesmo tempo, queria um código para dividir as horas por um número, tipo dividir por 30..

Já tentei milhões de códigos, parece que não há como dividir ou multiplicar, ou mesmo somar e subtrair horas por números.

Uma outras questão é se seria possível somar horas, tipo 02:10:00 + 03:00:00 = 05:10:00

Alguém pode dar uma luz?

[osvaldomp]

... estou enfrentando um problema grave.

Sugestão: disponibilize diretamente aqui no fórum uma amostra do seu arquivo Excel com alguns exemplos e com os resultados desejados. Imagens não servem!

[georgedo]

Boa tarde, perdão, esqueci de anexar.

Segue agora.

Atenciosamente

[osvaldomp]

[quote=osvaldomp post_id=65059 time=1623259091 user_id=6908

Sugestão: disponibilize diretamente aqui no fórum uma amostra do seu arquivo Excel com alguns exemplos e com os resultados desejados..
[/quote]
#
Informe com exatidão em quais campos do Form você tem problema.
Exemplo: o usuário irá preencher o campo X com o valor Y, em seguida irá clicar no botão BZ. Então desejo que o campo B apresente o resultado MM que é o resultado da adição do campo X ao campo Y.

[georgedo]

Boa noite, obrigado pela disposição em ajudar.

Eu consegui descobrir alguns erros e fiz, inclusive, algumas correções. Segue o Projeto, em anexo, com algumas correções.

O que eu pretendo é que, no TextBox "1", apareça as horas diárias escolhidas em "horas diárias" só que multiplicado pelo número de dias que
está em "Dias de Estudo".

No TextBox "2", quero que apareça as horas escolhidas em "Horas diárias" multiplicado por 5
No TextBox "3", quero que apareça as horas escolhidas em "Horas diárias" multiplicado por 7
No TextBox "4", quero que apareça as horas escolhidas em "Horas diárias" multiplicado por 22

Imagem ilustrativa:

[osvaldomp]

Veja se ajuda.
1. remova ou desative os códigos Private Sub boxhors_Change() e Private Sub boxhors_Exit()
2. no código Private Sub NovAlarm () acrescente a linha em vermelho conforme abaixo
End If
If boxhors.Value <> "" Then TextBox11.Value = boxhors.Value * boxdia.Value
End Sub
3. insira o código abaixo; para o seu funcionamento insira um valor em boxhors e aperte Enter

Código: Selecionar todos

Private Sub boxhors_AfterUpdate()
 If boxhors.Value = "" Then
  TextBox11.Value = ""
  TextBox12.Value = ""
  TextBox13.Value = ""
  TextBox14.Value = ""
 Else
  TextBox11.Value = boxhors.Value * boxdia.Value
  TextBox12.Value = boxhors.Value * 5
  TextBox13.Value = boxhors.Value * 7
  TextBox14.Value = boxhors.Value * 22
 End If
End Sub

#
dicas:
1. não é necessário compactar o arquivo para anexar aqui no fórum
2. eu sugiro que você limpe a Propriedade Text das TextBoxes que estão com o texto 00:00:00, pois essa notação representa um horário (uma certa hora do dia) e o que você quer naqueles campos é quantidade de horas, que é diferente.
ex:
Bozo irá estudar por quinze horas, deve ser escrito 15 horas e não 15:00:00.
Bozo irá estudar por sete horas e meia, deve ser escrito 7,5 horas e não 07:30:00.

[georgedo]

Nossa! Maravilha, não tenho nem palavras para agradecer, me ajudou demais.
Ainda sou novato na questão do VBA, mas estou gostando muito de tudo quanto é possível aprender.

Muito obrigado, resolveu meu problema de uma forma simples. Deus abençoe.

[osvaldomp]

Olá, @georgedo .

Que bom que ajudou.

Grato pelas palavras. God bless you too.