Notifications
Clear all

Como atribuir hora em uma variável.  

  RSS
JoaoAnacle
(@joaoanacle)
New Member Registered

Olá, estou tentando atribuir um valor horas:minutos a uma variável, para posterior insert no access.
Em uma celula à formula =agora() com a formatação para aparecer somente a hora:minuto. Gostaria de levar essa informação para uma variável para que eu possa envia-la para meu banco de dados no access.
Alguém sabe como se resolve ?

ResponderCitar (Quote)
Postado : 02/10/2019 9:19 am
Reinaldo
(@rlm)
Estimable Member Registered

"...formatação para aparecer..."

Essa formatação é apenas uma mascara de exibição, o valor da celula continua sendo 43.740,56 (02/10/2019 13:26:24).
Se "pegar" o valor direto receberá 43740,56 (ou o correspondente da hora/dia )
Pode-se:

Por exemplo;
Dim Hm as date 'definindo uma variavel como data
Hm=range("A1").text '--> Terá em sua variavel "13:26:00"
ou
Hm=format(range("a1").value,"hh:mm") '--> Ainda receberá "13:26:00"

outra possibilidade
Dim Hm as String 'Definindo variavel como texto

Hm=range("A1").text '--> Terá em sua variavel "13:26"
ou
Hm=format(range("a1").value,"hh:mm") '--> Terá em sua variavel "13:26"

Reinaldo

ResponderCitar (Quote)
Postado : 02/10/2019 10:49 am
JoaoAnacle
(@joaoanacle)
New Member Registered

Obrigado pelo esclarecimento. Tenho mais uma duvida quanto ao valor real da celula quando tem uma data la. Como você disse, o valor da celula continua a ser 43740,56 , caso eu salve esse valor em uma variável tipo Double e envie para meu banco de dados, quando eu trouxer esse valor de volta a celula, e formata-la para exibição de data e hora, o valor de data e hora serão os os mesmo de quando eu os salvei?

ResponderCitar (Quote)
Postado : 02/10/2019 2:23 pm
JoaoAnacle
(@joaoanacle)
New Member Registered

Fiz o teste aqui, deu certo, muito obrigado! :D

ResponderCitar (Quote)
Postado : 02/10/2019 2:32 pm